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