src/auth/passdb.c

	passdb.c revision 8ff9812659728d4166df8e003a1dd3524ae8514e
c25356d5978632df6203437e1953bcb29e0c736fTimo Sirainen/* Copyright (c) 2002-2011 Dovecot authors, see the included COPYING file */
c25356d5978632df6203437e1953bcb29e0c736fTimo Sirainen
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen#include "auth-common.h"
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen#include "array.h"
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen#include "password-scheme.h"
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen#include "auth-worker-server.h"
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen#include "passdb-template.h"
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen#include "passdb.h"
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen
2ed2459dbd183bb371da4a0aecb2d2b74ae7c815Timo Sirainen#include <stdlib.h>
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainenstatic ARRAY_DEFINE(passdb_interfaces, struct passdb_module_interface *);
ac4e6609cbdca594db1b1c02afb1e372ab22e060Timo Sirainenstatic ARRAY_DEFINE(passdb_modules, struct passdb_module *);
ac4e6609cbdca594db1b1c02afb1e372ab22e060Timo Sirainen
ac4e6609cbdca594db1b1c02afb1e372ab22e060Timo Sirainenstatic const struct passdb_module_interface passdb_iface_deinit = {
ac4e6609cbdca594db1b1c02afb1e372ab22e060Timo Sirainen    .name = "deinit"
ac4e6609cbdca594db1b1c02afb1e372ab22e060Timo Sirainen};
ac4e6609cbdca594db1b1c02afb1e372ab22e060Timo Sirainen
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainenstatic struct passdb_module_interface *passdb_interface_find(const char *name)
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen{
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen    struct passdb_module_interface *const *ifaces;
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen    array_foreach(&passdb_interfaces, ifaces) {
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen        struct passdb_module_interface *iface = *ifaces;
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen        if (strcmp(iface->name, name) == 0)
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen            return iface;
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen    }
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen    return NULL;
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen}
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainenvoid passdb_register_module(struct passdb_module_interface *iface)
2ed2459dbd183bb371da4a0aecb2d2b74ae7c815Timo Sirainen{
2ed2459dbd183bb371da4a0aecb2d2b74ae7c815Timo Sirainen    struct passdb_module_interface *old_iface;
4321f6c969e7b8f6b243ff5bb6b8d297921676f6Timo Sirainen
910fa4e4204a73d3d24c03f3059dd24e727ca057Timo Sirainen    old_iface = passdb_interface_find(iface->name);
4321f6c969e7b8f6b243ff5bb6b8d297921676f6Timo Sirainen    if (old_iface != NULL && old_iface->verify_plain == NULL) {
4321f6c969e7b8f6b243ff5bb6b8d297921676f6Timo Sirainen        /* replacing a "support not compiled in" passdb */
910fa4e4204a73d3d24c03f3059dd24e727ca057Timo Sirainen        passdb_unregister_module(old_iface);
4321f6c969e7b8f6b243ff5bb6b8d297921676f6Timo Sirainen    } else if (old_iface != NULL) {
4321f6c969e7b8f6b243ff5bb6b8d297921676f6Timo Sirainen        i_panic("passdb_register_module(%s): Already registered",
4321f6c969e7b8f6b243ff5bb6b8d297921676f6Timo Sirainen            iface->name);
306b3f41b05da642d87e7ca7a1496efce9f5902fTimo Sirainen    }
306b3f41b05da642d87e7ca7a1496efce9f5902fTimo Sirainen    array_append(&passdb_interfaces, &iface, 1);
306b3f41b05da642d87e7ca7a1496efce9f5902fTimo Sirainen}
56b134799a457fd55830355f4c8d746d6bb5206fTimo Sirainen
56b134799a457fd55830355f4c8d746d6bb5206fTimo Sirainenvoid passdb_unregister_module(struct passdb_module_interface *iface)
56b134799a457fd55830355f4c8d746d6bb5206fTimo Sirainen{
a69dfb7f6f1a804a0c91fd5e506b78dd499cccd4Timo Sirainen    struct passdb_module_interface *const *ifaces;
2898ad0028a9b0c30df96dd6b68930fd4dc57527Timo Sirainen    unsigned int idx;
2898ad0028a9b0c30df96dd6b68930fd4dc57527Timo Sirainen
a0cd302bcb827678f9c9c2ca1d0a3f0d3c0b3563Timo Sirainen    array_foreach(&passdb_interfaces, ifaces) {
a0cd302bcb827678f9c9c2ca1d0a3f0d3c0b3563Timo Sirainen        if (*ifaces == iface) {
a0cd302bcb827678f9c9c2ca1d0a3f0d3c0b3563Timo Sirainen            idx = array_foreach_idx(&passdb_interfaces, ifaces);
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen            array_delete(&passdb_interfaces, idx, 1);
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen            return;
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen        }
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen    }
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen    i_panic("passdb_unregister_module(%s): Not registered", iface->name);
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen}
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen
7b85f7d35b2192bdff734d7d2891630bc30b2518Timo Sirainenbool passdb_get_credentials(struct auth_request *auth_request,
9e9f0cf3cc3ce546e8a433990c92dd9be6665df6Timo Sirainen                const char *input, const char *input_scheme,
7b85f7d35b2192bdff734d7d2891630bc30b2518Timo Sirainen                const unsigned char **credentials_r, size_t *size_r)
7b85f7d35b2192bdff734d7d2891630bc30b2518Timo Sirainen{
7b85f7d35b2192bdff734d7d2891630bc30b2518Timo Sirainen    const char *wanted_scheme = auth_request->credentials_scheme;
9e9f0cf3cc3ce546e8a433990c92dd9be6665df6Timo Sirainen    const char *plaintext, *username, *error;
ff7056842f14fd3b30a2d327dfab165b9d15dd30Timo Sirainen    int ret;

    if (auth_request->prefer_plain_credentials &&
        password_scheme_is_alias(input_scheme, "PLAIN")) {
        /* we've a plaintext scheme and we prefer to get it instead
           of converting it to the fallback scheme */
        wanted_scheme = "";
    }

    ret = password_decode(input, input_scheme,
                  credentials_r, size_r, &error);
    if (ret <= 0) {
        if (ret < 0) {
            auth_request_log_error(auth_request, "password",
                "Password data is not valid for scheme %s: %s",
                input_scheme, error);
        } else {
            auth_request_log_error(auth_request, "password",
                "Unknown scheme %s", input_scheme);
        }
        return FALSE;
    }

    if (*wanted_scheme == '\0') {
        /* anything goes. change the credentials_scheme to what we
           actually got, so blocking passdbs work. */
        auth_request->credentials_scheme =
            p_strdup(auth_request->pool, input_scheme);
        return TRUE;
    }

    if (!password_scheme_is_alias(input_scheme, wanted_scheme)) {
        if (!password_scheme_is_alias(input_scheme, "PLAIN")) {
            const char *error = t_strdup_printf(
                "Requested %s scheme, but we have only %s",
                wanted_scheme, input_scheme);
            if (auth_request->set->debug_passwords) {
                error = t_strdup_printf("%s (input: %s)",
                            error, input);
            }
            auth_request_log_info(auth_request, "password",
                          "%s", error);
            return FALSE;
        }

        /* we can generate anything out of plaintext passwords */
        plaintext = t_strndup(*credentials_r, *size_r);
        username = auth_request->original_username;
        if (!auth_request->domain_is_realm &&
            strchr(username, '@') != NULL) {
            /* domain must not be used as realm. add the @realm. */
            username = t_strconcat(username, "@",
                           auth_request->realm, NULL);
        }
        if (auth_request->set->debug_passwords) {
            auth_request_log_debug(auth_request, "password",
                "Generating %s from user '%s', password '%s'",
                wanted_scheme, username, plaintext);
        }
        if (!password_generate(plaintext, username,
                       wanted_scheme, credentials_r, size_r)) {
            auth_request_log_error(auth_request, "password",
                "Requested unknown scheme %s", wanted_scheme);
            return FALSE;
        }
    }

    return TRUE;
}

