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