src/auth/passdb-sql.c

	passdb-sql.c revision 66d2db642fe24d555d113ba463e446b038d476ef
/* Copyright (C) 2004 Timo Sirainen, Alex Howansky */

#include "config.h"
#undef HAVE_CONFIG_H

#ifdef PASSDB_SQL

#include "common.h"
#include "str.h"
#include "strescape.h"
#include "var-expand.h"
#include "password-scheme.h"
#include "auth-cache.h"
#include "db-sql.h"
#include "passdb.h"

#include <stdlib.h>
#include <string.h>

extern struct passdb_module passdb_sql;

struct passdb_sql_request {
    struct auth_request *auth_request;
    enum passdb_credentials credentials;
    union {
        verify_plain_callback_t *verify_plain;
                lookup_credentials_callback_t *lookup_credentials;
    } callback;
};

static struct sql_connection *passdb_sql_conn;
static char *passdb_sql_cache_key;

static void sql_query_save_results(struct sql_result *result,
                   struct passdb_sql_request *sql_request)
{
    struct auth_request *auth_request = sql_request->auth_request;
    unsigned int i, fields_count;
    const char *name, *value;

        fields_count = sql_result_get_fields_count(result);
    for (i = 0; i < fields_count; i++) {
        name = sql_result_get_field_name(result, i);
        value = sql_result_get_field_value(result, i);

        if (value != NULL)
            auth_request_set_field(auth_request, name, value);
    }
}

static void sql_query_callback(struct sql_result *result, void *context)
{
    struct passdb_sql_request *sql_request = context;
    struct auth_request *auth_request = sql_request->auth_request;
    enum passdb_result passdb_result;
    const char *user, *password, *scheme;
    int ret;

    passdb_result = PASSDB_RESULT_INTERNAL_FAILURE;
    user = auth_request->user;
    password = NULL;

    ret = sql_result_next_row(result);
    if (ret < 0) {
        auth_request_log_error(auth_request, "sql",
                       "Password query failed: %s",
                       sql_result_get_error(result));
    } else if (ret == 0) {
        auth_request_log_info(auth_request, "sql", "unknown user");
        passdb_result = PASSDB_RESULT_USER_UNKNOWN;
    } else {
        sql_query_save_results(result, sql_request);

        if (auth_request->passdb_password == NULL) {
            auth_request_log_error(auth_request, "sql",
                "Password query must return a field named "
                "'password'");
        } else if (sql_result_next_row(result) > 0) {
            auth_request_log_error(auth_request, "sql",
                "Password query returned multiple matches");
        } else {
            password = auth_request->passdb_password;
            passdb_result = PASSDB_RESULT_OK;
        }
    }

    scheme = password_get_scheme(&password);
    if (scheme == NULL) {
        scheme = passdb_sql_conn->set.default_pass_scheme;
        i_assert(scheme != NULL);
    }

    if (sql_request->credentials != -1) {
        passdb_handle_credentials(passdb_result,
            sql_request->credentials, password, scheme,
            sql_request->callback.lookup_credentials,
            auth_request);
        return;
    }

    /* verify plain */
    if (password == NULL) {
        sql_request->callback.verify_plain(passdb_result, auth_request);
        return;
    }

    ret = password_verify(auth_request->mech_password, password,
                  scheme, user);
    if (ret < 0) {
        auth_request_log_error(auth_request, "sql",
                       "Unknown password scheme %s", scheme);
    } else if (ret == 0) {
        auth_request_log_info(auth_request, "sql", "Password mismatch");
    }

    sql_request->callback.verify_plain(ret > 0 ? PASSDB_RESULT_OK :
                       PASSDB_RESULT_PASSWORD_MISMATCH,
                       auth_request);
}

static void sql_lookup_pass(struct passdb_sql_request *sql_request)
{
    string_t *query;

    query = t_str_new(512);
    var_expand(query, passdb_sql_conn->set.password_query,
           auth_request_get_var_expand_table(sql_request->auth_request,
                             str_escape));

    auth_request_log_debug(sql_request->auth_request, "sql",
                   "query: %s", str_c(query));

    sql_query(passdb_sql_conn->db, str_c(query),
          sql_query_callback, sql_request);
}

static void sql_verify_plain(struct auth_request *request,
                 const char *password __attr_unused__,
                 verify_plain_callback_t *callback)
{
    struct passdb_sql_request *sql_request;

    sql_request = p_new(request->pool, struct passdb_sql_request, 1);
    sql_request->auth_request = request;
    sql_request->credentials = -1;
    sql_request->callback.verify_plain = callback;

    sql_lookup_pass(sql_request);
}

static void sql_lookup_credentials(struct auth_request *request,
                   enum passdb_credentials credentials,
                   lookup_credentials_callback_t *callback)
{
    struct passdb_sql_request *sql_request;

    sql_request = p_new(request->pool, struct passdb_sql_request, 1);
    sql_request->auth_request = request;
    sql_request->credentials = credentials;
    sql_request->callback.lookup_credentials = callback;

        sql_lookup_pass(sql_request);
}

static void passdb_sql_preinit(const char *args)
{
    passdb_sql_conn = db_sql_init(args);

    passdb_sql.cache_key = passdb_sql_cache_key =
        auth_cache_parse_key(passdb_sql_conn->set.password_query);
    passdb_sql.default_pass_scheme =
        passdb_sql_conn->set.default_pass_scheme;
}

static void passdb_sql_init(const char *args __attr_unused__)
{
    enum sql_db_flags flags;

    db_sql_connect(passdb_sql_conn);

    flags = sql_get_flags(passdb_sql_conn->db);
    passdb_sql.blocking = (flags & SQL_DB_FLAG_BLOCKING) != 0;
}

static void passdb_sql_deinit(void)
{
    db_sql_unref(passdb_sql_conn);
    i_free(passdb_sql_cache_key);
}

struct passdb_module passdb_sql = {
    "sql",
    NULL, NULL, FALSE,

    passdb_sql_preinit,
    passdb_sql_init,
    passdb_sql_deinit,

    sql_verify_plain,
    sql_lookup_credentials
};

#endif