void passdb_handle_credentials(enum passdb_result result,
                   const char *password, const char *scheme,
                   lookup_credentials_callback_t *callback,
                               struct auth_request *auth_request)
{
    const unsigned char *credentials = NULL;
    size_t size = 0;

    if (result != PASSDB_RESULT_OK) {
        callback(result, NULL, 0, auth_request);
        return;
    }

    if (password != NULL) {
        if (!passdb_get_credentials(auth_request, password, scheme,
                        &credentials, &size))
            result = PASSDB_RESULT_SCHEME_NOT_AVAILABLE;
    } else if (*auth_request->credentials_scheme == '\0') {
        /* We're doing a passdb lookup (not authenticating).
           Pass through a NULL password without an error. */
    } else {
        auth_request_log_info(auth_request, "password",
            "Requested %s scheme, but we have a NULL password",
            auth_request->credentials_scheme);
        result = PASSDB_RESULT_SCHEME_NOT_AVAILABLE;
    }

    callback(result, credentials, size, auth_request);
}

static struct passdb_module *
passdb_find(const char *driver, const char *args, unsigned int *idx_r)
{
    struct passdb_module *const *passdbs;
    unsigned int i, count;

    passdbs = array_get(&passdb_modules, &count);
    for (i = 0; i < count; i++) {
        if (strcmp(passdbs[i]->iface.name, driver) == 0 &&
            strcmp(passdbs[i]->args, args) == 0) {
            *idx_r = i;
            return passdbs[i];
        }
    }
    return NULL;
}

