lib/param/loadparm.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    Parameter loading functions
   4    Copyright (C) Karl Auer 1993-1998
   5
   6    Largely re-written by Andrew Tridgell, September 1994
   7
   8    Copyright (C) Simo Sorce 2001
   9    Copyright (C) Alexander Bokovoy 2002
  10    Copyright (C) Stefan (metze) Metzmacher 2002
  11    Copyright (C) Jim McDonough (jmcd@us.ibm.com)  2003.
  12    Copyright (C) James Myers 2003 <myersjj@samba.org>
  13    Copyright (C) Jelmer Vernooij <jelmer@samba.org> 2007
  14    Copyright (C) Andrew Bartlett 2011-2012
  15
  16    This program is free software; you can redistribute it and/or modify
  17    it under the terms of the GNU General Public License as published by
  18    the Free Software Foundation; either version 3 of the License, or
  19    (at your option) any later version.
  20
  21    This program is distributed in the hope that it will be useful,
  22    but WITHOUT ANY WARRANTY; without even the implied warranty of
  23    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  24    GNU General Public License for more details.
  25
  26    You should have received a copy of the GNU General Public License
  27    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  28 */
  29
  30 /*
  31  *  Load parameters.
  32  *
  33  *  This module provides suitable callback functions for the params
  34  *  module. It builds the internal table of service details which is
  35  *  then used by the rest of the server.
  36  *
  37  * To add a parameter:
  38  *
  39  * 1) add it to the global or service structure definition
  40  * 2) add it to the parm_table
  41  * 3) add it to the list of available functions (eg: using FN_GLOBAL_STRING())
  42  * 4) If it's a global then initialise it in init_globals. If a local
  43  *    (ie. service) parameter then initialise it in the sDefault structure
  44  *
  45  *
  46  * Notes:
  47  *   The configuration file is processed sequentially for speed. It is NOT
  48  *   accessed randomly as happens in 'real' Windows. For this reason, there
  49  *   is a fair bit of sequence-dependent code here - ie., code which assumes
  50  *   that certain things happen before others. In particular, the code which
  51  *   happens at the boundary between sections is delicately poised, so be
  52  *   careful!
  53  *
  54  */
  55
  56 #include "includes.h"
  57 #include "version.h"
  58 #include "dynconfig/dynconfig.h"
  59 #include "system/time.h"
  60 #include "system/locale.h"
  61 #include "system/network.h" /* needed for TCP_NODELAY */
  62 #include "../lib/util/dlinklist.h"
  63 #include "lib/param/param.h"
  64 #include "lib/param/loadparm.h"
  65 #include "auth/gensec/gensec.h"
  66 #include "lib/param/s3_param.h"
  67 #include "lib/util/bitmap.h"
  68 #include "libcli/smb/smb_constants.h"
  69 #include "tdb.h"
  70
  71 #define standard_sub_basic talloc_strdup
  72
  73 #include "lib/param/param_global.h"
  74
  75 struct loadparm_service *lpcfg_default_service(struct loadparm_context *lp_ctx)
  76 {
  77         if (lp_ctx->s3_fns) {
  78                 return lp_ctx->s3_fns->get_default_loadparm_service();
  79         }
  80         return lp_ctx->sDefault;
  81 }
  82
  83 /**
  84  * Convenience routine to grab string parameters into temporary memory
  85  * and run standard_sub_basic on them.
  86  *
  87  * The buffers can be written to by
  88  * callers without affecting the source string.
  89  */
  90
  91 static const char *lpcfg_string(const char *s)
  92 {
  93 #if 0  /* until REWRITE done to make thread-safe */
  94         size_t len = s ? strlen(s) : 0;
  95         char *ret;
  96 #endif
  97
  98         /* The follow debug is useful for tracking down memory problems
  99            especially if you have an inner loop that is calling a lp_*()
 100            function that returns a string.  Perhaps this debug should be
 101            present all the time? */
 102
 103 #if 0
 104         DEBUG(10, ("lpcfg_string(%s)\n", s));
 105 #endif
 106
 107 #if 0  /* until REWRITE done to make thread-safe */
 108         if (!lp_talloc)
 109                 lp_talloc = talloc_init("lp_talloc");
 110
 111         ret = talloc_array(lp_talloc, char, len + 100); /* leave room for substitution */
 112
 113         if (!ret)
 114                 return NULL;
 115
 116         if (!s)
 117                 *ret = 0;
 118         else
 119                 strlcpy(ret, s, len);
 120
 121         if (trim_string(ret, "\"", "\"")) {
 122                 if (strchr(ret,'"') != NULL)
 123                         strlcpy(ret, s, len);
 124         }
 125
 126         standard_sub_basic(ret,len+100);
 127         return (ret);
 128 #endif
 129         return s;
 130 }
 131
 132 /*
 133    In this section all the functions that are used to access the
 134    parameters from the rest of the program are defined
 135 */
 136
 137 /*
 138  * the creation of separate lpcfg_*() and lp_*() functions is to allow
 139  * for code compatibility between existing Samba4 and Samba3 code.
 140  */
 141
 142 /* this global context supports the lp_*() function varients */
 143 static struct loadparm_context *global_loadparm_context;
 144
 145 #define lpcfg_default_service global_loadparm_context->sDefault
 146 #define lpcfg_global_service(i) global_loadparm_context->services[i]
 147
 148 #define FN_GLOBAL_STRING(fn_name,var_name) \
 149  _PUBLIC_ char *lpcfg_ ## fn_name(struct loadparm_context *lp_ctx, TALLOC_CTX *ctx) {\
 150          if (lp_ctx == NULL) return NULL;                               \
 151          if (lp_ctx->s3_fns) {                                          \
 152                  return lp_ctx->globals->var_name ? lp_ctx->s3_fns->lp_string(ctx, lp_ctx->globals->var_name) : talloc_strdup(ctx, ""); \
 153          }                                                              \
 154          return lp_ctx->globals->var_name ? talloc_strdup(ctx, lpcfg_string(lp_ctx->globals->var_name)) : talloc_strdup(ctx, ""); \
 155 }
 156
 157 #define FN_GLOBAL_CONST_STRING(fn_name,var_name)                                \
 158  _PUBLIC_ const char *lpcfg_ ## fn_name(struct loadparm_context *lp_ctx) { \
 159         if (lp_ctx == NULL) return NULL;                                \
 160         return lp_ctx->globals->var_name ? lpcfg_string(lp_ctx->globals->var_name) : ""; \
 161 }
 162
 163 #define FN_GLOBAL_LIST(fn_name,var_name)                                \
 164  _PUBLIC_ const char **lpcfg_ ## fn_name(struct loadparm_context *lp_ctx) { \
 165          if (lp_ctx == NULL) return NULL;                               \
 166          return lp_ctx->globals->var_name;                              \
 167  }
 168
 169 #define FN_GLOBAL_BOOL(fn_name,var_name) \
 170  _PUBLIC_ bool lpcfg_ ## fn_name(struct loadparm_context *lp_ctx) {\
 171          if (lp_ctx == NULL) return false;                              \
 172          return lp_ctx->globals->var_name;                              \
 173 }
 174
 175 #define FN_GLOBAL_INTEGER(fn_name,var_name) \
 176  _PUBLIC_ int lpcfg_ ## fn_name(struct loadparm_context *lp_ctx) { \
 177          return lp_ctx->globals->var_name;                              \
 178  }
 179
 180 /* Local parameters don't need the ->s3_fns because the struct
 181  * loadparm_service is shared and lpcfg_service() checks the ->s3_fns
 182  * hook */
 183 #define FN_LOCAL_STRING(fn_name,val) \
 184  _PUBLIC_ char *lpcfg_ ## fn_name(struct loadparm_service *service, \
 185                                         struct loadparm_service *sDefault, TALLOC_CTX *ctx) { \
 186          return(talloc_strdup(ctx, lpcfg_string((const char *)((service != NULL && service->val != NULL) ? service->val : sDefault->val)))); \
 187  }
 188
 189 #define FN_LOCAL_CONST_STRING(fn_name,val) \
 190  _PUBLIC_ const char *lpcfg_ ## fn_name(struct loadparm_service *service, \
 191                                         struct loadparm_service *sDefault) { \
 192          return((const char *)((service != NULL && service->val != NULL) ? service->val : sDefault->val)); \
 193  }
 194
 195 #define FN_LOCAL_LIST(fn_name,val) \
 196  _PUBLIC_ const char **lpcfg_ ## fn_name(struct loadparm_service *service, \
 197                                          struct loadparm_service *sDefault) {\
 198          return(const char **)(service != NULL && service->val != NULL? service->val : sDefault->val); \
 199  }
 200
 201 #define FN_LOCAL_PARM_BOOL(fn_name, val) FN_LOCAL_BOOL(fn_name, val)
 202
 203 #define FN_LOCAL_BOOL(fn_name,val) \
 204  _PUBLIC_ bool lpcfg_ ## fn_name(struct loadparm_service *service, \
 205                                  struct loadparm_service *sDefault) {   \
 206          return((service != NULL)? service->val : sDefault->val); \
 207  }
 208
 209 #define FN_LOCAL_INTEGER(fn_name,val) \
 210  _PUBLIC_ int lpcfg_ ## fn_name(struct loadparm_service *service, \
 211                                 struct loadparm_service *sDefault) {    \
 212          return((service != NULL)? service->val : sDefault->val); \
 213  }
 214
 215 #define FN_LOCAL_PARM_INTEGER(fn_name, val) FN_LOCAL_INTEGER(fn_name, val)
 216
 217 #define FN_LOCAL_PARM_CHAR(fn_name,val) \
 218  _PUBLIC_ char lpcfg_ ## fn_name(struct loadparm_service *service, \
 219                                 struct loadparm_service *sDefault) {    \
 220          return((service != NULL)? service->val : sDefault->val); \
 221  }
 222
 223 #include "lib/param/param_functions.c"
 224
 225 /* These functions cannot be auto-generated */
 226 FN_LOCAL_BOOL(autoloaded, autoloaded)
 227 FN_GLOBAL_CONST_STRING(dnsdomain, dnsdomain)
 228
 229 /* local prototypes */
 230 static struct loadparm_service *lpcfg_getservicebyname(struct loadparm_context *lp_ctx,
 231                                         const char *pszServiceName);
 232 static bool lpcfg_service_ok(struct loadparm_service *service);
 233 static bool do_section(const char *pszSectionName, void *);
 234 static bool set_variable_helper(TALLOC_CTX *mem_ctx, int parmnum, void *parm_ptr,
 235                                 const char *pszParmName, const char *pszParmValue);
 236 static bool lp_do_parameter_parametric(struct loadparm_context *lp_ctx,
 237                                        struct loadparm_service *service,
 238                                        const char *pszParmName,
 239                                        const char *pszParmValue, int flags);
 240
 241 /* The following are helper functions for parametrical options support. */
 242 /* It returns a pointer to parametrical option value if it exists or NULL otherwise */
 243 /* Actual parametrical functions are quite simple */
 244 struct parmlist_entry *get_parametric_helper(struct loadparm_service *service,
 245                                              const char *type, const char *option,
 246                                              struct parmlist_entry *global_opts)
 247 {
 248         char* param_key;
 249         struct parmlist_entry *data = NULL;
 250         TALLOC_CTX *mem_ctx = talloc_stackframe();
 251
 252         param_key = talloc_asprintf(mem_ctx, "%s:%s", type, option);
 253         if (param_key == NULL) {
 254                 DEBUG(0,("asprintf failed!\n"));
 255                 TALLOC_FREE(mem_ctx);
 256                 return NULL;
 257         }
 258
 259         /*
 260          * Try to fetch the option from the data.
 261          */
 262         if (service != NULL) {
 263                 data = service->param_opt;
 264                 while (data != NULL) {
 265                         if (strwicmp(data->key, param_key) == 0) {
 266                                 TALLOC_FREE(mem_ctx);
 267                                 return data;
 268                         }
 269                         data = data->next;
 270                 }
 271         }
 272
 273         /*
 274          * Fall back to fetching from the globals.
 275          */
 276         data = global_opts;
 277         while (data != NULL) {
 278                 if (strwicmp(data->key, param_key) == 0) {
 279                         TALLOC_FREE(mem_ctx);
 280                         return data;
 281                 }
 282                 data = data->next;
 283         }
 284
 285
 286         TALLOC_FREE(mem_ctx);
 287
 288         return NULL;
 289
 290
 291 }
 292
 293 const char *lpcfg_get_parametric(struct loadparm_context *lp_ctx,
 294                               struct loadparm_service *service,
 295                               const char *type, const char *option)
 296 {
 297         struct parmlist_entry *data;
 298
 299         if (lp_ctx == NULL)
 300                 return NULL;
 301
 302         data = get_parametric_helper(service,
 303                                      type, option, lp_ctx->globals->param_opt);
 304
 305         if (data == NULL) {
 306                 return NULL;
 307         } else {
 308                 return data->value;
 309         }
 310 }
 311
 312
 313 /**
 314  * convenience routine to return int parameters.
 315  */
 316 int lp_int(const char *s)
 317 {
 318
 319         if (!s || !*s) {
 320                 DEBUG(0,("lp_int(%s): is called with NULL!\n",s));
 321                 return -1;
 322         }
 323
 324         return strtol(s, NULL, 0);
 325 }
 326
 327 /**
 328  * convenience routine to return unsigned long parameters.
 329  */
 330 unsigned long lp_ulong(const char *s)
 331 {
 332
 333         if (!s || !*s) {
 334                 DEBUG(0,("lp_ulong(%s): is called with NULL!\n",s));
 335                 return -1;
 336         }
 337
 338         return strtoul(s, NULL, 0);
 339 }
 340
 341 /**
 342  * convenience routine to return unsigned long parameters.
 343  */
 344 static long lp_long(const char *s)
 345 {
 346
 347         if (!s) {
 348                 DEBUG(0,("lp_long(%s): is called with NULL!\n",s));
 349                 return -1;
 350         }
 351
 352         return strtol(s, NULL, 0);
 353 }
 354
 355 /**
 356  * convenience routine to return unsigned long parameters.
 357  */
 358 static double lp_double(const char *s)
 359 {
 360
 361         if (!s) {
 362                 DEBUG(0,("lp_double(%s): is called with NULL!\n",s));
 363                 return -1;
 364         }
 365
 366         return strtod(s, NULL);
 367 }
 368
 369 /**
 370  * convenience routine to return boolean parameters.
 371  */
 372 bool lp_bool(const char *s)
 373 {
 374         bool ret = false;
 375
 376         if (!s || !*s) {
 377                 DEBUG(0,("lp_bool(%s): is called with NULL!\n",s));
 378                 return false;
 379         }
 380
 381         if (!set_boolean(s, &ret)) {
 382                 DEBUG(0,("lp_bool(%s): value is not boolean!\n",s));
 383                 return false;
 384         }
 385
 386         return ret;
 387 }
 388
 389 /**
 390  * Return parametric option from a given service. Type is a part of option before ':'
 391  * Parametric option has following syntax: 'Type: option = value'
 392  * Returned value is allocated in 'lp_talloc' context
 393  */
 394
 395 const char *lpcfg_parm_string(struct loadparm_context *lp_ctx,
 396                               struct loadparm_service *service, const char *type,
 397                               const char *option)
 398 {
 399         const char *value = lpcfg_get_parametric(lp_ctx, service, type, option);
 400
 401         if (value)
 402                 return lpcfg_string(value);
 403
 404         return NULL;
 405 }
 406
 407 /**
 408  * Return parametric option from a given service. Type is a part of option before ':'
 409  * Parametric option has following syntax: 'Type: option = value'
 410  * Returned value is allocated in 'lp_talloc' context
 411  */
 412
 413 const char **lpcfg_parm_string_list(TALLOC_CTX *mem_ctx,
 414                                     struct loadparm_context *lp_ctx,
 415                                     struct loadparm_service *service,
 416                                     const char *type,
 417                                     const char *option, const char *separator)
 418 {
 419         const char *value = lpcfg_get_parametric(lp_ctx, service, type, option);
 420
 421         if (value != NULL)
 422                 return (const char **)str_list_make(mem_ctx, value, separator);
 423
 424         return NULL;
 425 }
 426
 427 /**
 428  * Return parametric option from a given service. Type is a part of option before ':'
 429  * Parametric option has following syntax: 'Type: option = value'
 430  */
 431
 432 int lpcfg_parm_int(struct loadparm_context *lp_ctx,
 433                    struct loadparm_service *service, const char *type,
 434                    const char *option, int default_v)
 435 {
 436         const char *value = lpcfg_get_parametric(lp_ctx, service, type, option);
 437
 438         if (value)
 439                 return lp_int(value);
 440
 441         return default_v;
 442 }
 443
 444 /**
 445  * Return parametric option from a given service. Type is a part of
 446  * option before ':'.
 447  * Parametric option has following syntax: 'Type: option = value'.
 448  */
 449
 450 int lpcfg_parm_bytes(struct loadparm_context *lp_ctx,
 451                   struct loadparm_service *service, const char *type,
 452                   const char *option, int default_v)
 453 {
 454         uint64_t bval;
 455
 456         const char *value = lpcfg_get_parametric(lp_ctx, service, type, option);
 457
 458         if (value && conv_str_size_error(value, &bval)) {
 459                 if (bval <= INT_MAX) {
 460                         return (int)bval;
 461                 }
 462         }
 463
 464         return default_v;
 465 }
 466
 467 /**
 468  * Return parametric option from a given service.
 469  * Type is a part of option before ':'
 470  * Parametric option has following syntax: 'Type: option = value'
 471  */
 472 unsigned long lpcfg_parm_ulong(struct loadparm_context *lp_ctx,
 473                             struct loadparm_service *service, const char *type,
 474                             const char *option, unsigned long default_v)
 475 {
 476         const char *value = lpcfg_get_parametric(lp_ctx, service, type, option);
 477
 478         if (value)
 479                 return lp_ulong(value);
 480
 481         return default_v;
 482 }
 483
 484 long lpcfg_parm_long(struct loadparm_context *lp_ctx,
 485                      struct loadparm_service *service, const char *type,
 486                      const char *option, long default_v)
 487 {
 488         const char *value = lpcfg_get_parametric(lp_ctx, service, type, option);
 489
 490         if (value)
 491                 return lp_long(value);
 492
 493         return default_v;
 494 }
 495
 496 double lpcfg_parm_double(struct loadparm_context *lp_ctx,
 497                       struct loadparm_service *service, const char *type,
 498                       const char *option, double default_v)
 499 {
 500         const char *value = lpcfg_get_parametric(lp_ctx, service, type, option);
 501
 502         if (value != NULL)
 503                 return lp_double(value);
 504
 505         return default_v;
 506 }
 507
 508 /**
 509  * Return parametric option from a given service. Type is a part of option before ':'
 510  * Parametric option has following syntax: 'Type: option = value'
 511  */
 512
 513 bool lpcfg_parm_bool(struct loadparm_context *lp_ctx,
 514                      struct loadparm_service *service, const char *type,
 515                      const char *option, bool default_v)
 516 {
 517         const char *value = lpcfg_get_parametric(lp_ctx, service, type, option);
 518
 519         if (value != NULL)
 520                 return lp_bool(value);
 521
 522         return default_v;
 523 }
 524
 525
 526 /**
 527  * Set a string value, deallocating any existing space, and allocing the space
 528  * for the string
 529  */
 530 bool lpcfg_string_set(TALLOC_CTX *mem_ctx, char **dest, const char *src)
 531 {
 532         talloc_free(*dest);
 533
 534         if (src == NULL)
 535                 src = "";
 536
 537         *dest = talloc_strdup(mem_ctx, src);
 538         if ((*dest) == NULL) {
 539                 DEBUG(0,("Out of memory in string_set\n"));
 540                 return false;
 541         }
 542
 543         return true;
 544 }
 545
 546 /**
 547  * Set a string value, deallocating any existing space, and allocing the space
 548  * for the string
 549  */
 550 bool lpcfg_string_set_upper(TALLOC_CTX *mem_ctx, char **dest, const char *src)
 551 {
 552         talloc_free(*dest);
 553
 554         if (src == NULL)
 555                 src = "";
 556
 557         *dest = strupper_talloc(mem_ctx, src);
 558         if ((*dest) == NULL) {
 559                 DEBUG(0,("Out of memory in string_set_upper\n"));
 560                 return false;
 561         }
 562
 563         return true;
 564 }
 565
 566
 567
 568 /**
 569  * Add a new service to the services array initialising it with the given
 570  * service.
 571  */
 572
 573 struct loadparm_service *lpcfg_add_service(struct loadparm_context *lp_ctx,
 574                                            const struct loadparm_service *pservice,
 575                                            const char *name)
 576 {
 577         int i;
 578         int num_to_alloc = lp_ctx->iNumServices + 1;
 579         struct parmlist_entry *data, *pdata;
 580
 581         if (pservice == NULL) {
 582                 pservice = lp_ctx->sDefault;
 583         }
 584
 585         /* it might already exist */
 586         if (name) {
 587                 struct loadparm_service *service = lpcfg_getservicebyname(lp_ctx,
 588                                                                     name);
 589                 if (service != NULL) {
 590                         /* Clean all parametric options for service */
 591                         /* They will be added during parsing again */
 592                         data = service->param_opt;
 593                         while (data) {
 594                                 pdata = data->next;
 595                                 talloc_free(data);
 596                                 data = pdata;
 597                         }
 598                         service->param_opt = NULL;
 599                         return service;
 600                 }
 601         }
 602
 603         /* find an invalid one */
 604         for (i = 0; i < lp_ctx->iNumServices; i++)
 605                 if (lp_ctx->services[i] == NULL)
 606                         break;
 607
 608         /* if not, then create one */
 609         if (i == lp_ctx->iNumServices) {
 610                 struct loadparm_service **tsp;
 611
 612                 tsp = talloc_realloc(lp_ctx, lp_ctx->services, struct loadparm_service *, num_to_alloc);
 613
 614                 if (!tsp) {
 615                         DEBUG(0,("lpcfg_add_service: failed to enlarge services!\n"));
 616                         return NULL;
 617                 } else {
 618                         lp_ctx->services = tsp;
 619                         lp_ctx->services[lp_ctx->iNumServices] = NULL;
 620                 }
 621
 622                 lp_ctx->iNumServices++;
 623         }
 624
 625         lp_ctx->services[i] = talloc_zero(lp_ctx->services, struct loadparm_service);
 626         if (lp_ctx->services[i] == NULL) {
 627                 DEBUG(0,("lpcfg_add_service: out of memory!\n"));
 628                 return NULL;
 629         }
 630         copy_service(lp_ctx->services[i], pservice, NULL);
 631         if (name != NULL)
 632                 lpcfg_string_set(lp_ctx->services[i], &lp_ctx->services[i]->szService, name);
 633         return lp_ctx->services[i];
 634 }
 635
 636 /**
 637  * Add a new home service, with the specified home directory, defaults coming
 638  * from service ifrom.
 639  */
 640
 641 bool lpcfg_add_home(struct loadparm_context *lp_ctx,
 642                  const char *pszHomename,
 643                  struct loadparm_service *default_service,
 644                  const char *user, const char *pszHomedir)
 645 {
 646         struct loadparm_service *service;
 647
 648         service = lpcfg_add_service(lp_ctx, default_service, pszHomename);
 649
 650         if (service == NULL)
 651                 return false;
 652
 653         if (!(*(default_service->path))
 654             || strequal(default_service->path, lp_ctx->sDefault->path)) {
 655                 service->path = talloc_strdup(service, pszHomedir);
 656         } else {
 657                 service->path = string_sub_talloc(service, lpcfg_path(default_service, lp_ctx->sDefault, service), "%H", pszHomedir);
 658         }
 659
 660         if (!(*(service->comment))) {
 661                 service->comment = talloc_asprintf(service, "Home directory of %s", user);
 662         }
 663         service->bAvailable = default_service->bAvailable;
 664         service->browseable = default_service->browseable;
 665
 666         DEBUG(3, ("adding home's share [%s] for user '%s' at '%s'\n",
 667                   pszHomename, user, service->path));
 668
 669         return true;
 670 }
 671
 672 /**
 673  * Add a new printer service, with defaults coming from service iFrom.
 674  */
 675
 676 bool lpcfg_add_printer(struct loadparm_context *lp_ctx,
 677                        const char *pszPrintername,
 678                        struct loadparm_service *default_service)
 679 {
 680         const char *comment = "From Printcap";
 681         struct loadparm_service *service;
 682         service = lpcfg_add_service(lp_ctx, default_service, pszPrintername);
 683
 684         if (service == NULL)
 685                 return false;
 686
 687         /* note that we do NOT default the availability flag to True - */
 688         /* we take it from the default service passed. This allows all */
 689         /* dynamic printers to be disabled by disabling the [printers] */
 690         /* entry (if/when the 'available' keyword is implemented!).    */
 691
 692         /* the printer name is set to the service name. */
 693         lpcfg_string_set(service, &service->_printername, pszPrintername);
 694         lpcfg_string_set(service, &service->comment, comment);
 695         service->browseable = default_service->browseable;
 696         /* Printers cannot be read_only. */
 697         service->read_only = false;
 698         /* Printer services must be printable. */
 699         service->printable = true;
 700
 701         DEBUG(3, ("adding printer service %s\n", pszPrintername));
 702
 703         return true;
 704 }
 705
 706 /**
 707  * Map a parameter's string representation to something we can use.
 708  * Returns False if the parameter string is not recognised, else TRUE.
 709  */
 710
 711 int lpcfg_map_parameter(const char *pszParmName)
 712 {
 713         int iIndex;
 714
 715         for (iIndex = 0; parm_table[iIndex].label; iIndex++)
 716                 if (strwicmp(parm_table[iIndex].label, pszParmName) == 0)
 717                         return iIndex;
 718
 719         /* Warn only if it isn't parametric option */
 720         if (strchr(pszParmName, ':') == NULL)
 721                 DEBUG(0, ("Unknown parameter encountered: \"%s\"\n", pszParmName));
 722         /* We do return 'fail' for parametric options as well because they are
 723            stored in different storage
 724          */
 725         return -1;
 726 }
 727
 728
 729 /**
 730   return the parameter structure for a parameter
 731 */
 732 struct parm_struct *lpcfg_parm_struct(struct loadparm_context *lp_ctx, const char *name)
 733 {
 734         int parmnum;
 735
 736         if (lp_ctx->s3_fns) {
 737                 return lp_ctx->s3_fns->get_parm_struct(name);
 738         }
 739
 740         parmnum = lpcfg_map_parameter(name);
 741         if (parmnum == -1) return NULL;
 742         return &parm_table[parmnum];
 743 }
 744
 745 /**
 746   return the parameter pointer for a parameter
 747 */
 748 void *lpcfg_parm_ptr(struct loadparm_context *lp_ctx,
 749                   struct loadparm_service *service, struct parm_struct *parm)
 750 {
 751         if (lp_ctx->s3_fns) {
 752                 return lp_ctx->s3_fns->get_parm_ptr(service, parm);
 753         }
 754
 755         if (service == NULL) {
 756                 if (parm->p_class == P_LOCAL)
 757                         return ((char *)lp_ctx->sDefault)+parm->offset;
 758                 else if (parm->p_class == P_GLOBAL)
 759                         return ((char *)lp_ctx->globals)+parm->offset;
 760                 else return NULL;
 761         } else {
 762                 return ((char *)service) + parm->offset;
 763         }
 764 }
 765
 766 /**
 767   return the parameter pointer for a parameter
 768 */
 769 bool lpcfg_parm_is_cmdline(struct loadparm_context *lp_ctx, const char *name)
 770 {
 771         int parmnum;
 772
 773         parmnum = lpcfg_map_parameter(name);
 774         if (parmnum == -1) return false;
 775
 776         return lp_ctx->flags[parmnum] & FLAG_CMDLINE;
 777 }
 778
 779 /**
 780  * Find a service by name. Otherwise works like get_service.
 781  */
 782
 783 static struct loadparm_service *lpcfg_getservicebyname(struct loadparm_context *lp_ctx,
 784                                         const char *pszServiceName)
 785 {
 786         int iService;
 787
 788         if (lp_ctx->s3_fns) {
 789                 return lp_ctx->s3_fns->get_service(pszServiceName);
 790         }
 791
 792         for (iService = lp_ctx->iNumServices - 1; iService >= 0; iService--)
 793                 if (lp_ctx->services[iService] != NULL &&
 794                     strwicmp(lp_ctx->services[iService]->szService, pszServiceName) == 0) {
 795                         return lp_ctx->services[iService];
 796                 }
 797
 798         return NULL;
 799 }
 800
 801 /**
 802  * Add a parametric option to a parmlist_entry,
 803  * replacing old value, if already present.
 804  */
 805 void set_param_opt(TALLOC_CTX *mem_ctx,
 806                    struct parmlist_entry **opt_list,
 807                    const char *opt_name,
 808                    const char *opt_value,
 809                    unsigned priority)
 810 {
 811         struct parmlist_entry *new_opt, *opt;
 812         bool not_added;
 813
 814         opt = *opt_list;
 815         not_added = true;
 816
 817         /* Traverse destination */
 818         while (opt) {
 819                 /* If we already have same option, override it */
 820                 if (strwicmp(opt->key, opt_name) == 0) {
 821                         if ((opt->priority & FLAG_CMDLINE) &&
 822                             !(priority & FLAG_CMDLINE)) {
 823                                 /* it's been marked as not to be
 824                                    overridden */
 825                                 return;
 826                         }
 827                         TALLOC_FREE(opt->value);
 828                         TALLOC_FREE(opt->list);
 829                         opt->value = talloc_strdup(opt, opt_value);
 830                         opt->priority = priority;
 831                         not_added = false;
 832                         break;
 833                 }
 834                 opt = opt->next;
 835         }
 836         if (not_added) {
 837                 new_opt = talloc(mem_ctx, struct parmlist_entry);
 838                 if (new_opt == NULL) {
 839                         smb_panic("OOM");
 840                 }
 841
 842                 new_opt->key = talloc_strdup(new_opt, opt_name);
 843                 if (new_opt->key == NULL) {
 844                         smb_panic("talloc_strdup failed");
 845                 }
 846
 847                 new_opt->value = talloc_strdup(new_opt, opt_value);
 848                 if (new_opt->value == NULL) {
 849                         smb_panic("talloc_strdup failed");
 850                 }
 851
 852                 new_opt->list = NULL;
 853                 new_opt->priority = priority;
 854                 DLIST_ADD(*opt_list, new_opt);
 855         }
 856 }
 857
 858 /**
 859  * Copy a service structure to another.
 860  * If pcopymapDest is NULL then copy all fields
 861  */
 862
 863 void copy_service(struct loadparm_service *pserviceDest,
 864                   const struct loadparm_service *pserviceSource,
 865                   struct bitmap *pcopymapDest)
 866 {
 867         int i;
 868         bool bcopyall = (pcopymapDest == NULL);
 869         struct parmlist_entry *data;
 870
 871         for (i = 0; parm_table[i].label; i++)
 872                 if (parm_table[i].p_class == P_LOCAL &&
 873                     (bcopyall || bitmap_query(pcopymapDest, i))) {
 874                         const void *src_ptr =
 875                                 ((const char *)pserviceSource) + parm_table[i].offset;
 876                         void *dest_ptr =
 877                                 ((char *)pserviceDest) + parm_table[i].offset;
 878
 879                         switch (parm_table[i].type) {
 880                                 case P_BOOL:
 881                                 case P_BOOLREV:
 882                                         *(bool *)dest_ptr = *(const bool *)src_ptr;
 883                                         break;
 884
 885                                 case P_INTEGER:
 886                                 case P_BYTES:
 887                                 case P_OCTAL:
 888                                 case P_ENUM:
 889                                         *(int *)dest_ptr = *(const int *)src_ptr;
 890                                         break;
 891
 892                                 case P_CHAR:
 893                                         *(char *)dest_ptr = *(const char *)src_ptr;
 894                                         break;
 895
 896                                 case P_STRING:
 897                                         lpcfg_string_set(pserviceDest,
 898                                                    (char **)dest_ptr,
 899                                                    *(const char * const *)src_ptr);
 900                                         break;
 901
 902                                 case P_USTRING:
 903                                         lpcfg_string_set_upper(pserviceDest,
 904                                                          (char **)dest_ptr,
 905                                                          *(const char * const *)src_ptr);
 906                                         break;
 907                                 case P_CMDLIST:
 908                                 case P_LIST:
 909                                         TALLOC_FREE(*((char ***)dest_ptr));
 910                                         *(const char * const **)dest_ptr = (const char * const *)str_list_copy(pserviceDest,
 911                                                                                   *(const char * * const *)src_ptr);
 912                                         break;
 913                                 default:
 914                                         break;
 915                         }
 916                 }
 917
 918         if (bcopyall) {
 919                 init_copymap(pserviceDest);
 920                 if (pserviceSource->copymap)
 921                         bitmap_copy(pserviceDest->copymap,
 922                                     pserviceSource->copymap);
 923         }
 924
 925         for (data = pserviceSource->param_opt; data != NULL; data = data->next) {
 926                 set_param_opt(pserviceDest, &pserviceDest->param_opt,
 927                               data->key, data->value, data->priority);
 928         }
 929 }
 930
 931 /**
 932  * Check a service for consistency. Return False if the service is in any way
 933  * incomplete or faulty, else True.
 934  */
 935 static bool lpcfg_service_ok(struct loadparm_service *service)
 936 {
 937         bool bRetval;
 938
 939         bRetval = true;
 940         if (service->szService[0] == '\0') {
 941                 DEBUG(0, ("The following message indicates an internal error:\n"));
 942                 DEBUG(0, ("No service name in service entry.\n"));
 943                 bRetval = false;
 944         }
 945
 946         /* The [printers] entry MUST be printable. I'm all for flexibility, but */
 947         /* I can't see why you'd want a non-printable printer service...        */
 948         if (strwicmp(service->szService, PRINTERS_NAME) == 0) {
 949                 if (!service->printable) {
 950                         DEBUG(0, ("WARNING: [%s] service MUST be printable!\n",
 951                                service->szService));
 952                         service->printable = true;
 953                 }
 954                 /* [printers] service must also be non-browsable. */
 955                 if (service->browseable)
 956                         service->browseable = false;
 957         }
 958
 959         /* If a service is flagged unavailable, log the fact at level 0. */
 960         if (!service->bAvailable)
 961                 DEBUG(1, ("NOTE: Service %s is flagged unavailable.\n",
 962                           service->szService));
 963
 964         return bRetval;
 965 }
 966
 967
 968 /*******************************************************************
 969  Keep a linked list of all config files so we know when one has changed
 970  it's date and needs to be reloaded.
 971 ********************************************************************/
 972
 973 void add_to_file_list(TALLOC_CTX *mem_ctx, struct file_lists **list,
 974                              const char *fname, const char *subfname)
 975 {
 976         struct file_lists *f = *list;
 977
 978         while (f) {
 979                 if (f->name && !strcmp(f->name, fname))
 980                         break;
 981                 f = f->next;
 982         }
 983
 984         if (!f) {
 985                 f = talloc(mem_ctx, struct file_lists);
 986                 if (!f)
 987                         goto fail;
 988                 f->next = *list;
 989                 f->name = talloc_strdup(f, fname);
 990                 if (!f->name) {
 991                         TALLOC_FREE(f);
 992                         goto fail;
 993                 }
 994                 f->subfname = talloc_strdup(f, subfname);
 995                 if (!f->subfname) {
 996                         TALLOC_FREE(f);
 997                         goto fail;
 998                 }
 999                 *list = f;
1000                 f->modtime = file_modtime(subfname);
1001         } else {
1002                 time_t t = file_modtime(subfname);
1003                 if (t)
1004                         f->modtime = t;
1005         }
1006         return;
1007
1008 fail:
1009         DEBUG(0, ("Unable to add file to file list: %s\n", fname));
1010
1011 }
1012
1013 /*******************************************************************
1014  Check if a config file has changed date.
1015 ********************************************************************/
1016 bool lpcfg_file_list_changed(struct loadparm_context *lp_ctx)
1017 {
1018         struct file_lists *f;
1019         DEBUG(6, ("lpcfg_file_list_changed()\n"));
1020
1021         for (f = lp_ctx->file_lists; f != NULL; f = f->next) {
1022                 char *n2;
1023                 time_t mod_time;
1024
1025                 n2 = standard_sub_basic(lp_ctx, f->name);
1026
1027                 DEBUGADD(6, ("file %s -> %s  last mod_time: %s\n",
1028                              f->name, n2, ctime(&f->modtime)));
1029
1030                 mod_time = file_modtime(n2);
1031
1032                 if (mod_time && ((f->modtime != mod_time) || (f->subfname == NULL) || (strcmp(n2, f->subfname) != 0))) {
1033                         DEBUGADD(6, ("file %s modified: %s\n", n2,
1034                                   ctime(&mod_time)));
1035                         f->modtime = mod_time;
1036                         talloc_free(f->subfname);
1037                         f->subfname = talloc_strdup(f, n2);
1038                         return true;
1039                 }
1040         }
1041         return false;
1042 }
1043
1044 /*
1045  * set the value for a P_ENUM
1046  */
1047 bool lp_set_enum_parm( struct parm_struct *parm, const char *pszParmValue,
1048                               int *ptr )
1049 {
1050         int i;
1051
1052         for (i = 0; parm->enum_list[i].name; i++) {
1053                 if ( strequal(pszParmValue, parm->enum_list[i].name)) {
1054                         *ptr = parm->enum_list[i].value;
1055                         return true;
1056                 }
1057         }
1058         DEBUG(0, ("WARNING: Ignoring invalid value '%s' for parameter '%s'\n",
1059                   pszParmValue, parm->label));
1060         return false;
1061 }
1062
1063
1064 /***************************************************************************
1065  Handle the "realm" parameter
1066 ***************************************************************************/
1067
1068 bool handle_realm(struct loadparm_context *lp_ctx, struct loadparm_service *service,
1069                   const char *pszParmValue, char **ptr)
1070 {
1071         char *upper;
1072         char *lower;
1073
1074         upper = strupper_talloc(lp_ctx, pszParmValue);
1075         if (upper == NULL) {
1076                 return false;
1077         }
1078
1079         lower = strlower_talloc(lp_ctx, pszParmValue);
1080         if (lower == NULL) {
1081                 TALLOC_FREE(upper);
1082                 return false;
1083         }
1084
1085         lpcfg_string_set(lp_ctx->globals->ctx, ptr, pszParmValue);
1086         lpcfg_string_set(lp_ctx->globals->ctx, &lp_ctx->globals->realm, upper);
1087         lpcfg_string_set(lp_ctx->globals->ctx, &lp_ctx->globals->dnsdomain, lower);
1088
1089         return true;
1090 }
1091
1092 /***************************************************************************
1093  Handle the include operation.
1094 ***************************************************************************/
1095
1096 bool handle_include(struct loadparm_context *lp_ctx, struct loadparm_service *service,
1097                            const char *pszParmValue, char **ptr)
1098 {
1099         char *fname;
1100
1101         if (lp_ctx->s3_fns) {
1102                 return lp_ctx->s3_fns->lp_include(lp_ctx, service, pszParmValue, ptr);
1103         }
1104
1105         fname = standard_sub_basic(lp_ctx, pszParmValue);
1106
1107         add_to_file_list(lp_ctx, &lp_ctx->file_lists, pszParmValue, fname);
1108
1109         lpcfg_string_set(lp_ctx, ptr, fname);
1110
1111         if (file_exist(fname))
1112                 return pm_process(fname, do_section, lpcfg_do_parameter, lp_ctx);
1113
1114         DEBUG(2, ("Can't find include file %s\n", fname));
1115
1116         return false;
1117 }
1118
1119 /***************************************************************************
1120  Handle the interpretation of the copy parameter.
1121 ***************************************************************************/
1122
1123 bool handle_copy(struct loadparm_context *lp_ctx, struct loadparm_service *service,
1124                         const char *pszParmValue, char **ptr)
1125 {
1126         bool bRetval;
1127         struct loadparm_service *serviceTemp = NULL;
1128
1129         bRetval = false;
1130
1131         DEBUG(3, ("Copying service from service %s\n", pszParmValue));
1132
1133         serviceTemp = lpcfg_getservicebyname(lp_ctx, pszParmValue);
1134
1135         if (service == NULL) {
1136                 DEBUG(0, ("Unable to copy service - invalid service destination"));
1137                 return false;
1138         }
1139
1140         if (serviceTemp != NULL) {
1141                 if (serviceTemp == service) {
1142                         DEBUG(0, ("Can't copy service %s - unable to copy self!\n", pszParmValue));
1143                 } else {
1144                         copy_service(service,
1145                                      serviceTemp,
1146                                      service->copymap);
1147                         lpcfg_string_set(service, ptr, pszParmValue);
1148
1149                         bRetval = true;
1150                 }
1151         } else {
1152                 DEBUG(0, ("Unable to copy service - source not found: %s\n",
1153                           pszParmValue));
1154                 bRetval = false;
1155         }
1156
1157         return bRetval;
1158 }
1159
1160 bool handle_debug_list(struct loadparm_context *lp_ctx, struct loadparm_service *service,
1161                         const char *pszParmValue, char **ptr)
1162 {
1163         lpcfg_string_set(lp_ctx->globals->ctx, ptr, pszParmValue);
1164
1165         return debug_parse_levels(pszParmValue);
1166 }
1167
1168 bool handle_logfile(struct loadparm_context *lp_ctx, struct loadparm_service *service,
1169                     const char *pszParmValue, char **ptr)
1170 {
1171         if (lp_ctx->s3_fns == NULL) {
1172                 debug_set_logfile(pszParmValue);
1173         }
1174
1175         lpcfg_string_set(lp_ctx->globals->ctx, ptr, pszParmValue);
1176
1177         return true;
1178 }
1179
1180 /*
1181  * These special charset handling methods only run in the source3 code.
1182  */
1183
1184 bool handle_charset(struct loadparm_context *lp_ctx, struct loadparm_service *service,
1185                         const char *pszParmValue, char **ptr)
1186 {
1187         if (lp_ctx->s3_fns) {
1188                 if (*ptr == NULL || strcmp(*ptr, pszParmValue) != 0) {
1189                         global_iconv_handle = smb_iconv_handle_reinit(NULL,
1190                                                         lpcfg_dos_charset(lp_ctx),
1191                                                         lpcfg_unix_charset(lp_ctx),
1192                                                         true, global_iconv_handle);
1193                 }
1194
1195         }
1196         return lpcfg_string_set(lp_ctx->globals->ctx, ptr, pszParmValue);
1197
1198 }
1199
1200 bool handle_dos_charset(struct loadparm_context *lp_ctx, struct loadparm_service *service,
1201                         const char *pszParmValue, char **ptr)
1202 {
1203         bool is_utf8 = false;
1204         size_t len = strlen(pszParmValue);
1205
1206         if (lp_ctx->s3_fns) {
1207                 if (len == 4 || len == 5) {
1208                         /* Don't use StrCaseCmp here as we don't want to
1209                            initialize iconv. */
1210                         if ((toupper_m(pszParmValue[0]) == 'U') &&
1211                             (toupper_m(pszParmValue[1]) == 'T') &&
1212                             (toupper_m(pszParmValue[2]) == 'F')) {
1213                                 if (len == 4) {
1214                                         if (pszParmValue[3] == '8') {
1215                                                 is_utf8 = true;
1216                                         }
1217                                 } else {
1218                                         if (pszParmValue[3] == '-' &&
1219                                             pszParmValue[4] == '8') {
1220                                                 is_utf8 = true;
1221                                         }
1222                                 }
1223                         }
1224                 }
1225
1226                 if (*ptr == NULL || strcmp(*ptr, pszParmValue) != 0) {
1227                         if (is_utf8) {
1228                                 DEBUG(0,("ERROR: invalid DOS charset: 'dos charset' must not "
1229                                         "be UTF8, using (default value) %s instead.\n",
1230                                         DEFAULT_DOS_CHARSET));
1231                                 pszParmValue = DEFAULT_DOS_CHARSET;
1232                         }
1233                         global_iconv_handle = smb_iconv_handle_reinit(NULL,
1234                                                         lpcfg_dos_charset(lp_ctx),
1235                                                         lpcfg_unix_charset(lp_ctx),
1236                                                         true, global_iconv_handle);
1237                 }
1238         }
1239
1240         return lpcfg_string_set(lp_ctx->globals->ctx, ptr, pszParmValue);
1241 }
1242
1243 bool handle_printing(struct loadparm_context *lp_ctx, struct loadparm_service *service,
1244                             const char *pszParmValue, char **ptr)
1245 {
1246         static int parm_num = -1;
1247         struct loadparm_service *s;
1248
1249         if (parm_num == -1) {
1250                 parm_num = lpcfg_map_parameter("printing");
1251         }
1252
1253         if (!lp_set_enum_parm(&parm_table[parm_num], pszParmValue, (int*)ptr)) {
1254                 return false;
1255         }
1256
1257         if (lp_ctx->s3_fns) {
1258                 if (service == NULL) {
1259                         s = lp_ctx->sDefault;
1260                         lp_ctx->s3_fns->init_printer_values(lp_ctx->globals->ctx, s);
1261                 } else {
1262                         s = service;
1263                         lp_ctx->s3_fns->init_printer_values(s, s);
1264                 }
1265         }
1266
1267         return true;
1268 }
1269
1270 bool handle_ldap_debug_level(struct loadparm_context *lp_ctx, struct loadparm_service *service,
1271                              const char *pszParmValue, char **ptr)
1272 {
1273         lp_ctx->globals->ldap_debug_level = lp_int(pszParmValue);
1274
1275         if (lp_ctx->s3_fns) {
1276                 lp_ctx->s3_fns->init_ldap_debugging();
1277         }
1278         return true;
1279 }
1280
1281 bool handle_netbios_aliases(struct loadparm_context *lp_ctx, struct loadparm_service *service,
1282                             const char *pszParmValue, char **ptr)
1283 {
1284         TALLOC_FREE(lp_ctx->globals->netbios_aliases);
1285         lp_ctx->globals->netbios_aliases = (const char **)str_list_make_v3(lp_ctx->globals->ctx,
1286                                                                            pszParmValue, NULL);
1287
1288         if (lp_ctx->s3_fns) {
1289                 return lp_ctx->s3_fns->set_netbios_aliases(lp_ctx->globals->netbios_aliases);
1290         }
1291         return true;
1292 }
1293
1294 /*
1295  * idmap related parameters
1296  */
1297
1298 bool handle_idmap_backend(struct loadparm_context *lp_ctx, struct loadparm_service *service,
1299                           const char *pszParmValue, char **ptr)
1300 {
1301         if (lp_ctx->s3_fns) {
1302                 lp_do_parameter_parametric(lp_ctx, service, "idmap config * : backend",
1303                                            pszParmValue, 0);
1304         }
1305
1306         return lpcfg_string_set(lp_ctx->globals->ctx, ptr, pszParmValue);
1307 }
1308
1309 bool handle_idmap_uid(struct loadparm_context *lp_ctx, struct loadparm_service *service,
1310                       const char *pszParmValue, char **ptr)
1311 {
1312         if (lp_ctx->s3_fns) {
1313                 lp_do_parameter_parametric(lp_ctx, service, "idmap config * : range",
1314                                            pszParmValue, 0);
1315         }
1316
1317         return lpcfg_string_set(lp_ctx->globals->ctx, ptr, pszParmValue);
1318 }
1319
1320 bool handle_idmap_gid(struct loadparm_context *lp_ctx, struct loadparm_service *service,
1321                       const char *pszParmValue, char **ptr)
1322 {
1323         if (lp_ctx->s3_fns) {
1324                 lp_do_parameter_parametric(lp_ctx, service, "idmap config * : range",
1325                                            pszParmValue, 0);
1326         }
1327
1328         return lpcfg_string_set(lp_ctx->globals->ctx, ptr, pszParmValue);
1329 }
1330
1331 bool handle_smb_ports(struct loadparm_context *lp_ctx, struct loadparm_service *service,
1332                       const char *pszParmValue, char **ptr)
1333 {
1334         static int parm_num = -1;
1335         int i;
1336         const char **list;
1337
1338         if (!pszParmValue || !*pszParmValue) {
1339                 return false;
1340         }
1341
1342         if (parm_num == -1) {
1343                 parm_num = lpcfg_map_parameter("smb ports");
1344         }
1345
1346         if(!set_variable_helper(lp_ctx->globals->ctx, parm_num, ptr, "smb ports",
1347                                 pszParmValue)) {
1348                 return false;
1349         }
1350
1351         list = lp_ctx->globals->smb_ports;
1352         if (list == NULL) {
1353                 return false;
1354         }
1355
1356         /* Check that each port is a valid integer and within range */
1357         for (i = 0; list[i] != NULL; i++) {
1358                 char *end = NULL;
1359                 int port = 0;
1360                 port = strtol(list[i], &end, 10);
1361                 if (*end != '\0' || port <= 0 || port > 65535) {
1362                         TALLOC_FREE(list);
1363                         return false;
1364                 }
1365         }
1366
1367         return true;
1368 }
1369
1370 /***************************************************************************
1371  Initialise a copymap.
1372 ***************************************************************************/
1373
1374 void init_copymap(struct loadparm_service *pservice)
1375 {
1376         int i;
1377
1378         TALLOC_FREE(pservice->copymap);
1379
1380         pservice->copymap = bitmap_talloc(NULL, num_parameters());
1381         if (!pservice->copymap)
1382                 DEBUG(0,
1383                       ("Couldn't allocate copymap!! (size %d)\n",
1384                        (int)num_parameters()));
1385         else
1386                 for (i = 0; i < num_parameters(); i++)
1387                         bitmap_set(pservice->copymap, i);
1388 }
1389
1390 /**
1391  * Process a parametric option
1392  */
1393 static bool lp_do_parameter_parametric(struct loadparm_context *lp_ctx,
1394                                        struct loadparm_service *service,
1395                                        const char *pszParmName,
1396                                        const char *pszParmValue, int flags)
1397 {
1398         struct parmlist_entry **data;
1399         char *name;
1400         TALLOC_CTX *mem_ctx;
1401
1402         while (isspace((unsigned char)*pszParmName)) {
1403                 pszParmName++;
1404         }
1405
1406         name = strlower_talloc(lp_ctx, pszParmName);
1407         if (!name) return false;
1408
1409         if (service == NULL) {
1410                 data = &lp_ctx->globals->param_opt;
1411                 /**
1412                  * s3 code cannot deal with parametric options stored on the globals ctx.
1413                  */
1414                 if (lp_ctx->s3_fns != NULL) {
1415                         mem_ctx = NULL;
1416                 } else {
1417                         mem_ctx = lp_ctx->globals->ctx;
1418                 }
1419         } else {
1420                 data = &service->param_opt;
1421                 mem_ctx = service;
1422         }
1423
1424         set_param_opt(mem_ctx, data, name, pszParmValue, flags);
1425
1426         talloc_free(name);
1427
1428         return true;
1429 }
1430
1431 static bool set_variable_helper(TALLOC_CTX *mem_ctx, int parmnum, void *parm_ptr,
1432                          const char *pszParmName, const char *pszParmValue)
1433 {
1434         int i;
1435
1436         /* switch on the type of variable it is */
1437         switch (parm_table[parmnum].type)
1438         {
1439                 case P_BOOL: {
1440                         bool b;
1441                         if (!set_boolean(pszParmValue, &b)) {
1442                                 DEBUG(0, ("set_variable_helper(%s): value is not "
1443                                           "boolean!\n", pszParmValue));
1444                                 return false;
1445                         }
1446                         *(bool *)parm_ptr = b;
1447                         }
1448                         break;
1449
1450                 case P_BOOLREV: {
1451                         bool b;
1452                         if (!set_boolean(pszParmValue, &b)) {
1453                                 DEBUG(0, ("set_variable_helper(%s): value is not "
1454                                           "boolean!\n", pszParmValue));
1455                                 return false;
1456                         }
1457                         *(bool *)parm_ptr = !b;
1458                         }
1459                         break;
1460
1461                 case P_INTEGER:
1462                         *(int *)parm_ptr = lp_int(pszParmValue);
1463                         break;
1464
1465                 case P_CHAR:
1466                         *(char *)parm_ptr = *pszParmValue;
1467                         break;
1468
1469                 case P_OCTAL:
1470                         i = sscanf(pszParmValue, "%o", (int *)parm_ptr);
1471                         if ( i != 1 ) {
1472                                 DEBUG ( 0, ("Invalid octal number %s\n", pszParmName ));
1473                                 return false;
1474                         }
1475                         break;
1476
1477                 case P_BYTES:
1478                 {
1479                         uint64_t val;
1480                         if (conv_str_size_error(pszParmValue, &val)) {
1481                                 if (val <= INT_MAX) {
1482                                         *(int *)parm_ptr = (int)val;
1483                                         break;
1484                                 }
1485                         }
1486
1487                         DEBUG(0, ("set_variable_helper(%s): value is not "
1488                                   "a valid size specifier!\n", pszParmValue));
1489                         return false;
1490                 }
1491
1492                 case P_CMDLIST:
1493                         TALLOC_FREE(*(char ***)parm_ptr);
1494                         *(const char * const **)parm_ptr
1495                                 = (const char * const *)str_list_make_v3(mem_ctx,
1496                                                                          pszParmValue, NULL);
1497                         break;
1498
1499                 case P_LIST:
1500                 {
1501                         char **new_list = str_list_make_v3(mem_ctx,
1502                                                         pszParmValue, NULL);
1503                         if (new_list == NULL) {
1504                                 break;
1505                         }
1506
1507                         for (i=0; new_list[i]; i++) {
1508                                 if (*(const char ***)parm_ptr != NULL &&
1509                                     new_list[i][0] == '+' &&
1510                                     new_list[i][1])
1511                                 {
1512                                         if (!str_list_check(*(const char ***)parm_ptr,
1513                                                             &new_list[i][1])) {
1514                                                 *(const char ***)parm_ptr = str_list_add(*(const char ***)parm_ptr,
1515                                                                                          &new_list[i][1]);
1516                                         }
1517                                 } else if (*(const char ***)parm_ptr != NULL &&
1518                                            new_list[i][0] == '-' &&
1519                                            new_list[i][1])
1520                                 {
1521                                         str_list_remove(*(const char ***)parm_ptr,
1522                                                         &new_list[i][1]);
1523                                 } else {
1524                                         if (i != 0) {
1525                                                 DEBUG(0, ("Unsupported list syntax for: %s = %s\n",
1526                                                           pszParmName, pszParmValue));
1527                                                 return false;
1528                                         }
1529                                         *(const char * const **)parm_ptr = (const char * const *) new_list;
1530                                         break;
1531                                 }
1532                         }
1533                         break;
1534                 }
1535
1536                 case P_STRING:
1537                         lpcfg_string_set(mem_ctx, (char **)parm_ptr, pszParmValue);
1538                         break;
1539
1540                 case P_USTRING:
1541                         lpcfg_string_set_upper(mem_ctx, (char **)parm_ptr, pszParmValue);
1542                         break;
1543
1544                 case P_ENUM:
1545                         if (!lp_set_enum_parm(&parm_table[parmnum], pszParmValue, (int*)parm_ptr)) {
1546                                 return false;
1547                         }
1548                         break;
1549
1550                 case P_SEP:
1551                         break;
1552         }
1553
1554         return true;
1555
1556 }
1557
1558 bool set_variable(TALLOC_CTX *mem_ctx, struct loadparm_service *service, int parmnum, void *parm_ptr,
1559                          const char *pszParmName, const char *pszParmValue,
1560                          struct loadparm_context *lp_ctx, bool on_globals)
1561 {
1562         int i;
1563         bool ok;
1564
1565         /* if it is a special case then go ahead */
1566         if (parm_table[parmnum].special) {
1567                 ok = parm_table[parmnum].special(lp_ctx, service, pszParmValue,
1568                                                   (char **)parm_ptr);
1569                 if (!ok) {
1570                         return false;
1571                 }
1572                 goto mark_non_default;
1573         }
1574
1575         ok = set_variable_helper(mem_ctx, parmnum, parm_ptr, pszParmName, pszParmValue);
1576
1577         if (!ok) {
1578                 return false;
1579         }
1580
1581 mark_non_default:
1582         if (on_globals && (lp_ctx->flags[parmnum] & FLAG_DEFAULT)) {
1583                 lp_ctx->flags[parmnum] &= ~FLAG_DEFAULT;
1584                 /* we have to also unset FLAG_DEFAULT on aliases */
1585                 for (i=parmnum-1;i>=0 && parm_table[i].offset == parm_table[parmnum].offset;i--) {
1586                         lp_ctx->flags[i] &= ~FLAG_DEFAULT;
1587                 }
1588                 for (i=parmnum+1;i<num_parameters() && parm_table[i].offset == parm_table[parmnum].offset;i++) {
1589                         lp_ctx->flags[i] &= ~FLAG_DEFAULT;
1590                 }
1591         }
1592         return true;
1593 }
1594
1595
1596 bool lpcfg_do_global_parameter(struct loadparm_context *lp_ctx,
1597                                const char *pszParmName, const char *pszParmValue)
1598 {
1599         int parmnum = lpcfg_map_parameter(pszParmName);
1600         void *parm_ptr;
1601
1602         if (parmnum < 0) {
1603                 if (strchr(pszParmName, ':')) {
1604                         return lp_do_parameter_parametric(lp_ctx, NULL, pszParmName, pszParmValue, 0);
1605                 }
1606                 DEBUG(0, ("Ignoring unknown parameter \"%s\"\n", pszParmName));
1607                 return true;
1608         }
1609
1610         /* if the flag has been set on the command line, then don't allow override,
1611            but don't report an error */
1612         if (lp_ctx->flags[parmnum] & FLAG_CMDLINE) {
1613                 return true;
1614         }
1615
1616         if (parm_table[parmnum].flags & FLAG_DEPRECATED) {
1617                 DEBUG(1, ("WARNING: The \"%s\" option is deprecated\n",
1618                           pszParmName));
1619         }
1620
1621         parm_ptr = lpcfg_parm_ptr(lp_ctx, NULL, &parm_table[parmnum]);
1622
1623         return set_variable(lp_ctx->globals->ctx, NULL, parmnum, parm_ptr,
1624                             pszParmName, pszParmValue, lp_ctx, true);
1625 }
1626
1627 bool lpcfg_do_service_parameter(struct loadparm_context *lp_ctx,
1628                                 struct loadparm_service *service,
1629                                 const char *pszParmName, const char *pszParmValue)
1630 {
1631         void *parm_ptr;
1632         int i;
1633         int parmnum = lpcfg_map_parameter(pszParmName);
1634
1635         if (parmnum < 0) {
1636                 if (strchr(pszParmName, ':')) {
1637                         return lp_do_parameter_parametric(lp_ctx, service, pszParmName, pszParmValue, 0);
1638                 }
1639                 DEBUG(0, ("Ignoring unknown parameter \"%s\"\n", pszParmName));
1640                 return true;
1641         }
1642
1643         /* if the flag has been set on the command line, then don't allow override,
1644            but don't report an error */
1645         if (lp_ctx->flags[parmnum] & FLAG_CMDLINE) {
1646                 return true;
1647         }
1648
1649         if (parm_table[parmnum].flags & FLAG_DEPRECATED) {
1650                 DEBUG(1, ("WARNING: The \"%s\" option is deprecated\n",
1651                           pszParmName));
1652         }
1653
1654         if (parm_table[parmnum].p_class == P_GLOBAL) {
1655                 DEBUG(0,
1656                       ("Global parameter %s found in service section!\n",
1657                        pszParmName));
1658                 return true;
1659         }
1660         parm_ptr = ((char *)service) + parm_table[parmnum].offset;
1661
1662         if (!service->copymap)
1663                 init_copymap(service);
1664
1665         /* this handles the aliases - set the copymap for other
1666          * entries with the same data pointer */
1667         for (i = 0; parm_table[i].label; i++)
1668                 if (parm_table[i].offset == parm_table[parmnum].offset &&
1669                     parm_table[i].p_class == parm_table[parmnum].p_class)
1670                         bitmap_clear(service->copymap, i);
1671
1672         return set_variable(service, service, parmnum, parm_ptr, pszParmName,
1673                             pszParmValue, lp_ctx, false);
1674 }
1675
1676 /**
1677  * Process a parameter.
1678  */
1679
1680 bool lpcfg_do_parameter(const char *pszParmName, const char *pszParmValue,
1681                          void *userdata)
1682 {
1683         struct loadparm_context *lp_ctx = (struct loadparm_context *)userdata;
1684
1685         if (lp_ctx->bInGlobalSection)
1686                 return lpcfg_do_global_parameter(lp_ctx, pszParmName,
1687                                               pszParmValue);
1688         else
1689                 return lpcfg_do_service_parameter(lp_ctx, lp_ctx->currentService,
1690                                                   pszParmName, pszParmValue);
1691 }
1692
1693 /*
1694   variable argument do parameter
1695 */
1696 bool lpcfg_do_global_parameter_var(struct loadparm_context *lp_ctx, const char *pszParmName, const char *fmt, ...) PRINTF_ATTRIBUTE(3, 4);
1697 bool lpcfg_do_global_parameter_var(struct loadparm_context *lp_ctx,
1698                                 const char *pszParmName, const char *fmt, ...)
1699 {
1700         char *s;
1701         bool ret;
1702         va_list ap;
1703
1704         va_start(ap, fmt);
1705         s = talloc_vasprintf(NULL, fmt, ap);
1706         va_end(ap);
1707         ret = lpcfg_do_global_parameter(lp_ctx, pszParmName, s);
1708         talloc_free(s);
1709         return ret;
1710 }
1711
1712
1713 /*
1714   set a parameter from the commandline - this is called from command line parameter
1715   parsing code. It sets the parameter then marks the parameter as unable to be modified
1716   by smb.conf processing
1717 */
1718 bool lpcfg_set_cmdline(struct loadparm_context *lp_ctx, const char *pszParmName,
1719                        const char *pszParmValue)
1720 {
1721         int parmnum;
1722         int i;
1723
1724         while (isspace((unsigned char)*pszParmValue)) pszParmValue++;
1725
1726         parmnum = lpcfg_map_parameter(pszParmName);
1727
1728         if (parmnum < 0 && strchr(pszParmName, ':')) {
1729                 /* set a parametric option */
1730                 bool ok;
1731                 ok = lp_do_parameter_parametric(lp_ctx, NULL, pszParmName,
1732                                                 pszParmValue, FLAG_CMDLINE);
1733                 if (lp_ctx->s3_fns != NULL) {
1734                         if (ok) {
1735                                 lp_ctx->s3_fns->store_cmdline(pszParmName, pszParmValue);
1736                         }
1737                 }
1738                 return ok;
1739         }
1740
1741         if (parmnum < 0) {
1742                 DEBUG(0,("Unknown option '%s'\n", pszParmName));
1743                 return false;
1744         }
1745
1746         /* reset the CMDLINE flag in case this has been called before */
1747         lp_ctx->flags[parmnum] &= ~FLAG_CMDLINE;
1748
1749         if (lp_ctx->s3_fns != NULL) {
1750                 if (!lp_ctx->s3_fns->lp_do_parameter(-1, pszParmName, pszParmValue)) {
1751                         return false;
1752                 }
1753         } else {
1754                 if (!lpcfg_do_global_parameter(lp_ctx, pszParmName, pszParmValue)) {
1755                         return false;
1756                 }
1757         }
1758
1759         lp_ctx->flags[parmnum] |= FLAG_CMDLINE;
1760
1761         /* we have to also set FLAG_CMDLINE on aliases */
1762         for (i=parmnum-1;
1763              i>=0 && parm_table[i].p_class == parm_table[parmnum].p_class &&
1764              parm_table[i].offset == parm_table[parmnum].offset;
1765              i--) {
1766                 lp_ctx->flags[i] |= FLAG_CMDLINE;
1767         }
1768         for (i=parmnum+1;
1769              i<num_parameters() &&
1770              parm_table[i].p_class == parm_table[parmnum].p_class &&
1771              parm_table[i].offset == parm_table[parmnum].offset;
1772              i++) {
1773                 lp_ctx->flags[i] |= FLAG_CMDLINE;
1774         }
1775
1776         if (lp_ctx->s3_fns != NULL) {
1777                 lp_ctx->s3_fns->store_cmdline(pszParmName, pszParmValue);
1778         }
1779
1780         return true;
1781 }
1782
1783 /*
1784   set a option from the commandline in 'a=b' format. Use to support --option
1785 */
1786 bool lpcfg_set_option(struct loadparm_context *lp_ctx, const char *option)
1787 {
1788         char *p, *s;
1789         bool ret;
1790
1791         s = talloc_strdup(NULL, option);
1792         if (!s) {
1793                 return false;
1794         }
1795
1796         p = strchr(s, '=');
1797         if (!p) {
1798                 talloc_free(s);
1799                 return false;
1800         }
1801
1802         *p = 0;
1803
1804         ret = lpcfg_set_cmdline(lp_ctx, s, p+1);
1805         talloc_free(s);
1806         return ret;
1807 }
1808
1809
1810 #define BOOLSTR(b) ((b) ? "Yes" : "No")
1811
1812 /**
1813  * Print a parameter of the specified type.
1814  */
1815
1816 void lpcfg_print_parameter(struct parm_struct *p, void *ptr, FILE * f)
1817 {
1818         /* For the seperation of lists values that we print below */
1819         const char *list_sep = ", ";
1820         int i;
1821         switch (p->type)
1822         {
1823                 case P_ENUM:
1824                         for (i = 0; p->enum_list[i].name; i++) {
1825                                 if (*(int *)ptr == p->enum_list[i].value) {
1826                                         fprintf(f, "%s",
1827                                                 p->enum_list[i].name);
1828                                         break;
1829                                 }
1830                         }
1831                         break;
1832
1833                 case P_BOOL:
1834                         fprintf(f, "%s", BOOLSTR(*(bool *)ptr));
1835                         break;
1836
1837                 case P_BOOLREV:
1838                         fprintf(f, "%s", BOOLSTR(!*(bool *)ptr));
1839                         break;
1840
1841                 case P_INTEGER:
1842                 case P_BYTES:
1843                         fprintf(f, "%d", *(int *)ptr);
1844                         break;
1845
1846                 case P_CHAR:
1847                         fprintf(f, "%c", *(char *)ptr);
1848                         break;
1849
1850                 case P_OCTAL: {
1851                         int val = *(int *)ptr;
1852                         if (val == -1) {
1853                                 fprintf(f, "-1");
1854                         } else {
1855                                 fprintf(f, "0%03o", val);
1856                         }
1857                         break;
1858                 }
1859
1860                 case P_CMDLIST:
1861                         list_sep = " ";
1862                         /* fall through */
1863                 case P_LIST:
1864                         if ((char ***)ptr && *(char ***)ptr) {
1865                                 char **list = *(char ***)ptr;
1866                                 for (; *list; list++) {
1867                                         /* surround strings with whitespace in double quotes */
1868                                         if (*(list+1) == NULL) {
1869                                                 /* last item, no extra separator */
1870                                                 list_sep = "";
1871                                         }
1872                                         if ( strchr_m( *list, ' ' ) ) {
1873                                                 fprintf(f, "\"%s\"%s", *list, list_sep);
1874                                         } else {
1875                                                 fprintf(f, "%s%s", *list, list_sep);
1876                                         }
1877                                 }
1878                         }
1879                         break;
1880
1881                 case P_STRING:
1882                 case P_USTRING:
1883                         if (*(char **)ptr) {
1884                                 fprintf(f, "%s", *(char **)ptr);
1885                         }
1886                         break;
1887                 case P_SEP:
1888                         break;
1889         }
1890 }
1891
1892 /**
1893  * Check if two parameters are equal.
1894  */
1895
1896 static bool lpcfg_equal_parameter(parm_type type, void *ptr1, void *ptr2)
1897 {
1898         switch (type) {
1899                 case P_BOOL:
1900                 case P_BOOLREV:
1901                         return (*((bool *)ptr1) == *((bool *)ptr2));
1902
1903                 case P_INTEGER:
1904                 case P_ENUM:
1905                 case P_OCTAL:
1906                 case P_BYTES:
1907                         return (*((int *)ptr1) == *((int *)ptr2));
1908
1909                 case P_CHAR:
1910                         return (*((char *)ptr1) == *((char *)ptr2));
1911
1912                 case P_LIST:
1913                 case P_CMDLIST:
1914                         return str_list_equal(*(const char ***)ptr1, *(const char ***)ptr2);
1915
1916                 case P_STRING:
1917                 case P_USTRING:
1918                 {
1919                         char *p1 = *(char **)ptr1, *p2 = *(char **)ptr2;
1920                         if (p1 && !*p1)
1921                                 p1 = NULL;
1922                         if (p2 && !*p2)
1923                                 p2 = NULL;
1924                         return (p1 == p2 || strequal(p1, p2));
1925                 }
1926                 case P_SEP:
1927                         break;
1928         }
1929         return false;
1930 }
1931
1932 /**
1933  * Process a new section (service).
1934  *
1935  * At this stage all sections are services.
1936  * Later we'll have special sections that permit server parameters to be set.
1937  * Returns True on success, False on failure.
1938  */
1939
1940 static bool do_section(const char *pszSectionName, void *userdata)
1941 {
1942         struct loadparm_context *lp_ctx = (struct loadparm_context *)userdata;
1943         bool bRetval;
1944         bool isglobal;
1945
1946         if (lp_ctx->s3_fns != NULL) {
1947                 return lp_ctx->s3_fns->do_section(pszSectionName, lp_ctx);
1948         }
1949
1950         isglobal = ((strwicmp(pszSectionName, GLOBAL_NAME) == 0) ||
1951                          (strwicmp(pszSectionName, GLOBAL_NAME2) == 0));
1952
1953         bRetval = false;
1954
1955         /* if we've just struck a global section, note the fact. */
1956         lp_ctx->bInGlobalSection = isglobal;
1957
1958         /* check for multiple global sections */
1959         if (lp_ctx->bInGlobalSection) {
1960                 DEBUG(4, ("Processing section \"[%s]\"\n", pszSectionName));
1961                 return true;
1962         }
1963
1964         /* if we have a current service, tidy it up before moving on */
1965         bRetval = true;
1966
1967         if (lp_ctx->currentService != NULL)
1968                 bRetval = lpcfg_service_ok(lp_ctx->currentService);
1969
1970         /* if all is still well, move to the next record in the services array */
1971         if (bRetval) {
1972                 /* We put this here to avoid an odd message order if messages are */
1973                 /* issued by the post-processing of a previous section. */
1974                 DEBUG(4, ("Processing section \"[%s]\"\n", pszSectionName));
1975
1976                 if ((lp_ctx->currentService = lpcfg_add_service(lp_ctx, lp_ctx->sDefault,
1977                                                                    pszSectionName))
1978                     == NULL) {
1979                         DEBUG(0, ("Failed to add a new service\n"));
1980                         return false;
1981                 }
1982         }
1983
1984         return bRetval;
1985 }
1986
1987
1988 /**
1989  * Determine if a particular base parameter is currently set to the default value.
1990  */
1991
1992 static bool is_default(struct loadparm_service *sDefault, int i)
1993 {
1994         void *def_ptr = ((char *)sDefault) + parm_table[i].offset;
1995         switch (parm_table[i].type) {
1996                 case P_CMDLIST:
1997                 case P_LIST:
1998                         return str_list_equal((const char * const *)parm_table[i].def.lvalue,
1999                                               *(const char ***)def_ptr);
2000                 case P_STRING:
2001                 case P_USTRING:
2002                         return strequal(parm_table[i].def.svalue,
2003                                         *(char **)def_ptr);
2004                 case P_BOOL:
2005                 case P_BOOLREV:
2006                         return parm_table[i].def.bvalue ==
2007                                 *(bool *)def_ptr;
2008                 case P_INTEGER:
2009                 case P_CHAR:
2010                 case P_OCTAL:
2011                 case P_BYTES:
2012                 case P_ENUM:
2013                         return parm_table[i].def.ivalue ==
2014                                 *(int *)def_ptr;
2015                 case P_SEP:
2016                         break;
2017         }
2018         return false;
2019 }
2020
2021 /**
2022  *Display the contents of the global structure.
2023  */
2024
2025 static void dump_globals(struct loadparm_context *lp_ctx, FILE *f,
2026                          bool show_defaults)
2027 {
2028         int i;
2029         struct parmlist_entry *data;
2030
2031         fprintf(f, "# Global parameters\n[global]\n");
2032
2033         for (i = 0; parm_table[i].label; i++)
2034                 if (parm_table[i].p_class == P_GLOBAL &&
2035                     (i == 0 || (parm_table[i].offset != parm_table[i - 1].offset))) {
2036                         if (!show_defaults && (lp_ctx->flags[i] & FLAG_DEFAULT))
2037                                 continue;
2038                         fprintf(f, "\t%s = ", parm_table[i].label);
2039                         lpcfg_print_parameter(&parm_table[i], lpcfg_parm_ptr(lp_ctx, NULL, &parm_table[i]), f);
2040                         fprintf(f, "\n");
2041         }
2042         if (lp_ctx->globals->param_opt != NULL) {
2043                 for (data = lp_ctx->globals->param_opt; data;
2044                      data = data->next) {
2045                         if (!show_defaults && (data->priority & FLAG_DEFAULT)) {
2046                                 continue;
2047                         }
2048                         fprintf(f, "\t%s = %s\n", data->key, data->value);
2049                 }
2050         }
2051
2052 }
2053
2054 /**
2055  * Display the contents of a single services record.
2056  */
2057
2058 void lpcfg_dump_a_service(struct loadparm_service * pService, struct loadparm_service *sDefault, FILE * f,
2059                           unsigned int *flags, bool show_defaults)
2060 {
2061         int i;
2062         struct parmlist_entry *data;
2063
2064         if (pService != sDefault)
2065                 fprintf(f, "\n[%s]\n", pService->szService);
2066
2067         for (i = 0; parm_table[i].label; i++) {
2068                 if (parm_table[i].p_class == P_LOCAL &&
2069                     (*parm_table[i].label != '-') &&
2070                     (i == 0 || (parm_table[i].offset != parm_table[i - 1].offset)))
2071                 {
2072                         if (pService == sDefault) {
2073                                 if (flags && (flags[i] & FLAG_DEFAULT)) {
2074                                         continue;
2075                                 }
2076                                 if (!show_defaults) {
2077                                         if (is_default(sDefault, i)) {
2078                                                 continue;
2079                                         }
2080                                 }
2081                         } else {
2082                                 if (lpcfg_equal_parameter(parm_table[i].type,
2083                                                           ((char *)pService) +
2084                                                           parm_table[i].offset,
2085                                                           ((char *)sDefault) +
2086                                                           parm_table[i].offset))
2087                                         continue;
2088                         }
2089
2090                         fprintf(f, "\t%s = ", parm_table[i].label);
2091                         lpcfg_print_parameter(&parm_table[i],
2092                                         ((char *)pService) + parm_table[i].offset, f);
2093                         fprintf(f, "\n");
2094                 }
2095         }
2096         if (pService->param_opt != NULL) {
2097                 for (data = pService->param_opt; data; data = data->next) {
2098                         if (!show_defaults && (data->priority & FLAG_DEFAULT)) {
2099                                 continue;
2100                         }
2101                         fprintf(f, "\t%s = %s\n", data->key, data->value);
2102                 }
2103         }
2104 }
2105
2106 bool lpcfg_dump_a_parameter(struct loadparm_context *lp_ctx,
2107                             struct loadparm_service *service,
2108                             const char *parm_name, FILE * f)
2109 {
2110         struct parm_struct *parm;
2111         void *ptr;
2112         char *local_parm_name;
2113         char *parm_opt;
2114         const char *parm_opt_value;
2115
2116         /* check for parametrical option */
2117         local_parm_name = talloc_strdup(lp_ctx, parm_name);
2118         if (local_parm_name == NULL) {
2119                 return false;
2120         }
2121
2122         parm_opt = strchr( local_parm_name, ':');
2123
2124         if (parm_opt) {
2125                 *parm_opt = '\0';
2126                 parm_opt++;
2127                 if (strlen(parm_opt)) {
2128                         parm_opt_value = lpcfg_parm_string(lp_ctx, service,
2129                                 local_parm_name, parm_opt);
2130                         if (parm_opt_value) {
2131                                 fprintf(f, "%s\n", parm_opt_value);
2132                                 return true;
2133                         }
2134                 }
2135                 return false;
2136         }
2137
2138         /* parameter is not parametric, search the table */
2139         parm = lpcfg_parm_struct(lp_ctx, parm_name);
2140         if (!parm) {
2141                 return false;
2142         }
2143
2144         if (service != NULL && parm->p_class == P_GLOBAL) {
2145                 return false;
2146         }
2147
2148         ptr = lpcfg_parm_ptr(lp_ctx, service,parm);
2149
2150         lpcfg_print_parameter(parm, ptr, f);
2151         fprintf(f, "\n");
2152         return true;
2153 }
2154
2155 /**
2156  * Auto-load some home services.
2157  */
2158 static void lpcfg_add_auto_services(struct loadparm_context *lp_ctx,
2159                                     const char *str)
2160 {
2161         return;
2162 }
2163
2164
2165 /**
2166  * Unload unused services.
2167  */
2168
2169 void lpcfg_killunused(struct loadparm_context *lp_ctx,
2170                    struct smbsrv_connection *smb,
2171                    bool (*snumused) (struct smbsrv_connection *, int))
2172 {
2173         int i;
2174         for (i = 0; i < lp_ctx->iNumServices; i++) {
2175                 if (lp_ctx->services[i] == NULL)
2176                         continue;
2177
2178                 if (!snumused || !snumused(smb, i)) {
2179                         talloc_free(lp_ctx->services[i]);
2180                         lp_ctx->services[i] = NULL;
2181                 }
2182         }
2183 }
2184
2185
2186 static int lpcfg_destructor(struct loadparm_context *lp_ctx)
2187 {
2188         struct parmlist_entry *data;
2189
2190         if (lp_ctx->refuse_free) {
2191                 /* someone is trying to free the
2192                    global_loadparm_context.
2193                    We can't allow that. */
2194                 return -1;
2195         }
2196
2197         if (lp_ctx->globals->param_opt != NULL) {
2198                 struct parmlist_entry *next;
2199                 for (data = lp_ctx->globals->param_opt; data; data=next) {
2200                         next = data->next;
2201                         if (data->priority & FLAG_CMDLINE) continue;
2202                         DLIST_REMOVE(lp_ctx->globals->param_opt, data);
2203                         talloc_free(data);
2204                 }
2205         }
2206
2207         return 0;
2208 }
2209
2210 /**
2211  * Initialise the global parameter structure.
2212  *
2213  * Note that most callers should use loadparm_init_global() instead
2214  */
2215 struct loadparm_context *loadparm_init(TALLOC_CTX *mem_ctx)
2216 {
2217         int i;
2218         char *myname;
2219         struct loadparm_context *lp_ctx;
2220         struct parmlist_entry *parm;
2221         char *logfile;
2222
2223         lp_ctx = talloc_zero(mem_ctx, struct loadparm_context);
2224         if (lp_ctx == NULL)
2225                 return NULL;
2226
2227         talloc_set_destructor(lp_ctx, lpcfg_destructor);
2228         lp_ctx->bInGlobalSection = true;
2229         lp_ctx->globals = talloc_zero(lp_ctx, struct loadparm_global);
2230         /* This appears odd, but globals in s3 isn't a pointer */
2231         lp_ctx->globals->ctx = lp_ctx->globals;
2232         lp_ctx->sDefault = talloc_zero(lp_ctx, struct loadparm_service);
2233         lp_ctx->flags = talloc_zero_array(lp_ctx, unsigned int, num_parameters());
2234
2235         lp_ctx->sDefault->iMaxPrintJobs = 1000;
2236         lp_ctx->sDefault->bAvailable = true;
2237         lp_ctx->sDefault->browseable = true;
2238         lp_ctx->sDefault->read_only = true;
2239         lp_ctx->sDefault->map_archive = true;
2240         lp_ctx->sDefault->strict_locking = true;
2241         lp_ctx->sDefault->oplocks = true;
2242         lp_ctx->sDefault->create_mask = 0744;
2243         lp_ctx->sDefault->force_create_mode = 0000;
2244         lp_ctx->sDefault->directory_mask = 0755;
2245         lp_ctx->sDefault->force_directory_mode = 0000;
2246
2247         DEBUG(3, ("Initialising global parameters\n"));
2248
2249         for (i = 0; parm_table[i].label; i++) {
2250                 if ((parm_table[i].type == P_STRING ||
2251                      parm_table[i].type == P_USTRING) &&
2252                     !(lp_ctx->flags[i] & FLAG_CMDLINE)) {
2253                         char **r;
2254                         if (parm_table[i].p_class == P_LOCAL) {
2255                                 r = (char **)(((char *)lp_ctx->sDefault) + parm_table[i].offset);
2256                         } else {
2257                                 r = (char **)(((char *)lp_ctx->globals) + parm_table[i].offset);
2258                         }
2259                         *r = talloc_strdup(lp_ctx, "");
2260                 }
2261         }
2262
2263         logfile = talloc_asprintf(lp_ctx, "%s/log.samba", dyn_LOGFILEBASE);
2264         lpcfg_do_global_parameter(lp_ctx, "log file", logfile);
2265         talloc_free(logfile);
2266
2267         lpcfg_do_global_parameter(lp_ctx, "log level", "0");
2268
2269         lpcfg_do_global_parameter(lp_ctx, "syslog", "1");
2270         lpcfg_do_global_parameter(lp_ctx, "syslog only", "No");
2271         lpcfg_do_global_parameter(lp_ctx, "debug timestamp", "Yes");
2272         lpcfg_do_global_parameter(lp_ctx, "debug prefix timestamp", "No");
2273         lpcfg_do_global_parameter(lp_ctx, "debug hires timestamp", "Yes");
2274         lpcfg_do_global_parameter(lp_ctx, "debug pid", "No");
2275         lpcfg_do_global_parameter(lp_ctx, "debug uid", "No");
2276         lpcfg_do_global_parameter(lp_ctx, "debug class", "No");
2277
2278         lpcfg_do_global_parameter(lp_ctx, "share backend", "classic");
2279
2280         lpcfg_do_global_parameter(lp_ctx, "server role", "auto");
2281         lpcfg_do_global_parameter(lp_ctx, "domain logons", "No");
2282         lpcfg_do_global_parameter(lp_ctx, "domain master", "Auto");
2283
2284         /* options that can be set on the command line must be initialised via
2285            the slower lpcfg_do_global_parameter() to ensure that FLAG_CMDLINE is obeyed */
2286 #ifdef TCP_NODELAY
2287         lpcfg_do_global_parameter(lp_ctx, "socket options", "TCP_NODELAY");
2288 #endif
2289         lpcfg_do_global_parameter(lp_ctx, "workgroup", DEFAULT_WORKGROUP);
2290         myname = get_myname(lp_ctx);
2291         lpcfg_do_global_parameter(lp_ctx, "netbios name", myname);
2292         talloc_free(myname);
2293         lpcfg_do_global_parameter(lp_ctx, "name resolve order", "lmhosts wins host bcast");
2294
2295         lpcfg_do_global_parameter(lp_ctx, "fstype", "NTFS");
2296
2297         lpcfg_do_global_parameter(lp_ctx, "ntvfs handler", "unixuid default");
2298         lpcfg_do_global_parameter(lp_ctx, "max connections", "0");
2299
2300         lpcfg_do_global_parameter(lp_ctx, "dcerpc endpoint servers", "epmapper wkssvc rpcecho samr netlogon lsarpc spoolss drsuapi dssetup unixinfo browser eventlog6 backupkey dnsserver");
2301         lpcfg_do_global_parameter(lp_ctx, "server services", "s3fs rpc nbt wrepl ldap cldap kdc drepl winbindd ntp_signd kcc dnsupdate dns");
2302         lpcfg_do_global_parameter(lp_ctx, "kccsrv:samba_kcc", "true");
2303         /* the winbind method for domain controllers is for both RODC
2304            auth forwarding and for trusted domains */
2305         lpcfg_do_global_parameter(lp_ctx, "private dir", dyn_PRIVATE_DIR);
2306         lpcfg_do_global_parameter(lp_ctx, "registry:HKEY_LOCAL_MACHINE", "hklm.ldb");
2307
2308         /* This hive should be dynamically generated by Samba using
2309            data from the sam, but for the moment leave it in a tdb to
2310            keep regedt32 from popping up an annoying dialog. */
2311         lpcfg_do_global_parameter(lp_ctx, "registry:HKEY_USERS", "hku.ldb");
2312
2313         /* using UTF8 by default allows us to support all chars */
2314         lpcfg_do_global_parameter(lp_ctx, "unix charset", "UTF-8");
2315
2316         /* Use codepage 850 as a default for the dos character set */
2317         lpcfg_do_global_parameter(lp_ctx, "dos charset", "CP850");
2318
2319         /*
2320          * Allow the default PASSWD_CHAT to be overridden in local.h.
2321          */
2322         lpcfg_do_global_parameter(lp_ctx, "passwd chat", DEFAULT_PASSWD_CHAT);
2323
2324         lpcfg_do_global_parameter(lp_ctx, "pid directory", dyn_PIDDIR);
2325         lpcfg_do_global_parameter(lp_ctx, "lock dir", dyn_LOCKDIR);
2326         lpcfg_do_global_parameter(lp_ctx, "state directory", dyn_STATEDIR);
2327         lpcfg_do_global_parameter(lp_ctx, "cache directory", dyn_CACHEDIR);
2328         lpcfg_do_global_parameter(lp_ctx, "ncalrpc dir", dyn_NCALRPCDIR);
2329
2330         lpcfg_do_global_parameter(lp_ctx, "nbt client socket address", "0.0.0.0");
2331         lpcfg_do_global_parameter_var(lp_ctx, "server string",
2332                                    "Samba %s", SAMBA_VERSION_STRING);
2333
2334         lpcfg_do_global_parameter(lp_ctx, "password server", "*");
2335
2336         lpcfg_do_global_parameter(lp_ctx, "max mux", "50");
2337         lpcfg_do_global_parameter(lp_ctx, "max xmit", "16644");
2338         lpcfg_do_global_parameter(lp_ctx, "host msdfs", "true");
2339
2340         lpcfg_do_global_parameter(lp_ctx, "LargeReadwrite", "True");
2341         lpcfg_do_global_parameter(lp_ctx, "server min protocol", "LANMAN1");
2342         lpcfg_do_global_parameter(lp_ctx, "server max protocol", "SMB3");
2343         lpcfg_do_global_parameter(lp_ctx, "client min protocol", "CORE");
2344         lpcfg_do_global_parameter(lp_ctx, "client max protocol", "NT1");
2345         lpcfg_do_global_parameter(lp_ctx, "security", "AUTO");
2346         lpcfg_do_global_parameter(lp_ctx, "EncryptPasswords", "True");
2347         lpcfg_do_global_parameter(lp_ctx, "ReadRaw", "True");
2348         lpcfg_do_global_parameter(lp_ctx, "WriteRaw", "True");
2349         lpcfg_do_global_parameter(lp_ctx, "NullPasswords", "False");
2350         lpcfg_do_global_parameter(lp_ctx, "old password allowed period", "60");
2351         lpcfg_do_global_parameter(lp_ctx, "ObeyPamRestrictions", "False");
2352
2353         lpcfg_do_global_parameter(lp_ctx, "TimeServer", "False");
2354         lpcfg_do_global_parameter(lp_ctx, "BindInterfacesOnly", "False");
2355         lpcfg_do_global_parameter(lp_ctx, "Unicode", "True");
2356         lpcfg_do_global_parameter(lp_ctx, "ClientLanManAuth", "False");
2357         lpcfg_do_global_parameter(lp_ctx, "ClientNTLMv2Auth", "True");
2358         lpcfg_do_global_parameter(lp_ctx, "LanmanAuth", "False");
2359         lpcfg_do_global_parameter(lp_ctx, "NTLMAuth", "True");
2360         lpcfg_do_global_parameter(lp_ctx, "client use spnego principal", "False");
2361
2362         lpcfg_do_global_parameter(lp_ctx, "UnixExtensions", "True");
2363
2364         lpcfg_do_global_parameter(lp_ctx, "PreferredMaster", "Auto");
2365         lpcfg_do_global_parameter(lp_ctx, "LocalMaster", "True");
2366
2367         lpcfg_do_global_parameter(lp_ctx, "wins support", "False");
2368         lpcfg_do_global_parameter(lp_ctx, "dns proxy", "True");
2369
2370         lpcfg_do_global_parameter(lp_ctx, "winbind separator", "\\");
2371         lpcfg_do_global_parameter(lp_ctx, "winbind sealed pipes", "True");
2372         lpcfg_do_global_parameter(lp_ctx, "require strong key", "True");
2373         lpcfg_do_global_parameter(lp_ctx, "winbindd socket directory", dyn_WINBINDD_SOCKET_DIR);
2374         lpcfg_do_global_parameter(lp_ctx, "winbindd privileged socket directory", dyn_WINBINDD_PRIVILEGED_SOCKET_DIR);
2375         lpcfg_do_global_parameter(lp_ctx, "ntp signd socket directory", dyn_NTP_SIGND_SOCKET_DIR);
2376         lpcfg_do_global_parameter_var(lp_ctx, "dns update command", "%s/samba_dnsupdate", dyn_SCRIPTSBINDIR);
2377         lpcfg_do_global_parameter_var(lp_ctx, "spn update command", "%s/samba_spnupdate", dyn_SCRIPTSBINDIR);
2378         lpcfg_do_global_parameter_var(lp_ctx, "samba kcc command",
2379                                         "%s/samba_kcc", dyn_SCRIPTSBINDIR);
2380         lpcfg_do_global_parameter(lp_ctx, "template shell", "/bin/false");
2381         lpcfg_do_global_parameter(lp_ctx, "template homedir", "/home/%D/%U");
2382
2383         lpcfg_do_global_parameter(lp_ctx, "client signing", "default");
2384         lpcfg_do_global_parameter(lp_ctx, "server signing", "default");
2385
2386         lpcfg_do_global_parameter(lp_ctx, "use spnego", "True");
2387
2388         lpcfg_do_global_parameter(lp_ctx, "use mmap", "True");
2389
2390         lpcfg_do_global_parameter(lp_ctx, "smb ports", "445 139");
2391         lpcfg_do_global_parameter(lp_ctx, "nbt port", "137");
2392         lpcfg_do_global_parameter(lp_ctx, "dgram port", "138");
2393         lpcfg_do_global_parameter(lp_ctx, "cldap port", "389");
2394         lpcfg_do_global_parameter(lp_ctx, "krb5 port", "88");
2395         lpcfg_do_global_parameter(lp_ctx, "kpasswd port", "464");
2396         lpcfg_do_global_parameter(lp_ctx, "web port", "901");
2397
2398         lpcfg_do_global_parameter(lp_ctx, "nt status support", "True");
2399
2400         lpcfg_do_global_parameter(lp_ctx, "max wins ttl", "518400"); /* 6 days */
2401         lpcfg_do_global_parameter(lp_ctx, "min wins ttl", "21600");
2402
2403         lpcfg_do_global_parameter(lp_ctx, "tls enabled", "True");
2404         lpcfg_do_global_parameter(lp_ctx, "tls keyfile", "tls/key.pem");
2405         lpcfg_do_global_parameter(lp_ctx, "tls certfile", "tls/cert.pem");
2406         lpcfg_do_global_parameter(lp_ctx, "tls cafile", "tls/ca.pem");
2407         lpcfg_do_global_parameter(lp_ctx, "prefork children:smb", "4");
2408
2409         lpcfg_do_global_parameter(lp_ctx, "rndc command", "/usr/sbin/rndc");
2410         lpcfg_do_global_parameter(lp_ctx, "nsupdate command", "/usr/bin/nsupdate -g");
2411
2412         lpcfg_do_global_parameter(lp_ctx, "allow dns updates", "secure only");
2413         lpcfg_do_global_parameter(lp_ctx, "dns forwarder", "");
2414
2415         lpcfg_do_global_parameter(lp_ctx, "algorithmic rid base", "1000");
2416
2417         lpcfg_do_global_parameter(lp_ctx, "enhanced browsing", "True");
2418
2419         lpcfg_do_global_parameter(lp_ctx, "winbind nss info", "template");
2420
2421         lpcfg_do_global_parameter(lp_ctx, "server schannel", "Auto");
2422
2423         lpcfg_do_global_parameter(lp_ctx, "short preserve case", "True");
2424
2425         lpcfg_do_global_parameter(lp_ctx, "max open files", "16384");
2426
2427         lpcfg_do_global_parameter(lp_ctx, "cups connection timeout", "30");
2428
2429         lpcfg_do_global_parameter(lp_ctx, "locking", "True");
2430
2431         lpcfg_do_global_parameter(lp_ctx, "block size", "1024");
2432
2433         lpcfg_do_global_parameter(lp_ctx, "client use spnego", "True");
2434
2435         lpcfg_do_global_parameter(lp_ctx, "change notify", "True");
2436
2437         lpcfg_do_global_parameter(lp_ctx, "name cache timeout", "660");
2438
2439         lpcfg_do_global_parameter(lp_ctx, "defer sharing violations", "True");
2440
2441         lpcfg_do_global_parameter(lp_ctx, "ldap replication sleep", "1000");
2442
2443         lpcfg_do_global_parameter(lp_ctx, "idmap backend", "tdb");
2444
2445         lpcfg_do_global_parameter(lp_ctx, "enable privileges", "True");
2446
2447         lpcfg_do_global_parameter_var(lp_ctx, "smb2 max write", "%u", DEFAULT_SMB2_MAX_WRITE);
2448
2449         lpcfg_do_global_parameter(lp_ctx, "passdb backend", "tdbsam");
2450
2451         lpcfg_do_global_parameter(lp_ctx, "getwd cache", "True");
2452
2453         lpcfg_do_global_parameter(lp_ctx, "winbind nested groups", "True");
2454
2455         lpcfg_do_global_parameter(lp_ctx, "mangled names", "True");
2456
2457         lpcfg_do_global_parameter_var(lp_ctx, "smb2 max credits", "%u", DEFAULT_SMB2_MAX_CREDITS);
2458
2459         lpcfg_do_global_parameter(lp_ctx, "ldap ssl", "start tls");
2460
2461         lpcfg_do_global_parameter(lp_ctx, "ldap deref", "auto");
2462
2463         lpcfg_do_global_parameter(lp_ctx, "lm interval", "60");
2464
2465         lpcfg_do_global_parameter(lp_ctx, "mangling method", "hash2");
2466
2467         lpcfg_do_global_parameter(lp_ctx, "hide dot files", "True");
2468
2469         lpcfg_do_global_parameter(lp_ctx, "browse list", "True");
2470
2471         lpcfg_do_global_parameter(lp_ctx, "passwd chat timeout", "2");
2472
2473         lpcfg_do_global_parameter(lp_ctx, "guest account", GUEST_ACCOUNT);
2474
2475         lpcfg_do_global_parameter(lp_ctx, "client schannel", "auto");
2476
2477         lpcfg_do_global_parameter(lp_ctx, "smb encrypt", "default");
2478
2479         lpcfg_do_global_parameter(lp_ctx, "max log size", "5000");
2480
2481         lpcfg_do_global_parameter(lp_ctx, "idmap negative cache time", "120");
2482
2483         lpcfg_do_global_parameter(lp_ctx, "ldap follow referral", "auto");
2484
2485         lpcfg_do_global_parameter(lp_ctx, "multicast dns register", "yes");
2486
2487         lpcfg_do_global_parameter(lp_ctx, "winbind reconnect delay", "30");
2488
2489         lpcfg_do_global_parameter(lp_ctx, "winbind request timeout", "60");
2490
2491         lpcfg_do_global_parameter(lp_ctx, "nt acl support", "yes");
2492
2493         lpcfg_do_global_parameter(lp_ctx, "acl check permissions", "yes");
2494
2495         lpcfg_do_global_parameter(lp_ctx, "keepalive", "300");
2496
2497         lpcfg_do_global_parameter(lp_ctx, "winbind cache time", "300");
2498
2499         lpcfg_do_global_parameter(lp_ctx, "level2 oplocks", "yes");
2500
2501         lpcfg_do_global_parameter(lp_ctx, "show add printer wizard", "yes");
2502
2503         lpcfg_do_global_parameter(lp_ctx, "allocation roundup size", "1048576");
2504
2505         lpcfg_do_global_parameter(lp_ctx, "ldap page size", "1024");
2506
2507         lpcfg_do_global_parameter(lp_ctx, "kernel share modes", "yes");
2508
2509         lpcfg_do_global_parameter(lp_ctx, "strict locking", "Auto");
2510
2511         lpcfg_do_global_parameter(lp_ctx, "map readonly", "yes");
2512
2513         lpcfg_do_global_parameter(lp_ctx, "allow trusted domains", "yes");
2514
2515         lpcfg_do_global_parameter(lp_ctx, "default devmode", "yes");
2516
2517         lpcfg_do_global_parameter(lp_ctx, "os level", "20");
2518
2519         lpcfg_do_global_parameter(lp_ctx, "dos filetimes", "yes");
2520
2521         lpcfg_do_global_parameter(lp_ctx, "mangling char", "~");
2522
2523         lpcfg_do_global_parameter(lp_ctx, "printcap cache time", "750");
2524
2525         lpcfg_do_global_parameter(lp_ctx, "create krb5 conf", "yes");
2526
2527         lpcfg_do_global_parameter(lp_ctx, "winbind max clients", "200");
2528
2529         lpcfg_do_global_parameter(lp_ctx, "acl map full control", "yes");
2530
2531         lpcfg_do_global_parameter(lp_ctx, "nt pipe support", "yes");
2532
2533         lpcfg_do_global_parameter(lp_ctx, "ldap debug threshold", "10");
2534
2535         lpcfg_do_global_parameter(lp_ctx, "follow symlinks", "yes");
2536
2537         lpcfg_do_global_parameter(lp_ctx, "machine password timeout", "604800");
2538
2539         lpcfg_do_global_parameter(lp_ctx, "ldap connection timeout", "2");
2540
2541         lpcfg_do_global_parameter(lp_ctx, "winbind expand groups", "1");
2542
2543         lpcfg_do_global_parameter(lp_ctx, "stat cache", "yes");
2544
2545         lpcfg_do_global_parameter(lp_ctx, "lpq cache time", "30");
2546
2547         lpcfg_do_global_parameter_var(lp_ctx, "smb2 max trans", "%u", DEFAULT_SMB2_MAX_TRANSACT);
2548
2549         lpcfg_do_global_parameter_var(lp_ctx, "smb2 max read", "%u", DEFAULT_SMB2_MAX_READ);
2550
2551         lpcfg_do_global_parameter(lp_ctx, "durable handles", "yes");
2552
2553         lpcfg_do_global_parameter(lp_ctx, "max stat cache size", "256");
2554
2555         lpcfg_do_global_parameter(lp_ctx, "ldap passwd sync", "no");
2556
2557         lpcfg_do_global_parameter(lp_ctx, "kernel change notify", "yes");
2558
2559         lpcfg_do_global_parameter(lp_ctx, "max ttl", "259200");
2560
2561         lpcfg_do_global_parameter(lp_ctx, "blocking locks", "yes");
2562
2563         lpcfg_do_global_parameter(lp_ctx, "oplock contention limit", "2");
2564
2565         lpcfg_do_global_parameter(lp_ctx, "load printers", "yes");
2566
2567         lpcfg_do_global_parameter(lp_ctx, "idmap cache time", "604800");
2568
2569         lpcfg_do_global_parameter(lp_ctx, "preserve case", "yes");
2570
2571         lpcfg_do_global_parameter(lp_ctx, "lm announce", "auto");
2572
2573         lpcfg_do_global_parameter(lp_ctx, "afs token lifetime", "604800");
2574
2575         lpcfg_do_global_parameter(lp_ctx, "enable core files", "yes");
2576
2577         lpcfg_do_global_parameter(lp_ctx, "winbind max domain connections", "1");
2578
2579         lpcfg_do_global_parameter(lp_ctx, "case sensitive", "auto");
2580
2581         lpcfg_do_global_parameter(lp_ctx, "ldap timeout", "15");
2582
2583         lpcfg_do_global_parameter(lp_ctx, "mangle prefix", "1");
2584
2585         lpcfg_do_global_parameter(lp_ctx, "posix locking", "yes");
2586
2587         lpcfg_do_global_parameter(lp_ctx, "lock spin time", "200");
2588
2589         lpcfg_do_global_parameter(lp_ctx, "directory name cache size", "100");
2590
2591         lpcfg_do_global_parameter(lp_ctx, "nmbd bind explicit broadcast", "yes");
2592
2593         lpcfg_do_global_parameter(lp_ctx, "init logon delay", "100");
2594
2595         lpcfg_do_global_parameter(lp_ctx, "usershare owner only", "yes");
2596
2597         lpcfg_do_global_parameter(lp_ctx, "-valid", "yes");
2598
2599         lpcfg_do_global_parameter_var(lp_ctx, "usershare path", "%s/usershares", get_dyn_STATEDIR());
2600
2601 #ifdef DEVELOPER
2602         lpcfg_do_global_parameter_var(lp_ctx, "panic action", "/bin/sleep 999999999");
2603 #endif
2604
2605         lpcfg_do_global_parameter(lp_ctx, "smb passwd file", get_dyn_SMB_PASSWD_FILE());
2606
2607         lpcfg_do_global_parameter(lp_ctx, "logon home", "\\\\%N\\%U");
2608
2609         lpcfg_do_global_parameter(lp_ctx, "logon path", "\\\\%N\\%U\\profile");
2610
2611         lpcfg_do_global_parameter(lp_ctx, "printjob username", "%U");
2612
2613         for (i = 0; parm_table[i].label; i++) {
2614                 if (!(lp_ctx->flags[i] & FLAG_CMDLINE)) {
2615                         lp_ctx->flags[i] |= FLAG_DEFAULT;
2616                 }
2617         }
2618
2619         for (parm=lp_ctx->globals->param_opt; parm; parm=parm->next) {
2620                 if (!(parm->priority & FLAG_CMDLINE)) {
2621                         parm->priority |= FLAG_DEFAULT;
2622                 }
2623         }
2624
2625         for (parm=lp_ctx->sDefault->param_opt; parm; parm=parm->next) {
2626                 if (!(parm->priority & FLAG_CMDLINE)) {
2627                         parm->priority |= FLAG_DEFAULT;
2628                 }
2629         }
2630
2631
2632         return lp_ctx;
2633 }
2634
2635 /**
2636  * Initialise the global parameter structure.
2637  */
2638 struct loadparm_context *loadparm_init_global(bool load_default)
2639 {
2640         if (global_loadparm_context == NULL) {
2641                 global_loadparm_context = loadparm_init(NULL);
2642         }
2643         if (global_loadparm_context == NULL) {
2644                 return NULL;
2645         }
2646         global_loadparm_context->global = true;
2647         if (load_default && !global_loadparm_context->loaded) {
2648                 lpcfg_load_default(global_loadparm_context);
2649         }
2650         global_loadparm_context->refuse_free = true;
2651         return global_loadparm_context;
2652 }
2653
2654 /**
2655  * Initialise the global parameter structure.
2656  */
2657 struct loadparm_context *loadparm_init_s3(TALLOC_CTX *mem_ctx,
2658                                           const struct loadparm_s3_helpers *s3_fns)
2659 {
2660         struct loadparm_context *loadparm_context = talloc_zero(mem_ctx, struct loadparm_context);
2661         if (!loadparm_context) {
2662                 return NULL;
2663         }
2664         loadparm_context->s3_fns = s3_fns;
2665         loadparm_context->globals = s3_fns->globals;
2666         loadparm_context->flags = s3_fns->flags;
2667
2668         return loadparm_context;
2669 }
2670
2671 const char *lpcfg_configfile(struct loadparm_context *lp_ctx)
2672 {
2673         return lp_ctx->szConfigFile;
2674 }
2675
2676 const char *lp_default_path(void)
2677 {
2678     if (getenv("SMB_CONF_PATH"))
2679         return getenv("SMB_CONF_PATH");
2680     else
2681         return dyn_CONFIGFILE;
2682 }
2683
2684 /**
2685  * Update the internal state of a loadparm context after settings
2686  * have changed.
2687  */
2688 static bool lpcfg_update(struct loadparm_context *lp_ctx)
2689 {
2690         struct debug_settings settings;
2691         TALLOC_CTX *tmp_ctx;
2692
2693         tmp_ctx = talloc_new(lp_ctx);
2694         if (tmp_ctx == NULL) {
2695                 return false;
2696         }
2697
2698         lpcfg_add_auto_services(lp_ctx, lpcfg_auto_services(lp_ctx, tmp_ctx));
2699
2700         if (!lp_ctx->globals->wins_server_list && lp_ctx->globals->we_are_a_wins_server) {
2701                 lpcfg_do_global_parameter(lp_ctx, "wins server", "127.0.0.1");
2702         }
2703
2704         if (!lp_ctx->global) {
2705                 TALLOC_FREE(tmp_ctx);
2706                 return true;
2707         }
2708
2709         panic_action = lp_ctx->globals->panic_action;
2710
2711         reload_charcnv(lp_ctx);
2712
2713         ZERO_STRUCT(settings);
2714         /* Add any more debug-related smb.conf parameters created in
2715          * future here */
2716         settings.syslog = lp_ctx->globals->syslog;
2717         settings.syslog_only = lp_ctx->globals->syslog_only;
2718         settings.timestamp_logs = lp_ctx->globals->timestamp_logs;
2719         settings.debug_prefix_timestamp = lp_ctx->globals->debug_prefix_timestamp;
2720         settings.debug_hires_timestamp = lp_ctx->globals->debug_hires_timestamp;
2721         settings.debug_pid = lp_ctx->globals->debug_pid;
2722         settings.debug_uid = lp_ctx->globals->debug_uid;
2723         settings.debug_class = lp_ctx->globals->debug_class;
2724         debug_set_settings(&settings);
2725
2726         /* FIXME: This is a bit of a hack, but we can't use a global, since
2727          * not everything that uses lp also uses the socket library */
2728         if (lpcfg_parm_bool(lp_ctx, NULL, "socket", "testnonblock", false)) {
2729                 setenv("SOCKET_TESTNONBLOCK", "1", 1);
2730         } else {
2731                 unsetenv("SOCKET_TESTNONBLOCK");
2732         }
2733
2734         TALLOC_FREE(tmp_ctx);
2735         return true;
2736 }
2737
2738 bool lpcfg_load_default(struct loadparm_context *lp_ctx)
2739 {
2740     const char *path;
2741
2742     path = lp_default_path();
2743
2744     if (!file_exist(path)) {
2745             /* We allow the default smb.conf file to not exist,
2746              * basically the equivalent of an empty file. */
2747             return lpcfg_update(lp_ctx);
2748     }
2749
2750     return lpcfg_load(lp_ctx, path);
2751 }
2752
2753 /**
2754  * Load the services array from the services file.
2755  *
2756  * Return True on success, False on failure.
2757  */
2758 bool lpcfg_load(struct loadparm_context *lp_ctx, const char *filename)
2759 {
2760         char *n2;
2761         bool bRetval;
2762
2763         filename = talloc_strdup(lp_ctx, filename);
2764
2765         lp_ctx->szConfigFile = filename;
2766
2767         if (lp_ctx->s3_fns) {
2768                 return lp_ctx->s3_fns->load(filename);
2769         }
2770
2771         lp_ctx->bInGlobalSection = true;
2772         n2 = standard_sub_basic(lp_ctx, lp_ctx->szConfigFile);
2773         DEBUG(2, ("lpcfg_load: refreshing parameters from %s\n", n2));
2774
2775         add_to_file_list(lp_ctx, &lp_ctx->file_lists, lp_ctx->szConfigFile, n2);
2776
2777         /* We get sections first, so have to start 'behind' to make up */
2778         lp_ctx->currentService = NULL;
2779         bRetval = pm_process(n2, do_section, lpcfg_do_parameter, lp_ctx);
2780
2781         /* finish up the last section */
2782         DEBUG(4, ("pm_process() returned %s\n", BOOLSTR(bRetval)));
2783         if (bRetval)
2784                 if (lp_ctx->currentService != NULL)
2785                         bRetval = lpcfg_service_ok(lp_ctx->currentService);
2786
2787         bRetval = bRetval && lpcfg_update(lp_ctx);
2788
2789         /* we do this unconditionally, so that it happens even
2790            for a missing smb.conf */
2791         reload_charcnv(lp_ctx);
2792
2793         if (bRetval == true) {
2794                 /* set this up so that any child python tasks will
2795                    find the right smb.conf */
2796                 setenv("SMB_CONF_PATH", filename, 1);
2797
2798                 /* set the context used by the lp_*() function
2799                    varients */
2800                 global_loadparm_context = lp_ctx;
2801                 lp_ctx->loaded = true;
2802         }
2803
2804         return bRetval;
2805 }
2806
2807 /**
2808  * Return the max number of services.
2809  */
2810
2811 int lpcfg_numservices(struct loadparm_context *lp_ctx)
2812 {
2813         if (lp_ctx->s3_fns) {
2814                 return lp_ctx->s3_fns->get_numservices();
2815         }
2816
2817         return lp_ctx->iNumServices;
2818 }
2819
2820 /**
2821  * Display the contents of the services array in human-readable form.
2822  */
2823
2824 void lpcfg_dump(struct loadparm_context *lp_ctx, FILE *f, bool show_defaults,
2825              int maxtoprint)
2826 {
2827         int iService;
2828
2829         if (lp_ctx->s3_fns) {
2830                 lp_ctx->s3_fns->dump(f, show_defaults, maxtoprint);
2831                 return;
2832         }
2833
2834         dump_globals(lp_ctx, f, show_defaults);
2835
2836         lpcfg_dump_a_service(lp_ctx->sDefault, lp_ctx->sDefault, f, lp_ctx->flags, show_defaults);
2837
2838         for (iService = 0; iService < maxtoprint; iService++)
2839                 lpcfg_dump_one(f, show_defaults, lp_ctx->services[iService], lp_ctx->sDefault);
2840 }
2841
2842 /**
2843  * Display the contents of one service in human-readable form.
2844  */
2845 void lpcfg_dump_one(FILE *f, bool show_defaults, struct loadparm_service *service, struct loadparm_service *sDefault)
2846 {
2847         if (service != NULL) {
2848                 if (service->szService[0] == '\0')
2849                         return;
2850                 lpcfg_dump_a_service(service, sDefault, f, NULL, show_defaults);
2851         }
2852 }
2853
2854 struct loadparm_service *lpcfg_servicebynum(struct loadparm_context *lp_ctx,
2855                                             int snum)
2856 {
2857         if (lp_ctx->s3_fns) {
2858                 return lp_ctx->s3_fns->get_servicebynum(snum);
2859         }
2860
2861         return lp_ctx->services[snum];
2862 }
2863
2864 struct loadparm_service *lpcfg_service(struct loadparm_context *lp_ctx,
2865                                     const char *service_name)
2866 {
2867         int iService;
2868         char *serviceName;
2869
2870         if (lp_ctx->s3_fns) {
2871                 return lp_ctx->s3_fns->get_service(service_name);
2872         }
2873
2874         for (iService = lp_ctx->iNumServices - 1; iService >= 0; iService--) {
2875                 if (lp_ctx->services[iService] &&
2876                     lp_ctx->services[iService]->szService) {
2877                         /*
2878                          * The substitution here is used to support %U is
2879                          * service names
2880                          */
2881                         serviceName = standard_sub_basic(
2882                                         lp_ctx->services[iService],
2883                                         lp_ctx->services[iService]->szService);
2884                         if (strequal(serviceName, service_name)) {
2885                                 talloc_free(serviceName);
2886                                 return lp_ctx->services[iService];
2887                         }
2888                         talloc_free(serviceName);
2889                 }
2890         }
2891
2892         DEBUG(7,("lpcfg_servicenumber: couldn't find %s\n", service_name));
2893         return NULL;
2894 }
2895
2896 const char *lpcfg_servicename(const struct loadparm_service *service)
2897 {
2898         return lpcfg_string((const char *)service->szService);
2899 }
2900
2901 /**
2902  * A useful volume label function.
2903  */
2904 const char *lpcfg_volume_label(struct loadparm_service *service, struct loadparm_service *sDefault)
2905 {
2906         const char *ret;
2907         ret = lpcfg_string((const char *)((service != NULL && service->volume != NULL) ?
2908                                        service->volume : sDefault->volume));
2909         if (!*ret)
2910                 return lpcfg_servicename(service);
2911         return ret;
2912 }
2913
2914 /**
2915  * Return the correct printer name.
2916  */
2917 const char *lpcfg_printername(struct loadparm_service *service, struct loadparm_service *sDefault)
2918 {
2919         const char *ret;
2920         ret = lpcfg_string((const char *)((service != NULL && service->_printername != NULL) ?
2921                                        service->_printername : sDefault->_printername));
2922         if (ret == NULL || (ret != NULL && *ret == '\0'))
2923                 ret = lpcfg_servicename(service);
2924
2925         return ret;
2926 }
2927
2928
2929 /**
2930  * Return the max print jobs per queue.
2931  */
2932 int lpcfg_maxprintjobs(struct loadparm_service *service, struct loadparm_service *sDefault)
2933 {
2934         int maxjobs = (service != NULL) ? service->iMaxPrintJobs : sDefault->iMaxPrintJobs;
2935         if (maxjobs <= 0 || maxjobs >= PRINT_MAX_JOBID)
2936                 maxjobs = PRINT_MAX_JOBID - 1;
2937
2938         return maxjobs;
2939 }
2940
2941 struct smb_iconv_handle *lpcfg_iconv_handle(struct loadparm_context *lp_ctx)
2942 {
2943         if (lp_ctx == NULL) {
2944                 return get_iconv_handle();
2945         }
2946         return lp_ctx->iconv_handle;
2947 }
2948
2949 _PUBLIC_ void reload_charcnv(struct loadparm_context *lp_ctx)
2950 {
2951         struct smb_iconv_handle *old_ic = lp_ctx->iconv_handle;
2952         if (!lp_ctx->global) {
2953                 return;
2954         }
2955
2956         if (old_ic == NULL) {
2957                 old_ic = global_iconv_handle;
2958         }
2959         lp_ctx->iconv_handle = smb_iconv_handle_reinit_lp(lp_ctx, lp_ctx, old_ic);
2960         global_iconv_handle = lp_ctx->iconv_handle;
2961 }
2962
2963 _PUBLIC_ char *lpcfg_tls_keyfile(TALLOC_CTX *mem_ctx, struct loadparm_context *lp_ctx)
2964 {
2965         return lpcfg_private_path(mem_ctx, lp_ctx, lpcfg__tls_keyfile(lp_ctx));
2966 }
2967
2968 _PUBLIC_ char *lpcfg_tls_certfile(TALLOC_CTX *mem_ctx, struct loadparm_context *lp_ctx)
2969 {
2970         return lpcfg_private_path(mem_ctx, lp_ctx, lpcfg__tls_certfile(lp_ctx));
2971 }
2972
2973 _PUBLIC_ char *lpcfg_tls_cafile(TALLOC_CTX *mem_ctx, struct loadparm_context *lp_ctx)
2974 {
2975         return lpcfg_private_path(mem_ctx, lp_ctx, lpcfg__tls_cafile(lp_ctx));
2976 }
2977
2978 _PUBLIC_ char *lpcfg_tls_crlfile(TALLOC_CTX *mem_ctx, struct loadparm_context *lp_ctx)
2979 {
2980         return lpcfg_private_path(mem_ctx, lp_ctx, lpcfg__tls_crlfile(lp_ctx));
2981 }
2982
2983 _PUBLIC_ char *lpcfg_tls_dhpfile(TALLOC_CTX *mem_ctx, struct loadparm_context *lp_ctx)
2984 {
2985         return lpcfg_private_path(mem_ctx, lp_ctx, lpcfg__tls_dhpfile(lp_ctx));
2986 }
2987
2988 struct gensec_settings *lpcfg_gensec_settings(TALLOC_CTX *mem_ctx, struct loadparm_context *lp_ctx)
2989 {
2990         struct gensec_settings *settings = talloc_zero(mem_ctx, struct gensec_settings);
2991         if (settings == NULL)
2992                 return NULL;
2993         SMB_ASSERT(lp_ctx != NULL);
2994         settings->lp_ctx = talloc_reference(settings, lp_ctx);
2995         settings->target_hostname = lpcfg_parm_string(lp_ctx, NULL, "gensec", "target_hostname");
2996         return settings;
2997 }
2998
2999 int lpcfg_server_role(struct loadparm_context *lp_ctx)
3000 {
3001         int domain_master = lpcfg__domain_master(lp_ctx);
3002
3003         return lp_find_server_role(lpcfg__server_role(lp_ctx),
3004                                    lpcfg__security(lp_ctx),
3005                                    lpcfg__domain_logons(lp_ctx),
3006                                    (domain_master == true) ||
3007                                    (domain_master == Auto));
3008 }
3009
3010 int lpcfg_security(struct loadparm_context *lp_ctx)
3011 {
3012         return lp_find_security(lpcfg__server_role(lp_ctx),
3013                                 lpcfg__security(lp_ctx));
3014 }
3015
3016 bool lpcfg_server_signing_allowed(struct loadparm_context *lp_ctx, bool *mandatory)
3017 {
3018         bool allowed = true;
3019         enum smb_signing_setting signing_setting = lpcfg_server_signing(lp_ctx);
3020
3021         *mandatory = false;
3022
3023         if (signing_setting == SMB_SIGNING_DEFAULT) {
3024                 /*
3025                  * If we are a domain controller, SMB signing is
3026                  * really important, as it can prevent a number of
3027                  * attacks on communications between us and the
3028                  * clients
3029                  *
3030                  * However, it really sucks (no sendfile, CPU
3031                  * overhead) performance-wise when used on a
3032                  * file server, so disable it by default
3033                  * on non-DCs
3034                  */
3035
3036                 if (lpcfg_server_role(lp_ctx) >= ROLE_ACTIVE_DIRECTORY_DC) {
3037                         signing_setting = SMB_SIGNING_REQUIRED;
3038                 } else {
3039                         signing_setting = SMB_SIGNING_OFF;
3040                 }
3041         }
3042
3043         switch (signing_setting) {
3044         case SMB_SIGNING_REQUIRED:
3045                 *mandatory = true;
3046                 break;
3047         case SMB_SIGNING_IF_REQUIRED:
3048                 break;
3049         case SMB_SIGNING_DEFAULT:
3050         case SMB_SIGNING_OFF:
3051                 allowed = false;
3052                 break;
3053         }
3054
3055         return allowed;
3056 }
3057
3058 int lpcfg_tdb_hash_size(struct loadparm_context *lp_ctx, const char *name)
3059 {
3060         const char *base;
3061
3062         if (name == NULL) {
3063                 return 0;
3064         }
3065
3066         base = strrchr_m(name, '/');
3067         if (base != NULL) {
3068                 base += 1;
3069         } else {
3070                 base = name;
3071         }
3072         return lpcfg_parm_int(lp_ctx, NULL, "tdb_hashsize", base, 0);
3073
3074 }
3075
3076 int lpcfg_tdb_flags(struct loadparm_context *lp_ctx, int tdb_flags)
3077 {
3078         if (!lpcfg_use_mmap(lp_ctx)) {
3079                 tdb_flags |= TDB_NOMMAP;
3080         }
3081         return tdb_flags;
3082 }