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