r11999: Re-add "passdb expand explicit".
[samba.git] / source / utils / testparm.c
1 /* 
2    Unix SMB/CIFS implementation.
3    Test validity of smb.conf
4    Copyright (C) Karl Auer 1993, 1994-1998
5
6    Extensively modified by Andrew Tridgell, 1995
7    Converted to popt by Jelmer Vernooij (jelmer@nl.linux.org), 2002
8    
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 2 of the License, or
12    (at your option) any later version.
13    
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18    
19    You should have received a copy of the GNU General Public License
20    along with this program; if not, write to the Free Software
21    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 */
23
24 /*
25  * Testbed for loadparm.c/params.c
26  *
27  * This module simply loads a specified configuration file and
28  * if successful, dumps it's contents to stdout. Note that the
29  * operation is performed with DEBUGLEVEL at 3.
30  *
31  * Useful for a quick 'syntax check' of a configuration file.
32  *
33  */
34
35 #include "includes.h"
36
37 extern BOOL AllowDebugChange;
38
39 /***********************************************
40  Here we do a set of 'hard coded' checks for bad
41  configuration settings.
42 ************************************************/
43
44 static int do_global_checks(void)
45 {
46         int ret = 0;
47         SMB_STRUCT_STAT st;
48
49         if (lp_security() >= SEC_DOMAIN && !lp_encrypted_passwords()) {
50                 fprintf(stderr, "ERROR: in 'security=domain' mode the 'encrypt passwords' parameter must always be set to 'true'.\n");
51                 ret = 1;
52         }
53
54         if (lp_wins_support() && lp_wins_server_list()) {
55                 fprintf(stderr, "ERROR: both 'wins support = true' and 'wins server = <server list>' \
56 cannot be set in the smb.conf file. nmbd will abort with this setting.\n");
57                 ret = 1;
58         }
59
60         if (!directory_exist(lp_lockdir(), &st)) {
61                 fprintf(stderr, "ERROR: lock directory %s does not exist\n",
62                        lp_lockdir());
63                 ret = 1;
64         } else if ((st.st_mode & 0777) != 0755) {
65                 fprintf(stderr, "WARNING: lock directory %s should have permissions 0755 for browsing to work\n",
66                        lp_lockdir());
67                 ret = 1;
68         }
69
70         if (!directory_exist(lp_piddir(), &st)) {
71                 fprintf(stderr, "ERROR: pid directory %s does not exist\n",
72                        lp_piddir());
73                 ret = 1;
74         }
75
76         if (lp_passdb_expand_explicit()) {
77                 fprintf(stderr, "WARNING: passdb expand explicit = yes is "
78                         "deprecated\n");
79         }
80
81         /*
82          * Password server sanity checks.
83          */
84
85         if((lp_security() == SEC_SERVER || lp_security() >= SEC_DOMAIN) && !lp_passwordserver()) {
86                 pstring sec_setting;
87                 if(lp_security() == SEC_SERVER)
88                         pstrcpy(sec_setting, "server");
89                 else if(lp_security() == SEC_DOMAIN)
90                         pstrcpy(sec_setting, "domain");
91
92                 fprintf(stderr, "ERROR: The setting 'security=%s' requires the 'password server' parameter be set \
93 to a valid password server.\n", sec_setting );
94                 ret = 1;
95         }
96
97         
98         /*
99          * Check 'hosts equiv' and 'use rhosts' compatibility with 'hostname lookup' value.
100          */
101
102         if(*lp_hosts_equiv() && !lp_hostname_lookups()) {
103                 fprintf(stderr, "ERROR: The setting 'hosts equiv = %s' requires that 'hostname lookups = yes'.\n", lp_hosts_equiv());
104                 ret = 1;
105         }
106
107         /*
108          * Password chat sanity checks.
109          */
110
111         if(lp_security() == SEC_USER && lp_unix_password_sync()) {
112
113                 /*
114                  * Check that we have a valid lp_passwd_program() if not using pam.
115                  */
116
117 #ifdef WITH_PAM
118                 if (!lp_pam_password_change()) {
119 #endif
120
121                         if(lp_passwd_program() == NULL) {
122                                 fprintf( stderr, "ERROR: the 'unix password sync' parameter is set and there is no valid 'passwd program' \
123 parameter.\n" );
124                                 ret = 1;
125                         } else {
126                                 pstring passwd_prog;
127                                 pstring truncated_prog;
128                                 const char *p;
129
130                                 pstrcpy( passwd_prog, lp_passwd_program());
131                                 p = passwd_prog;
132                                 *truncated_prog = '\0';
133                                 next_token(&p, truncated_prog, NULL, sizeof(pstring));
134
135                                 if(access(truncated_prog, F_OK) == -1) {
136                                         fprintf(stderr, "ERROR: the 'unix password sync' parameter is set and the 'passwd program' (%s) \
137 cannot be executed (error was %s).\n", truncated_prog, strerror(errno) );
138                                         ret = 1;
139                                 }
140
141              }
142
143 #ifdef WITH_PAM
144                 }
145 #endif
146
147                 if(lp_passwd_chat() == NULL) {
148                         fprintf(stderr, "ERROR: the 'unix password sync' parameter is set and there is no valid 'passwd chat' \
149 parameter.\n");
150                         ret = 1;
151                 } else 
152                 /* check if there's a %u parameter present */
153                 if(strstr_m(lp_passwd_program(), "%u") == NULL) {
154                         fprintf(stderr, "ERROR: the 'passwd program' (%s) requires a '%%u' parameter.\n", lp_passwd_program());
155                         ret = 1;
156                 }
157
158                 /*
159                  * Check that we have a valid script and that it hasn't
160                  * been written to expect the old password.
161                  */
162
163                 if(lp_encrypted_passwords()) {
164                         if(strstr_m( lp_passwd_chat(), "%o")!=NULL) {
165                                 fprintf(stderr, "ERROR: the 'passwd chat' script [%s] expects to use the old plaintext password \
166 via the %%o substitution. With encrypted passwords this is not possible.\n", lp_passwd_chat() );
167                                 ret = 1;
168                         }
169                 }
170         }
171
172         if (strlen(lp_winbind_separator()) != 1) {
173                 fprintf(stderr,"ERROR: the 'winbind separator' parameter must be a single character.\n");
174                 ret = 1;
175         }
176
177         if (*lp_winbind_separator() == '+') {
178                 fprintf(stderr,"'winbind separator = +' might cause problems with group membership.\n");
179         }
180
181         if (lp_algorithmic_rid_base() < BASE_RID) {
182                 /* Try to prevent admin foot-shooting, we can't put algorithmic
183                    rids below 1000, that's the 'well known RIDs' on NT */
184                 fprintf(stderr,"'algorithmic rid base' must be equal to or above %lu\n", BASE_RID);
185         }
186
187         if (lp_algorithmic_rid_base() & 1) {
188                 fprintf(stderr,"'algorithmic rid base' must be even.\n");
189         }
190
191 #ifndef HAVE_DLOPEN
192         if (lp_preload_modules()) {
193                 fprintf(stderr,"WARNING: 'preload modules = ' set while loading plugins not supported.\n");
194         }
195 #endif
196
197         if (!lp_passdb_backend()) {
198                 fprintf(stderr,"ERROR: passdb backend must have a value or be left out\n");
199         }
200
201         return ret;
202 }   
203
204  int main(int argc, const char *argv[])
205 {
206         const char *config_file = dyn_CONFIGFILE;
207         int s;
208         static BOOL silent_mode = False;
209         static BOOL show_all_parameters = False;
210         int ret = 0;
211         poptContext pc;
212         static const char *term_code = "";
213         static char *parameter_name = NULL;
214         static const char *section_name = NULL;
215         static char *new_local_machine = NULL;
216         const char *cname;
217         const char *caddr;
218         static int show_defaults;
219
220         struct poptOption long_options[] = {
221                 POPT_AUTOHELP
222                 {"suppress-prompt", 's', POPT_ARG_VAL, &silent_mode, 1, "Suppress prompt for enter"},
223                 {"verbose", 'v', POPT_ARG_NONE, &show_defaults, 1, "Show default options too"},
224                 {"server", 'L',POPT_ARG_STRING, &new_local_machine, 0, "Set %%L macro to servername\n"},
225                 {"encoding", 't', POPT_ARG_STRING, &term_code, 0, "Print parameters with encoding"},
226                 {"show-all-parameters", '\0', POPT_ARG_VAL, &show_all_parameters, True, "Show the parameters, type, possible values" },
227                 {"parameter-name", '\0', POPT_ARG_STRING, &parameter_name, 0, "Limit testparm to a named parameter" },
228                 {"section-name", '\0', POPT_ARG_STRING, &section_name, 0, "Limit testparm to a named section" },
229                 POPT_COMMON_VERSION
230                 POPT_TABLEEND
231         };
232
233         pc = poptGetContext(NULL, argc, argv, long_options, 
234                             POPT_CONTEXT_KEEP_FIRST);
235         poptSetOtherOptionHelp(pc, "[OPTION...] <config-file> [host-name] [host-ip]");
236
237         while(poptGetNextOpt(pc) != -1);
238
239         if (show_all_parameters) {
240                 show_parameter_list();
241                 exit(0);
242         }
243
244         setup_logging(poptGetArg(pc), True);
245
246         if (poptPeekArg(pc)) 
247                 config_file = poptGetArg(pc);
248
249         cname = poptGetArg(pc);
250         caddr = poptGetArg(pc);
251
252         if ( cname && ! caddr ) {
253                 printf ( "ERROR: You must specify both a machine name and an IP address.\n" );
254                 return(1);
255         }
256
257         if (new_local_machine) {
258                 set_local_machine_name(new_local_machine, True);
259         }
260
261         dbf = x_stderr;
262         DEBUGLEVEL = 2;
263         AllowDebugChange = False;
264
265         fprintf(stderr,"Load smb config files from %s\n",config_file);
266
267         if (!lp_load(config_file,False,True,False)) {
268                 fprintf(stderr,"Error loading services.\n");
269                 return(1);
270         }
271
272         fprintf(stderr,"Loaded services file OK.\n");
273
274         ret = do_global_checks();
275
276         for (s=0;s<1000;s++) {
277                 if (VALID_SNUM(s))
278                         if (strlen(lp_servicename(s)) > 12) {
279                                 fprintf(stderr, "WARNING: You have some share names that are longer than 12 characters.\n" );
280                                 fprintf(stderr, "These may not be accessible to some older clients.\n" );
281                                 fprintf(stderr, "(Eg. Windows9x, WindowsMe, and smbclient prior to Samba 3.0.)\n" );
282                                 break;
283                         }
284         }
285
286         for (s=0;s<1000;s++) {
287                 if (VALID_SNUM(s)) {
288                         const char **deny_list = lp_hostsdeny(s);
289                         const char **allow_list = lp_hostsallow(s);
290                         int i;
291                         if(deny_list) {
292                                 for (i=0; deny_list[i]; i++) {
293                                         char *hasstar = strchr_m(deny_list[i], '*');
294                                         char *hasquery = strchr_m(deny_list[i], '?');
295                                         if(hasstar || hasquery) {
296                                                 fprintf(stderr,"Invalid character %c in hosts deny list (%s) for service %s.\n",
297                                                            hasstar ? *hasstar : *hasquery, deny_list[i], lp_servicename(s) );
298                                         }
299                                 }
300                         }
301
302                         if(allow_list) {
303                                 for (i=0; allow_list[i]; i++) {
304                                         char *hasstar = strchr_m(allow_list[i], '*');
305                                         char *hasquery = strchr_m(allow_list[i], '?');
306                                         if(hasstar || hasquery) {
307                                                 fprintf(stderr,"Invalid character %c in hosts allow list (%s) for service %s.\n",
308                                                            hasstar ? *hasstar : *hasquery, allow_list[i], lp_servicename(s) );
309                                         }
310                                 }
311                         }
312
313                         if(lp_level2_oplocks(s) && !lp_oplocks(s)) {
314                                 fprintf(stderr,"Invalid combination of parameters for service %s. \
315                                            Level II oplocks can only be set if oplocks are also set.\n",
316                                            lp_servicename(s) );
317                         }
318
319                         if (lp_map_hidden(s) && !(lp_create_mask(s) & S_IXOTH)) {
320                                 fprintf(stderr,"Invalid combination of parameters for service %s. \
321                                            Map hidden can only work if create mask includes octal 01 (S_IXOTH).\n",
322                                            lp_servicename(s) );
323                         }
324                         if (lp_map_hidden(s) && (lp_force_create_mode(s) & S_IXOTH)) {
325                                 fprintf(stderr,"Invalid combination of parameters for service %s. \
326                                            Map hidden can only work if force create mode excludes octal 01 (S_IXOTH).\n",
327                                            lp_servicename(s) );
328                         }
329                         if (lp_map_system(s) && !(lp_create_mask(s) & S_IXGRP)) {
330                                 fprintf(stderr,"Invalid combination of parameters for service %s. \
331                                            Map system can only work if create mask includes octal 010 (S_IXGRP).\n",
332                                            lp_servicename(s) );
333                         }
334                         if (lp_map_system(s) && (lp_force_create_mode(s) & S_IXGRP)) {
335                                 fprintf(stderr,"Invalid combination of parameters for service %s. \
336                                            Map system can only work if force create mode excludes octal 010 (S_IXGRP).\n",
337                                            lp_servicename(s) );
338                         }
339 #ifdef HAVE_CUPS
340                         if (lp_printing(s) == PRINT_CUPS && *(lp_printcommand(s)) != '\0') {
341                                  fprintf(stderr,"Warning: Service %s defines a print command, but \
342 print command parameter is ignored when using CUPS libraries.\n",
343                                            lp_servicename(s) );
344                         }
345 #endif
346                 }
347         }
348
349
350         if (!silent_mode && !section_name && !parameter_name) {
351                 fprintf(stderr,"Server role: ");
352                 switch(lp_server_role()) {
353                         case ROLE_STANDALONE:
354                                 fprintf(stderr,"ROLE_STANDALONE\n");
355                                 break;
356                         case ROLE_DOMAIN_MEMBER:
357                                 fprintf(stderr,"ROLE_DOMAIN_MEMBER\n");
358                                 break;
359                         case ROLE_DOMAIN_BDC:
360                                 fprintf(stderr,"ROLE_DOMAIN_BDC\n");
361                                 break;
362                         case ROLE_DOMAIN_PDC:
363                                 fprintf(stderr,"ROLE_DOMAIN_PDC\n");
364                                 break;
365                         default:
366                                 fprintf(stderr,"Unknown -- internal error?\n");
367                                 break;
368                 }
369         }
370
371         if (!cname) {
372                 if (!silent_mode) {
373                         fprintf(stderr,"Press enter to see a dump of your service definitions\n");
374                         fflush(stdout);
375                         getc(stdin);
376                 }
377                 if (parameter_name || section_name) {
378                         BOOL isGlobal = False;
379                         s = GLOBAL_SECTION_SNUM;
380
381                         if (!section_name) {
382                                 section_name = GLOBAL_NAME;
383                                 isGlobal = True;
384                         } else if ((isGlobal=!strwicmp(section_name, GLOBAL_NAME)) == 0 &&
385                                  (s=lp_servicenumber(section_name)) == -1) {
386                                         fprintf(stderr,"Unknown section %s\n",
387                                                 section_name);
388                                         return(1);
389                         }
390                         if (parameter_name) {
391                                 if (!dump_a_parameter( s, parameter_name, stdout, isGlobal)) {
392                                         fprintf(stderr,"Parameter %s unknown for section %s\n",
393                                                 parameter_name, section_name);
394                                         return(1);
395                                 }
396                         } else {
397                                 if (isGlobal == True)
398                                         lp_dump(stdout, show_defaults, 0);
399                                 else
400                                         lp_dump_one(stdout, show_defaults, s);
401                         }
402                         return(ret);
403                 }
404
405                 lp_dump(stdout, show_defaults, lp_numservices());
406         }
407
408         if(cname && caddr){
409                 /* this is totally ugly, a real `quick' hack */
410                 for (s=0;s<1000;s++) {
411                         if (VALID_SNUM(s)) {
412                                 if (allow_access(lp_hostsdeny(-1), lp_hostsallow(-1), cname, caddr)
413                                     && allow_access(lp_hostsdeny(s), lp_hostsallow(s), cname, caddr)) {
414                                         fprintf(stderr,"Allow connection from %s (%s) to %s\n",
415                                                    cname,caddr,lp_servicename(s));
416                                 } else {
417                                         fprintf(stderr,"Deny connection from %s (%s) to %s\n",
418                                                    cname,caddr,lp_servicename(s));
419                                 }
420                         }
421                 }
422         }
423         return(ret);
424 }
425