struct passdb_module *
passdb_preinit(pool_t pool, const struct auth_passdb_settings *set)
{
    static unsigned int auth_passdb_id = 0;
    struct passdb_module_interface *iface;
    struct passdb_module *passdb;
    unsigned int idx;

    iface = passdb_interface_find(set->driver);
    if (iface == NULL || iface->verify_plain == NULL) {
        /* maybe it's a plugin. try to load it. */
        auth_module_load(t_strconcat("authdb_", set->driver, NULL));
        iface = passdb_interface_find(set->driver);
    }
    if (iface == NULL)
        i_fatal("Unknown passdb driver '%s'", set->driver);
    if (iface->verify_plain == NULL) {
        i_fatal("Support not compiled in for passdb driver '%s'",
            set->driver);
    }
    if (iface->preinit == NULL && iface->init == NULL &&
        *set->args != '\0') {
        i_fatal("passdb %s: No args are supported: %s",
            set->driver, set->args);
    }

    passdb = passdb_find(set->driver, set->args, &idx);
    if (passdb != NULL)
        return passdb;

    if (iface->preinit == NULL)
        passdb = p_new(pool, struct passdb_module, 1);
    else
        passdb = iface->preinit(pool, set->args);
    passdb->id = ++auth_passdb_id;
    passdb->iface = *iface;
    passdb->args = p_strdup(pool, set->args);

    passdb->default_fields_tmpl =
        passdb_template_build(pool, set->default_fields);
    passdb->override_fields_tmpl =
        passdb_template_build(pool, set->override_fields);

    array_append(&passdb_modules, &passdb, 1);
    return passdb;
}

void passdb_init(struct passdb_module *passdb)
{
    if (passdb->iface.init != NULL && passdb->init_refcount == 0)
        passdb->iface.init(passdb);
    passdb->init_refcount++;

    i_assert(passdb->default_pass_scheme != NULL ||
         passdb->cache_key == NULL);
}

void passdb_deinit(struct passdb_module *passdb)
{
    unsigned int idx;

    i_assert(passdb->init_refcount > 0);

    if (--passdb->init_refcount > 0)
        return;

    if (passdb_find(passdb->iface.name, passdb->args, &idx) == NULL)
        i_unreached();
    array_delete(&passdb_modules, idx, 1);

    if (passdb->iface.deinit != NULL)
        passdb->iface.deinit(passdb);

    /* make sure passdb isn't accessed again */
    passdb->iface = passdb_iface_deinit;
}

void passdbs_generate_md5(unsigned char md5[MD5_RESULTLEN])
{
    struct md5_context ctx;
    struct passdb_module *const *passdbs;
    unsigned int i, count;

    md5_init(&ctx);
    passdbs = array_get(&passdb_modules, &count);
    for (i = 0; i < count; i++) {
        md5_update(&ctx, &passdbs[i]->id, sizeof(passdbs[i]->id));
        md5_update(&ctx, passdbs[i]->iface.name,
               strlen(passdbs[i]->iface.name));
        md5_update(&ctx, passdbs[i]->args, strlen(passdbs[i]->args));
    }
    md5_final(&ctx, md5);
}

extern struct passdb_module_interface passdb_passwd;
extern struct passdb_module_interface passdb_bsdauth;
extern struct passdb_module_interface passdb_shadow;
extern struct passdb_module_interface passdb_passwd_file;
extern struct passdb_module_interface passdb_pam;
extern struct passdb_module_interface passdb_checkpassword;
extern struct passdb_module_interface passdb_vpopmail;
extern struct passdb_module_interface passdb_ldap;
extern struct passdb_module_interface passdb_sql;
extern struct passdb_module_interface passdb_sia;
extern struct passdb_module_interface passdb_static;

void passdbs_init(void)
{
    i_array_init(&passdb_interfaces, 16);
    i_array_init(&passdb_modules, 16);
    passdb_register_module(&passdb_passwd);
    passdb_register_module(&passdb_bsdauth);
    passdb_register_module(&passdb_passwd_file);
    passdb_register_module(&passdb_pam);
    passdb_register_module(&passdb_checkpassword);
    passdb_register_module(&passdb_shadow);
    passdb_register_module(&passdb_vpopmail);
    passdb_register_module(&passdb_ldap);
    passdb_register_module(&passdb_sql);
    passdb_register_module(&passdb_sia);
    passdb_register_module(&passdb_static);
}

void passdbs_deinit(void)
{
    array_free(&passdb_modules);
    array_free(&passdb_interfaces);
}