source: trunk/server/source4/auth/ntlm/auth_server.c

/* 
   Unix SMB/CIFS implementation.
   Authenticate by using a remote server
   Copyright (C) Andrew Bartlett         2001-2002, 2008
   Copyright (C) Jelmer Vernooij              2002
   Copyright (C) Stefan Metzmacher            2005
   
   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/>.
*/

#include "includes.h"
#include "auth/auth.h"
#include "auth/credentials/credentials.h"
#include "libcli/security/security.h"
#include "libcli/smb_composite/smb_composite.h"
#include "param/param.h"
#include "libcli/resolve/resolve.h"

/* This version of 'security=server' rewirtten from scratch for Samba4
 * libraries in 2008 */


static NTSTATUS server_want_check(struct auth_method_context *ctx,
                                            TALLOC_CTX *mem_ctx,
                                            const struct auth_usersupplied_info *user_info)
{
        return NT_STATUS_OK;
}
/** 
 * The challenge from the target server, when operating in security=server
 **/
static NTSTATUS server_get_challenge(struct auth_method_context *ctx, TALLOC_CTX *mem_ctx, uint8_t chal[8])
{
        struct smb_composite_connect io;
        struct smbcli_options smb_options;
        const char **host_list;
        NTSTATUS status;

        /* Make a connection to the target server, found by 'password server' in smb.conf */
        
        lpcfg_smbcli_options(ctx->auth_ctx->lp_ctx, &smb_options);

        /* Make a negprot, WITHOUT SPNEGO, so we get a challenge nice an easy */
        io.in.options.use_spnego = false;

        /* Hope we don't get * (the default), as this won't work... */
        host_list = lpcfg_passwordserver(ctx->auth_ctx->lp_ctx);
        if (!host_list) {
                return NT_STATUS_INTERNAL_ERROR;
        }
        io.in.dest_host = host_list[0];
        if (strequal(io.in.dest_host, "*")) {
                return NT_STATUS_INTERNAL_ERROR;
        }
        io.in.dest_ports = lpcfg_smb_ports(ctx->auth_ctx->lp_ctx);
        io.in.socket_options = lpcfg_socket_options(ctx->auth_ctx->lp_ctx);
        io.in.gensec_settings = lpcfg_gensec_settings(mem_ctx, ctx->auth_ctx->lp_ctx);

        io.in.called_name = strupper_talloc(mem_ctx, io.in.dest_host);

        /* We don't want to get as far as the session setup */
        io.in.credentials = cli_credentials_init_anon(mem_ctx);
        cli_credentials_set_workstation(io.in.credentials,
                                        lpcfg_netbios_name(ctx->auth_ctx->lp_ctx),
                                        CRED_SPECIFIED);

        io.in.service = NULL;

        io.in.workgroup = ""; /* only used with SPNEGO, disabled above */

        io.in.options = smb_options;
        
        lpcfg_smbcli_session_options(ctx->auth_ctx->lp_ctx, &io.in.session_options);

        status = smb_composite_connect(&io, mem_ctx, lpcfg_resolve_context(ctx->auth_ctx->lp_ctx),
                                       ctx->auth_ctx->event_ctx);
        NT_STATUS_NOT_OK_RETURN(status);

        if (io.out.tree->session->transport->negotiate.secblob.length != 8) {
                return NT_STATUS_INTERNAL_ERROR;
        }
        memcpy(chal, io.out.tree->session->transport->negotiate.secblob.data, 8);
        ctx->private_data = talloc_steal(ctx, io.out.tree->session);
        return NT_STATUS_OK;
}

/** 
 * Return an error based on username
 *
 * This function allows the testing of obsure errors, as well as the generation
 * of NT_STATUS -> DOS error mapping tables.
 *
 * This module is of no value to end-users.
 *
 * The password is ignored.
 *
 * @return An NTSTATUS value based on the username
 **/

static NTSTATUS server_check_password(struct auth_method_context *ctx,
                                      TALLOC_CTX *mem_ctx,
                                      const struct auth_usersupplied_info *user_info, 
                                      struct auth_user_info_dc **_user_info_dc)
{
        NTSTATUS nt_status;
        struct auth_user_info_dc *user_info_dc;
        struct auth_user_info *info;
        struct cli_credentials *creds;
        struct smb_composite_sesssetup session_setup;

