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