#! /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
from optparse import OptionParser
import ipa
import ipa.user
import ipa.ipaclient as ipaclient
import ipa.ipavalidate as ipavalidate
import ipa.config

import xmlrpclib
import kerberos
import krbV
import ldap
import getpass

def usage():
    print "ipa-adduser [-c|--gecos STRING] [-d|--directory STRING] [-f|--firstname STRING] [-l|--lastname STRING] user"
    sys.exit(1)

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("-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")

    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 len(args) != 2:
        all_interactive = True

    if not options.gn:
        while (cont != True):
            givenname = raw_input("First name: ")
            if (ipavalidate.plain(givenname, notEmpty=True)):
                print "Field is required and must be letters or '"
            else:
                cont = True
    else:
        givenname = options.gn
        if (ipavalidate.plain(givenname, notEmpty=True)):
            print "First name is required and must be letters or '"
            return 1

    cont = False
    if not options.sn:
        while (cont != True):
            lastname = raw_input("Last name: ")
            if (ipavalidate.plain(lastname, notEmpty=True)):
                print "Field is required and must be letters or '"
            else:
                cont = True
    else:
        lastname = options.sn
        if (ipavalidate.plain(lastname, notEmpty=True)):
            print "Last name is required and must be letters or '"
            return 1

    cont = False
    if (len(args) != 2):
        while (cont != True):
            username = raw_input("Login name: ")
            if (ipavalidate.plain(username, notEmpty=True)):
                print "Field is required and must be letters or '"
            else:
                cont = True
    else:
        username = args[1]
        if (ipavalidate.plain(username, notEmpty=True)):
            print "Username is required and must be letters or '"
            return 1

    if not options.password:
        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.sn

    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.plain(gecos, notEmpty=False)):
                    print "Must be letters, numbers, spaces or '"
                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 "Must be letters, numbers, spaces or '"
                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)
    else:
        user.setValue('loginshell', "/bin/sh")

    try:
        client = ipaclient.IPAClient()
        client.add_user(user)
    except xmlrpclib.Fault, f:
        print f.faultString
        return 1
    except kerberos.GSSError, e:
        print "Could not initialize GSSAPI: %s/%s" % (e[0][0][0], e[0][1][0])
        return 1
    except xmlrpclib.ProtocolError, e:
        print "Unable to connect to IPA server: %s" % (e.errmsg)
        return 1
    except ipa.ipaerror.IPAError, e:
        print "%s" % (e.message)
        return 1

    # Set the User's password
    if password is not None:
        try:
            client.modifyPassword(principal, None, 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

if __name__ == "__main__":
    sys.exit(main())
