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
37extern BOOL AllowDebugChange;
38
39/***********************************************
40 Here we do a set of 'hard coded' checks for bad
41 configuration settings.
42************************************************/
43
44static 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>' \
56cannot 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	/*
77	 * Password server sanity checks.
78	 */
79
80	if((lp_security() == SEC_SERVER || lp_security() >= SEC_DOMAIN) && !lp_passwordserver()) {
81		pstring sec_setting;
82		if(lp_security() == SEC_SERVER)
83			pstrcpy(sec_setting, "server");
84		else if(lp_security() == SEC_DOMAIN)
85			pstrcpy(sec_setting, "domain");
86
87		fprintf(stderr, "ERROR: The setting 'security=%s' requires the 'password server' parameter be set \
88to a valid password server.\n", sec_setting );
89		ret = 1;
90	}
91
92
93	/*
94	 * Check 'hosts equiv' and 'use rhosts' compatibility with 'hostname lookup' value.
95	 */
96
97	if(*lp_hosts_equiv() && !lp_hostname_lookups()) {
98		fprintf(stderr, "ERROR: The setting 'hosts equiv = %s' requires that 'hostname lookups = yes'.\n", lp_hosts_equiv());
99		ret = 1;
100	}
101
102	/*
103	 * Password chat sanity checks.
104	 */
105
106	if(lp_security() == SEC_USER && lp_unix_password_sync()) {
107
108		/*
109		 * Check that we have a valid lp_passwd_program() if not using pam.
110		 */
111
112#ifdef WITH_PAM
113		if (!lp_pam_password_change()) {
114#endif
115
116			if(lp_passwd_program() == NULL) {
117				fprintf( stderr, "ERROR: the 'unix password sync' parameter is set and there is no valid 'passwd program' \
118parameter.\n" );
119				ret = 1;
120			} else {
121				pstring passwd_prog;
122				pstring truncated_prog;
123				const char *p;
124
125				pstrcpy( passwd_prog, lp_passwd_program());
126				p = passwd_prog;
127				*truncated_prog = '\0';
128				next_token(&p, truncated_prog, NULL, sizeof(pstring));
129
130				if(access(truncated_prog, F_OK) == -1) {
131					fprintf(stderr, "ERROR: the 'unix password sync' parameter is set and the 'passwd program' (%s) \
132cannot be executed (error was %s).\n", truncated_prog, strerror(errno) );
133					ret = 1;
134				}
135			}
136
137#ifdef WITH_PAM
138		}
139#endif
140
141		if(lp_passwd_chat() == NULL) {
142			fprintf(stderr, "ERROR: the 'unix password sync' parameter is set and there is no valid 'passwd chat' \
143parameter.\n");
144			ret = 1;
145		}
146
147		/*
148		 * Check that we have a valid script and that it hasn't
149		 * been written to expect the old password.
150		 */
151
152		if(lp_encrypted_passwords()) {
153			if(strstr( lp_passwd_chat(), "%o")!=NULL) {
154				fprintf(stderr, "ERROR: the 'passwd chat' script [%s] expects to use the old plaintext password \
155via the %%o substitution. With encrypted passwords this is not possible.\n", lp_passwd_chat() );
156				ret = 1;
157			}
158		}
159	}
160
161	if (strlen(lp_winbind_separator()) != 1) {
162		fprintf(stderr,"ERROR: the 'winbind separator' parameter must be a single character.\n");
163		ret = 1;
164	}
165
166	if (*lp_winbind_separator() == '+') {
167		fprintf(stderr,"'winbind separator = +' might cause problems with group membership.\n");
168	}
169
170	if (lp_algorithmic_rid_base() < BASE_RID) {
171		/* Try to prevent admin foot-shooting, we can't put algorithmic
172		   rids below 1000, that's the 'well known RIDs' on NT */
173		fprintf(stderr,"'algorithmic rid base' must be equal to or above %lu\n", BASE_RID);
174	}
175
176	if (lp_algorithmic_rid_base() & 1) {
177		fprintf(stderr,"'algorithmic rid base' must be even.\n");
178	}
179
180#ifndef HAVE_DLOPEN
181	if (lp_preload_modules()) {
182		fprintf(stderr,"WARNING: 'preload modules = ' set while loading plugins not supported.\n");
183	}
184#endif
185
186	if (!lp_passdb_backend()) {
187		fprintf(stderr,"ERROR: passdb backend must have a value or be left out\n");
188	}
189
190	return ret;
191}
192
193 int main(int argc, const char *argv[])
194{
195	const char *config_file = dyn_CONFIGFILE;
196	int s;
197	static BOOL silent_mode = False;
198	int ret = 0;
199	poptContext pc;
200	static const char *term_code = "";
201	static char *new_local_machine = NULL;
202	const char *cname;
203	const char *caddr;
204	static int show_defaults;
205
206	struct poptOption long_options[] = {
207		POPT_AUTOHELP
208		{"suppress-prompt", 's', POPT_ARG_VAL, &silent_mode, 1, "Suppress prompt for enter"},
209		{"verbose", 'v', POPT_ARG_NONE, &show_defaults, 1, "Show default options too"},
210		{"server", 'L',POPT_ARG_STRING, &new_local_machine, 0, "Set %%L macro to servername\n"},
211		{"encoding", 't', POPT_ARG_STRING, &term_code, 0, "Print parameters with encoding"},
212		POPT_COMMON_VERSION
213		POPT_TABLEEND
214	};
215
216	pc = poptGetContext(NULL, argc, argv, long_options,
217			    POPT_CONTEXT_KEEP_FIRST);
218	poptSetOtherOptionHelp(pc, "[OPTION...] <config-file> [host-name] [host-ip]");
219
220	while(poptGetNextOpt(pc) != -1);
221
222	setup_logging(poptGetArg(pc), True);
223
224	if (poptPeekArg(pc))
225		config_file = poptGetArg(pc);
226
227	cname = poptGetArg(pc);
228	caddr = poptGetArg(pc);
229
230	if ( cname && ! caddr ) {
231		printf ( "ERROR: You must specify both a machine name and an IP address.\n" );
232		return(1);
233	}
234
235	if (new_local_machine) {
236		set_local_machine_name(new_local_machine, True);
237	}
238
239	dbf = x_stderr;
240	DEBUGLEVEL = 2;
241	AllowDebugChange = False;
242
243	fprintf(stderr,"Load smb config files from %s\n",config_file);
244
245	if (!lp_load(config_file,False,True,False)) {
246		fprintf(stderr,"Error loading services.\n");
247		return(1);
248	}
249
250	fprintf(stderr,"Loaded services file OK.\n");
251
252	ret = do_global_checks();
253
254	for (s=0;s<1000;s++) {
255		if (VALID_SNUM(s))
256			if (strlen(lp_servicename(s)) > 12) {
257				fprintf(stderr, "WARNING: You have some share names that are longer than 12 characters.\n" );
258				fprintf(stderr, "These may not be accessible to some older clients.\n" );
259				fprintf(stderr, "(Eg. Windows9x, WindowsMe, and smbclient prior to Samba 3.0.)\n" );
260				break;
261			}
262	}
263
264	for (s=0;s<1000;s++) {
265		if (VALID_SNUM(s)) {
266			const char **deny_list = lp_hostsdeny(s);
267			const char **allow_list = lp_hostsallow(s);
268			int i;
269			if(deny_list) {
270				for (i=0; deny_list[i]; i++) {
271					char *hasstar = strchr_m(deny_list[i], '*');
272					char *hasquery = strchr_m(deny_list[i], '?');
273					if(hasstar || hasquery) {
274						fprintf(stderr,"Invalid character %c in hosts deny list (%s) for service %s.\n",
275							   hasstar ? *hasstar : *hasquery, deny_list[i], lp_servicename(s) );
276					}
277				}
278			}
279
280			if(allow_list) {
281				for (i=0; allow_list[i]; i++) {
282					char *hasstar = strchr_m(allow_list[i], '*');
283					char *hasquery = strchr_m(allow_list[i], '?');
284					if(hasstar || hasquery) {
285						fprintf(stderr,"Invalid character %c in hosts allow list (%s) for service %s.\n",
286							   hasstar ? *hasstar : *hasquery, allow_list[i], lp_servicename(s) );
287					}
288				}
289			}
290
291			if(lp_level2_oplocks(s) && !lp_oplocks(s)) {
292				fprintf(stderr,"Invalid combination of parameters for service %s. \
293					   Level II oplocks can only be set if oplocks are also set.\n",
294					   lp_servicename(s) );
295			}
296
297			if (lp_map_hidden(s) && !(lp_create_mask(s) & S_IXOTH)) {
298				fprintf(stderr,"Invalid combination of parameters for service %s. \
299					   Map hidden can only work if create mask includes octal 01 (S_IXOTH).\n",
300					   lp_servicename(s) );
301			}
302			if (lp_map_hidden(s) && (lp_force_create_mode(s) & S_IXOTH)) {
303				fprintf(stderr,"Invalid combination of parameters for service %s. \
304					   Map hidden can only work if force create mode excludes octal 01 (S_IXOTH).\n",
305					   lp_servicename(s) );
306			}
307			if (lp_map_system(s) && !(lp_create_mask(s) & S_IXGRP)) {
308				fprintf(stderr,"Invalid combination of parameters for service %s. \
309					   Map system can only work if create mask includes octal 010 (S_IXGRP).\n",
310					   lp_servicename(s) );
311			}
312			if (lp_map_system(s) && (lp_force_create_mode(s) & S_IXGRP)) {
313				fprintf(stderr,"Invalid combination of parameters for service %s. \
314					   Map system can only work if force create mode excludes octal 010 (S_IXGRP).\n",
315					   lp_servicename(s) );
316			}
317		}
318	}
319
320
321	if (!silent_mode) {
322		fprintf(stderr,"Server role: ");
323		switch(lp_server_role()) {
324			case ROLE_STANDALONE:
325				fprintf(stderr,"ROLE_STANDALONE\n");
326				break;
327			case ROLE_DOMAIN_MEMBER:
328				fprintf(stderr,"ROLE_DOMAIN_MEMBER\n");
329				break;
330			case ROLE_DOMAIN_BDC:
331				fprintf(stderr,"ROLE_DOMAIN_BDC\n");
332				break;
333			case ROLE_DOMAIN_PDC:
334				fprintf(stderr,"ROLE_DOMAIN_PDC\n");
335				break;
336			default:
337				fprintf(stderr,"Unknown -- internal error?\n");
338				break;
339		}
340	}
341
342	if (!cname) {
343		if (!silent_mode) {
344			fprintf(stderr,"Press enter to see a dump of your service definitions\n");
345			fflush(stdout);
346			getc(stdin);
347		}
348		lp_dump(stdout, show_defaults, lp_numservices());
349	}
350
351	if(cname && caddr){
352		/* this is totally ugly, a real `quick' hack */
353		for (s=0;s<1000;s++) {
354			if (VALID_SNUM(s)) {
355				if (allow_access(lp_hostsdeny(-1), lp_hostsallow(-1), cname, caddr)
356				    && allow_access(lp_hostsdeny(s), lp_hostsallow(s), cname, caddr)) {
357					fprintf(stderr,"Allow connection from %s (%s) to %s\n",
358						   cname,caddr,lp_servicename(s));
359				} else {
360					fprintf(stderr,"Deny connection from %s (%s) to %s\n",
361						   cname,caddr,lp_servicename(s));
362				}
363			}
364		}
365	}
366	return(ret);
367}
368