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