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