        struct smbcli_session *session = talloc_get_type(ctx->private_data, struct smbcli_session);

        creds = cli_credentials_init(mem_ctx);

        NT_STATUS_HAVE_NO_MEMORY(creds);
        
        cli_credentials_set_username(creds, user_info->client.account_name, CRED_SPECIFIED);
        cli_credentials_set_domain(creds, user_info->client.domain_name, CRED_SPECIFIED);

        switch (user_info->password_state) {
        case AUTH_PASSWORD_PLAIN:
                cli_credentials_set_password(creds, user_info->password.plaintext, 
                                             CRED_SPECIFIED);
                break;
        case AUTH_PASSWORD_HASH:
                cli_credentials_set_nt_hash(creds, user_info->password.hash.nt,
                                            CRED_SPECIFIED);
                break;
                
        case AUTH_PASSWORD_RESPONSE:
                cli_credentials_set_ntlm_response(creds, &user_info->password.response.lanman, &user_info->password.response.nt, CRED_SPECIFIED);
                break;
        }

        session_setup.in.sesskey = session->transport->negotiate.sesskey;
        session_setup.in.capabilities = session->transport->negotiate.capabilities;

        session_setup.in.credentials = creds;
        session_setup.in.workgroup = ""; /* Only used with SPNEGO, which we are not doing */
        session_setup.in.gensec_settings = lpcfg_gensec_settings(session, ctx->auth_ctx->lp_ctx);

        /* Check password with remove server - this should be async some day */
        nt_status = smb_composite_sesssetup(session, &session_setup);

        if (!NT_STATUS_IS_OK(nt_status)) {
                return nt_status;
        }

        user_info_dc = talloc(mem_ctx, struct auth_user_info_dc);
        NT_STATUS_HAVE_NO_MEMORY(user_info_dc);

        user_info_dc->num_sids = 1;

        /* This returns a pointer to a struct dom_sid, which is the
         * same as a 1 element list of struct dom_sid */
        user_info_dc->sids = dom_sid_parse_talloc(user_info_dc, SID_NT_ANONYMOUS);
        NT_STATUS_HAVE_NO_MEMORY(user_info_dc->sids);

        /* annoying, but the Anonymous really does have a session key, 
           and it is all zeros! */
        user_info_dc->user_session_key = data_blob(NULL, 0);
        user_info_dc->lm_session_key = data_blob(NULL, 0);

        user_info_dc->info = info = talloc_zero(user_info_dc, struct auth_user_info);
        NT_STATUS_HAVE_NO_MEMORY(user_info_dc->info);

        info->account_name = talloc_strdup(user_info_dc, user_info->client.account_name);
        NT_STATUS_HAVE_NO_MEMORY(info->account_name);

        info->domain_name = talloc_strdup(user_info_dc, user_info->client.domain_name);
        NT_STATUS_HAVE_NO_MEMORY(info->domain_name);

        info->full_name = NULL;

        info->logon_script = talloc_strdup(user_info_dc, "");
        NT_STATUS_HAVE_NO_MEMORY(info->logon_script);

        info->profile_path = talloc_strdup(user_info_dc, "");
        NT_STATUS_HAVE_NO_MEMORY(info->profile_path);

        info->home_directory = talloc_strdup(user_info_dc, "");
        NT_STATUS_HAVE_NO_MEMORY(info->home_directory);

        info->home_drive = talloc_strdup(user_info_dc, "");
        NT_STATUS_HAVE_NO_MEMORY(info->home_drive);

        info->last_logon = 0;
        info->last_logoff = 0;
        info->acct_expiry = 0;
        info->last_password_change = 0;
        info->allow_password_change = 0;
        info->force_password_change = 0;

        info->logon_count = 0;
        info->bad_password_count = 0;

        info->acct_flags = ACB_NORMAL;

        info->authenticated = false;

        *_user_info_dc = user_info_dc;

        return nt_status;
}

static const struct auth_operations server_auth_ops = {
        .name           = "server",
        .get_challenge  = server_get_challenge,
        .want_check     = server_want_check,
        .check_password = server_check_password
};

_PUBLIC_ NTSTATUS auth_server_init(void)
{
        NTSTATUS ret;

        ret = auth_register(&server_auth_ops);
        if (!NT_STATUS_IS_OK(ret)) {
                DEBUG(0,("Failed to register 'server' auth backend!\n"));
                return ret;
        }

        return ret;
}