#! /usr/bin/python -E
# Authors: Rob Crittenden <rcritten@redhat.com>
#
# Copyright (C) 2007  Red Hat
# see file 'COPYING' for use and warranty information
#
# 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; version 2 only
#
# 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, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
#
import sys
try:
    from optparse import OptionParser
    import ipa
    import ipa.user
    import ipa.ipaclient as ipaclient
    import ipa.ipavalidate as ipavalidate
    import ipa.ipautil as ipautil
    import ipa.config

    import xmlrpclib
    import kerberos
    import krbV
    import ldap
    import getpass
    import errno
    import socket
except ImportError:
    print >> sys.stderr, """\
There was a problem importing one of the required Python modules. The
error was:

    %s
""" % sys.exc_value
    sys.exit(1)

def usage():
    print "ipa-adduser [-c|--gecos STRING] [-d|--directory STRING] [-f|--firstname STRING] [-l|--lastname STRING] [-s|--shell] [-g|--groups] [-k|krb-principal [-M|mailAddress] [--addattr attribute=value] [--setattr attribute=value] [-v|--verbose] user"
    sys.exit(1)

def set_add_usage(which):
    print "%s option usage: --%s NAME=VALUE" % (which, which)

def parse_options():
    parser = OptionParser()
    parser.add_option("-c", "--gecos", dest="gecos",
                      help="Set the GECOS field")
    parser.add_option("-d", "--directory", dest="directory",
                      help="Set the User's home directory")
    parser.add_option("-f", "--firstname", dest="gn",
                      help="User's first name")
    parser.add_option("-l", "--lastname", dest="sn",
                      help="User's last name")
    parser.add_option("-p", "--password", dest="password",
                      help="Set user's password")
    parser.add_option("-P", dest="password_prompt", action="store_true",
                      help="Prompt on the command-line for the user's password")
    parser.add_option("-s", "--shell", dest="shell",
                      help="Set user's login shell to shell")
    parser.add_option("-G", "--groups", dest="groups",
                      help="Add account to one or more groups (comma-separated)")
    parser.add_option("-k", "--krb-principal", dest="principal",
                      help="Set user's Kerberos Principal Name")
    parser.add_option("-M", "--mailAddress", dest="mail",
                      help="Set user's e-mail address")
    parser.add_option("--usage", action="store_true",
                      help="Program usage")
    parser.add_option("-v", "--verbose", action="store_true", dest="verbose",
                      help="Verbose output of the XML-RPC connection")
    parser.add_option("--addattr", dest="addattr",
                      help="Adds an attribute or values to that attribute, attr=value",
                      action="append")
    parser.add_option("--setattr", dest="setattr",
                      help="Set an attribute, dropping any existing values that may exist",
                      action="append")

    args = ipa.config.init_config(sys.argv)
    options, args = parser.parse_args(args)

    return options, args

