s4 samba-tool: Implement "testparm" command

This is a port of the existing "testparm" python script to a samba-tool
command.

Autobuild-User: Kai Blin <kai@samba.org>
Autobuild-Date: Tue Apr  5 07:49:13 CEST 2011 on sn-devel-104

2 files changed, 208 insertions, 0 deletions

diff --git a/source4/scripting/python/samba/netcmd/__init__.py b/source4/scripting/python/samba/netcmd/__init__.py
index aa74f657b2..cf514d5c49 100644
--- a/source4/scripting/python/samba/netcmd/__init__.py
+++ b/source4/scripting/python/samba/netcmd/__init__.py
@@ -213,3 +213,5 @@ from samba.netcmd.gpo import cmd_gpo
 commands["gpo2"] = cmd_gpo()
 from samba.netcmd.ldapcmp import cmd_ldapcmp
 commands["ldapcmp"] = cmd_ldapcmp()
+from samba.netcmd.testparm import cmd_testparm
+commands["testparm"] =  cmd_testparm()
diff --git a/source4/scripting/python/samba/netcmd/testparm.py b/source4/scripting/python/samba/netcmd/testparm.py
new file mode 100755
index 0000000000..ec448588ef
--- /dev/null
+++ b/source4/scripting/python/samba/netcmd/testparm.py
@@ -0,0 +1,206 @@
+#!/usr/bin/env python
+# vim: expandtab ft=python
+#
+#   Unix SMB/CIFS implementation.
+#   Test validity of smb.conf
+#   Copyright (C) Karl Auer 1993, 1994-1998
+#
+#   Extensively modified by Andrew Tridgell, 1995
+#   Converted to popt by Jelmer Vernooij (jelmer@nl.linux.org), 2002
+#   Updated for Samba4 by Andrew Bartlett <abartlet@samba.org> 2006
+#   Converted to Python by Jelmer Vernooij <jelmer@samba.org> 2010
+#
+#   This program is free software; you can redistribute it and/or modify
+#   it under the terms of the GNU General Public License as published by
+#   the Free Software Foundation; either version 3 of the License, or
+#   (at your option) any later version.
+#
+#   This program is distributed in the hope that it will be useful,
+#   but WITHOUT ANY WARRANTY; without even the implied warranty of
+#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#   GNU General Public License for more details.
+#
+#   You should have received a copy of the GNU General Public License
+#   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#
+# Testbed for loadparm.c/params.c
+#
+# This module simply loads a specified configuration file and
+# if successful, dumps it's contents to stdout. Note that the
+# operation is performed with DEBUGLEVEL at 3.
+#
+# Useful for a quick 'syntax check' of a configuration file.
+#
+
+import os
+import sys
+import logging
+
+import samba
+import samba.getopt as options
+from samba.netcmd import Command, CommandError, Option
+
+class cmd_testparm(Command):
+    """Syntax check the configuration file"""
+
+    synopsis = ""
+
+    takes_optiongroups = {
+        "sambaopts": options.SambaOptions,
+        "versionopts": options.VersionOptions
+    }
+
+    takes_options = [
+        Option("--section-name", type=str,
+               help="Limit testparm to a named section"),
+        Option("--parameter-name", type=str,
+               help="Limit testparm to a named parameter"),
+        Option("--client-name", type=str,
+               help="Client DNS name for 'hosts allow' checking "
+                    "(should match reverse lookup)"),
+        Option("--client-ip", type=str,
+               help="Client IP address for 'hosts allow' checking"),
+        Option("--suppress-prompt", action="store_true", default=False,
+               help="Suppress prompt for enter"),
+        Option("-v", "--verbose", action="store_true",
+               default=False, help="Show default options too"),
+        # We need support for smb.conf macros before this will work again
+        Option("--server", type=str, help="Set %%L macro to servername"),
+        # These are harder to do with the new code structure
+        Option("--show-all-parameters", action="store_true", default=False,
+               help="Show the parameters, type, possible values")
+        ]
+
+    takes_args = ["hostname?", "hostip?"]
+
+    def run(self, *args, **kwargs):
+        if kwargs.get('hostname', None) is not None and \
+           kwargs.get('hostip', None) is None:
+            raise CommandError("Both a DNS name and an IP address are " \
+                               "required for the host access check")
+
+        lp = kwargs['sambaopts'].get_loadparm()
+
+        # We need this to force the output
+        samba.set_debug_level(2)
+
+        logger = logging.getLogger("testparm")
+        logger.addHandler(logging.StreamHandler(sys.stdout))
+
+        logger.info("Loaded smb config files from %s", lp.configfile)
+        logger.info("Loaded services file OK.")
+
+        valid = self.do_global_checks(lp, logger)
+        valid = valid and self.do_share_checks(lp, logger)
+        if kwargs.get('hostname', None) is not None and \
+           kwargs.get('hostip', None) is not None:
+            self.check_client_access(lp, kwargs['hostname'], kwargs['hostip'])
+        else:
+            if kwargs.get('section_name', None) is not None or \
+               kwargs.get('parameter_name', None) is not None:
+                if kwargs.get('parameter_name', None) is None:
+                    lp[kwargs['section_name']].dump(sys.stdout, lp.default_service,
+                                               kwargs['verbose'])
+                else:
+                    print lp.get(kwargs['parameter_name'], kwargs['section_name'])
+            else:
+                if not kwargs['suppress_prompt']:
+                    print "Press enter to see a dump of your service definitions\n"
+                    sys.stdin.readline()
+                lp.dump(sys.stdout, kwargs['verbose'])
+        if valid:
+            return
+        else:
+            raise CommandError("Invalid smb.conf")
+
+    def do_global_checks(self, lp, logger):
+        valid = True
+
+        netbios_name = lp.get("netbios name")
+        if not samba.valid_netbios_name(netbios_name):
+            logger.error("netbios name %s is not a valid netbios name",
+                         netbios_name)
+            valid = False
+
+        workgroup = lp.get("workgroup")
+        if not samba.valid_netbios_name(workgroup):
+            logger.error("workgroup name %s is not a valid netbios name",
+                         workgroup)
+            valid = False
+
+        lockdir = lp.get("lockdir")
+
+        if not os.path.isdir(lockdir):
+            logger.error("lock directory %s does not exist", lockdir)
+            valid = False
+
+        piddir = lp.get("pid directory")
+
+        if not os.path.isdir(piddir):
+            logger.error("pid directory %s does not exist", piddir)
+            valid = False
+
+        winbind_separator = lp.get("winbind separator")
+
+        if len(winbind_separator) != 1:
+            logger.error("the 'winbind separator' parameter must be a single "
+                         "character.")
+            valid = False
+
+        if winbind_separator == '+':
+            logger.error("'winbind separator = +' might cause problems with group "
+                         "membership.")
+            valid = False
+
+        return valid
+
+
+    def allow_access(self, deny_list, allow_list, cname, caddr):
+        raise NotImplementedError(self.allow_access)
+
+
+    def do_share_checks(self, lp, logger):
+        valid = True
+        for s in lp.services():
+            if len(s) > 12:
+                logger.warning("You have some share names that are longer than 12 "
+                    "characters. These may not be accessible to some older "
+                    "clients. (Eg. Windows9x, WindowsMe, and not listed in "
+                    "smbclient in Samba 3.0.)")
+                break
+
+        for s in lp.services():
+            deny_list = lp.get("hosts deny", s)
+            allow_list = lp.get("hosts allow", s)
+            if deny_list:
+                for entry in deny_list:
+                    if "*" in entry or "?" in entry:
+                        logger.error("Invalid character (* or ?) in hosts deny "
+                                     "list (%s) for service %s.", entry, s)
+                        valid = False
+
+            if allow_list:
+                for entry in allow_list:
+                    if "*" in entry or "?" in entry:
+                        logger.error("Invalid character (* or ?) in hosts allow "
+                                     "list (%s) for service %s.", entry, s)
+                        valid = False
+        return valid
+
+    def check_client_access(self, lp, cname, caddr):
+        # this is totally ugly, a real `quick' hack
+        for s in lp.services():
+            if (self.allow_access(lp.get("hosts deny"), lp.get("hosts allow"), cname,
+                             caddr) and
+                self.allow_access(lp.get("hosts deny", s), lp.get("hosts allow", s),
+                             cname, caddr)):
+                logger.info("Allow connection from %s (%s) to %s", cname, caddr, s)
+            else:
+                logger.info("Deny connection from %s (%s) to %s", cname, caddr, s)
+
+##   FIXME: We need support for smb.conf macros before this will work again
+##
+##    if (new_local_machine) {
+##        set_local_machine_name(new_local_machine, True)
+##    }
+#