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