def main():
    # The following fields are required
    givenname = ""
    lastname = ""
    username = ""
    principal = ""
    password = ""
    mail = "" 
    gecos = ""
    directory = ""
    shell = ""
    groups = ""

    match = False
    cont = False

    all_interactive = False

    user=ipa.user.User()
    options, args = parse_options()

    if options.usage:
        usage()

    if len(args) != 2:
        all_interactive = True

    if not options.gn:
        while (cont != True):
            givenname = raw_input("First name: ")
            if (ipavalidate.String(givenname, notEmpty=True)):
                print "Please enter a value"
            else:
                cont = True
    else:
        givenname = options.gn
        if (ipavalidate.String(givenname, notEmpty=True)):
            print "Please enter a value"
            return 1

    cont = False
    if not options.sn:
        while (cont != True):
            lastname = raw_input("Last name: ")
            if (ipavalidate.String(lastname, notEmpty=True)):
                print "Please enter a value"
            else:
                cont = True
    else:
        lastname = options.sn
        if (ipavalidate.String(lastname, notEmpty=True)):
            print "Please enter a value"
            return 1

    cont = False
    if (len(args) != 2):
        while (cont != True):
            username = raw_input("Login name: ")
            if (ipavalidate.Plain(username, notEmpty=True, allowSpaces=False)):
                print "Please enter a value"
            else:
                cont = True
    else:
        username = args[1]
        if (ipavalidate.Plain(username, notEmpty=True, allowSpaces=False)):
            print "Username is required and may only include letters and numbers"
            return 1

    if options.password_prompt:
        while (match != True):
            password = getpass.getpass("  Password: ")
            confirm = getpass.getpass("  Password (again): ")
            if (password != confirm):
                print "Passwords do not match"
                match = False
            else:
                match = True
                if (len(password) < 1):
                    print "Password cannot be empty"
                    match = False
    else:
        password = options.password

    if options.mail:
        mail = options.mail
        if (ipavalidate.Email(mail)):
            print "The email provided seem not a valid email."
            return 1

    # Ask the questions we don't normally force. We don't require answers
    # for these.
    if all_interactive is True:
        cont = False
        if not options.gecos:
            while (cont != True):
                gecos = raw_input("gecos []: ")
                if (ipavalidate.String(gecos, notEmpty=False)):
                    print "Please enter a value"
                else:
                    cont = True
        cont = False
        if not options.directory:
            while (cont != True):
                directory = raw_input("home directory [/home/"+username+"]: ")
                if directory == "":
                     directory = "/home/"+username
                if (ipavalidate.Path(directory, notEmpty=False)):
                    print "Please enter a value"
                else:
                    cont = True
        cont = False
        if not options.shell:
            while (cont != True):
                shell = raw_input("shell [/bin/sh]: ")

                if len(shell) < 1:
                    shell = None
                cont = True

    else:
        gecos = options.gecos
        directory = options.directory
        shell = options.shell
        groups = options.groups

    if options.principal:
        principal = options.principal
    else:
        ctx = krbV.default_context()
        principal = username + "@" + ctx.default_realm

    user.setValue('givenname', givenname)
    user.setValue('sn', lastname)
    user.setValue('uid', username)
    user.setValue('krbprincipalname', principal)
    if mail:
        user.setValue('mail', mail)
    if gecos:
        user.setValue('gecos', gecos)
    if directory:
        user.setValue('homedirectory', directory)
    if shell:
        user.setValue('loginshell', shell)

    if options.setattr:
        for s in options.setattr:
            s = s.split('=')
            if len(s) != 2:
                set_add_usage("set")
                sys.exit(1)
            (attr,value) = s
            user.setValue(attr, value)

    if options.addattr:
        for a in options.addattr:
            a = a.split('=')
            if len(a) != 2:
                set_add_usage("add")
                sys.exit(1)
            (attr,value) = a
            cvalue = user.getValue(attr)
            if cvalue:
                if isinstance(cvalue,str):
                    cvalue = [cvalue]
                value = cvalue + [value]
            user.setValue(attr, value)

    client = ipaclient.IPAClient(verbose=options.verbose)
    client.add_user(user)

    # Set the User's password
    if password is not None:
        try:
            client.modifyPassword(principal, '', password)
        except ipa.ipaerror.IPAError, e:
            print "User added but setting the password failed."
            print "%s" % (e.message)
            return 1

    # Add to any groups
    if groups:
        add_groups = groups.split(',')
        for g in add_groups:
            if g:
                try:
                    client.add_user_to_group(username, g)
                    print "%s added to group %s" % (username, g)
                except ipa.ipaerror.exception_for(ipa.ipaerror.LDAP_NOT_FOUND):
                    print "group %s doesn't exist, skipping" % g

    print username + " successfully added"
    return 0

try:
    if __name__ == "__main__":
        sys.exit(main())
except SystemExit, e:
    sys.exit(e)
except KeyboardInterrupt, e:
    sys.exit(1)
except xmlrpclib.Fault, fault:
    if fault.faultCode == errno.ECONNREFUSED:
        print "The IPA XML-RPC service is not responding."
    else:
        print fault.faultString
    sys.exit(1)
except kerberos.GSSError, e:
    print "Could not initialize GSSAPI: %s/%s" % (ipautil.get_gsserror(e))
    sys.exit(1)
except xmlrpclib.ProtocolError, e:
    print "Unable to connect to IPA server: %s" % (e.errmsg)
    sys.exit(1)
except ipa.ipaerror.IPAError, e:
    print "%s" % (e.message)
    sys.exit(1)
except socket.error, e:
    print e[1]
    print "Re-run with -v flag for more details."
except Exception, e:
    print "%s" % str(e)
    sys.exit(1)