2000-01-09 20:58:00 +00:00
|
|
|
/*
|
2011-10-05 07:23:29 +00:00
|
|
|
* Copyright (c) 1997 - 2006 Kungliga Tekniska Högskolan
|
|
|
|
* (Royal Institute of Technology, Stockholm, Sweden).
|
|
|
|
* All rights reserved.
|
2000-01-09 20:58:00 +00:00
|
|
|
*
|
2011-10-05 07:23:29 +00:00
|
|
|
* Redistribution and use in source and binary forms, with or without
|
|
|
|
* modification, are permitted provided that the following conditions
|
|
|
|
* are met:
|
2000-01-09 20:58:00 +00:00
|
|
|
*
|
2011-10-05 07:23:29 +00:00
|
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
|
|
* notice, this list of conditions and the following disclaimer.
|
2000-01-09 20:58:00 +00:00
|
|
|
*
|
2011-10-05 07:23:29 +00:00
|
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
|
|
* documentation and/or other materials provided with the distribution.
|
2000-01-09 20:58:00 +00:00
|
|
|
*
|
2011-10-05 07:23:29 +00:00
|
|
|
* 3. Neither the name of the Institute nor the names of its contributors
|
|
|
|
* may be used to endorse or promote products derived from this software
|
|
|
|
* without specific prior written permission.
|
2000-01-09 20:58:00 +00:00
|
|
|
*
|
2011-10-05 07:23:29 +00:00
|
|
|
* THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
|
|
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
|
|
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
|
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
|
|
* SUCH DAMAGE.
|
2000-01-09 20:58:00 +00:00
|
|
|
*/
|
|
|
|
|
|
|
|
#include "kadm5_locl.h"
|
|
|
|
|
2011-10-05 07:23:29 +00:00
|
|
|
RCSID("$Id$");
|
2008-05-07 13:39:42 +00:00
|
|
|
|
|
|
|
static kadm5_ret_t
|
2011-10-05 07:23:29 +00:00
|
|
|
add_tl_data(kadm5_principal_ent_t ent, int16_t type,
|
2008-05-07 13:39:42 +00:00
|
|
|
const void *data, size_t size)
|
|
|
|
{
|
|
|
|
krb5_tl_data *tl;
|
|
|
|
|
|
|
|
tl = calloc(1, sizeof(*tl));
|
|
|
|
if (tl == NULL)
|
|
|
|
return _kadm5_error_code(ENOMEM);
|
|
|
|
|
|
|
|
tl->tl_data_type = type;
|
|
|
|
tl->tl_data_length = size;
|
|
|
|
tl->tl_data_contents = malloc(size);
|
2011-10-05 07:23:29 +00:00
|
|
|
if (tl->tl_data_contents == NULL && size != 0) {
|
2008-05-07 13:39:42 +00:00
|
|
|
free(tl);
|
|
|
|
return _kadm5_error_code(ENOMEM);
|
|
|
|
}
|
|
|
|
memcpy(tl->tl_data_contents, data, size);
|
|
|
|
|
|
|
|
tl->tl_data_next = ent->tl_data;
|
|
|
|
ent->tl_data = tl;
|
|
|
|
ent->n_tl_data++;
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2011-10-05 07:23:29 +00:00
|
|
|
KRB5_LIB_FUNCTION krb5_ssize_t KRB5_LIB_CALL
|
2008-05-07 13:39:42 +00:00
|
|
|
_krb5_put_int(void *buffer, unsigned long value, size_t size); /* XXX */
|
2000-01-09 20:58:00 +00:00
|
|
|
|
|
|
|
kadm5_ret_t
|
2011-10-05 07:23:29 +00:00
|
|
|
kadm5_s_get_principal(void *server_handle,
|
|
|
|
krb5_principal princ,
|
|
|
|
kadm5_principal_ent_t out,
|
2008-05-07 13:39:42 +00:00
|
|
|
uint32_t mask)
|
2000-01-09 20:58:00 +00:00
|
|
|
{
|
|
|
|
kadm5_server_context *context = server_handle;
|
|
|
|
kadm5_ret_t ret;
|
2008-05-07 13:39:42 +00:00
|
|
|
hdb_entry_ex ent;
|
2011-10-05 07:23:29 +00:00
|
|
|
|
2008-05-07 13:39:42 +00:00
|
|
|
memset(&ent, 0, sizeof(ent));
|
|
|
|
ret = context->db->hdb_open(context->context, context->db, O_RDONLY, 0);
|
2000-01-09 20:58:00 +00:00
|
|
|
if(ret)
|
|
|
|
return ret;
|
2011-10-05 07:23:29 +00:00
|
|
|
ret = context->db->hdb_fetch_kvno(context->context, context->db, princ,
|
|
|
|
HDB_F_DECRYPT|HDB_F_GET_ANY|HDB_F_ADMIN_DATA, 0, &ent);
|
2008-05-07 13:39:42 +00:00
|
|
|
context->db->hdb_close(context->context, context->db);
|
2000-01-09 20:58:00 +00:00
|
|
|
if(ret)
|
|
|
|
return _kadm5_error_code(ret);
|
|
|
|
|
|
|
|
memset(out, 0, sizeof(*out));
|
|
|
|
if(mask & KADM5_PRINCIPAL)
|
2011-10-05 07:23:29 +00:00
|
|
|
ret = krb5_copy_principal(context->context, ent.entry.principal,
|
2000-01-09 20:58:00 +00:00
|
|
|
&out->principal);
|
|
|
|
if(ret)
|
|
|
|
goto out;
|
2008-05-07 13:39:42 +00:00
|
|
|
if(mask & KADM5_PRINC_EXPIRE_TIME && ent.entry.valid_end)
|
|
|
|
out->princ_expire_time = *ent.entry.valid_end;
|
|
|
|
if(mask & KADM5_PW_EXPIRATION && ent.entry.pw_end)
|
|
|
|
out->pw_expiration = *ent.entry.pw_end;
|
2000-01-09 20:58:00 +00:00
|
|
|
if(mask & KADM5_LAST_PWD_CHANGE)
|
2008-05-07 13:39:42 +00:00
|
|
|
hdb_entry_get_pw_change_time(&ent.entry, &out->last_pwd_change);
|
2000-01-09 20:58:00 +00:00
|
|
|
if(mask & KADM5_ATTRIBUTES){
|
2008-05-07 13:39:42 +00:00
|
|
|
out->attributes |= ent.entry.flags.postdate ? 0 : KRB5_KDB_DISALLOW_POSTDATED;
|
|
|
|
out->attributes |= ent.entry.flags.forwardable ? 0 : KRB5_KDB_DISALLOW_FORWARDABLE;
|
|
|
|
out->attributes |= ent.entry.flags.initial ? KRB5_KDB_DISALLOW_TGT_BASED : 0;
|
|
|
|
out->attributes |= ent.entry.flags.renewable ? 0 : KRB5_KDB_DISALLOW_RENEWABLE;
|
|
|
|
out->attributes |= ent.entry.flags.proxiable ? 0 : KRB5_KDB_DISALLOW_PROXIABLE;
|
|
|
|
out->attributes |= ent.entry.flags.invalid ? KRB5_KDB_DISALLOW_ALL_TIX : 0;
|
|
|
|
out->attributes |= ent.entry.flags.require_preauth ? KRB5_KDB_REQUIRES_PRE_AUTH : 0;
|
|
|
|
out->attributes |= ent.entry.flags.server ? 0 : KRB5_KDB_DISALLOW_SVR;
|
|
|
|
out->attributes |= ent.entry.flags.change_pw ? KRB5_KDB_PWCHANGE_SERVICE : 0;
|
|
|
|
out->attributes |= ent.entry.flags.ok_as_delegate ? KRB5_KDB_OK_AS_DELEGATE : 0;
|
|
|
|
out->attributes |= ent.entry.flags.trusted_for_delegation ? KRB5_KDB_TRUSTED_FOR_DELEGATION : 0;
|
|
|
|
out->attributes |= ent.entry.flags.allow_kerberos4 ? KRB5_KDB_ALLOW_KERBEROS4 : 0;
|
|
|
|
out->attributes |= ent.entry.flags.allow_digest ? KRB5_KDB_ALLOW_DIGEST : 0;
|
2000-01-09 20:58:00 +00:00
|
|
|
}
|
2001-02-13 16:46:19 +00:00
|
|
|
if(mask & KADM5_MAX_LIFE) {
|
2008-05-07 13:39:42 +00:00
|
|
|
if(ent.entry.max_life)
|
|
|
|
out->max_life = *ent.entry.max_life;
|
2001-02-13 16:46:19 +00:00
|
|
|
else
|
|
|
|
out->max_life = INT_MAX;
|
|
|
|
}
|
2000-01-09 20:58:00 +00:00
|
|
|
if(mask & KADM5_MOD_TIME) {
|
2008-05-07 13:39:42 +00:00
|
|
|
if(ent.entry.modified_by)
|
|
|
|
out->mod_date = ent.entry.modified_by->time;
|
2000-01-09 20:58:00 +00:00
|
|
|
else
|
2008-05-07 13:39:42 +00:00
|
|
|
out->mod_date = ent.entry.created_by.time;
|
2000-01-09 20:58:00 +00:00
|
|
|
}
|
|
|
|
if(mask & KADM5_MOD_NAME) {
|
2008-05-07 13:39:42 +00:00
|
|
|
if(ent.entry.modified_by) {
|
|
|
|
if (ent.entry.modified_by->principal != NULL)
|
2011-10-05 07:23:29 +00:00
|
|
|
ret = krb5_copy_principal(context->context,
|
2008-05-07 13:39:42 +00:00
|
|
|
ent.entry.modified_by->principal,
|
2000-01-09 20:58:00 +00:00
|
|
|
&out->mod_name);
|
2008-05-07 13:39:42 +00:00
|
|
|
} else if(ent.entry.created_by.principal != NULL)
|
2011-10-05 07:23:29 +00:00
|
|
|
ret = krb5_copy_principal(context->context,
|
2008-05-07 13:39:42 +00:00
|
|
|
ent.entry.created_by.principal,
|
2000-01-09 20:58:00 +00:00
|
|
|
&out->mod_name);
|
2001-02-13 16:46:19 +00:00
|
|
|
else
|
|
|
|
out->mod_name = NULL;
|
2000-01-09 20:58:00 +00:00
|
|
|
}
|
|
|
|
if(ret)
|
|
|
|
goto out;
|
|
|
|
|
|
|
|
if(mask & KADM5_KVNO)
|
2008-05-07 13:39:42 +00:00
|
|
|
out->kvno = ent.entry.kvno;
|
2000-01-09 20:58:00 +00:00
|
|
|
if(mask & KADM5_MKVNO) {
|
2011-10-05 07:23:29 +00:00
|
|
|
size_t n;
|
2000-01-09 20:58:00 +00:00
|
|
|
out->mkvno = 0; /* XXX */
|
2008-05-07 13:39:42 +00:00
|
|
|
for(n = 0; n < ent.entry.keys.len; n++)
|
|
|
|
if(ent.entry.keys.val[n].mkvno) {
|
|
|
|
out->mkvno = *ent.entry.keys.val[n].mkvno; /* XXX this isn't right */
|
2000-01-09 20:58:00 +00:00
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
2011-10-05 07:23:29 +00:00
|
|
|
#if 0 /* XXX implement */
|
2000-01-09 20:58:00 +00:00
|
|
|
if(mask & KADM5_AUX_ATTRIBUTES)
|
2011-10-05 07:23:29 +00:00
|
|
|
;
|
|
|
|
if(mask & KADM5_LAST_SUCCESS)
|
|
|
|
;
|
|
|
|
if(mask & KADM5_LAST_FAILED)
|
|
|
|
;
|
|
|
|
if(mask & KADM5_FAIL_AUTH_COUNT)
|
|
|
|
;
|
|
|
|
#endif
|
2000-01-09 20:58:00 +00:00
|
|
|
if(mask & KADM5_POLICY)
|
|
|
|
out->policy = NULL;
|
2001-02-13 16:46:19 +00:00
|
|
|
if(mask & KADM5_MAX_RLIFE) {
|
2008-05-07 13:39:42 +00:00
|
|
|
if(ent.entry.max_renew)
|
|
|
|
out->max_renewable_life = *ent.entry.max_renew;
|
2001-02-13 16:46:19 +00:00
|
|
|
else
|
|
|
|
out->max_renewable_life = INT_MAX;
|
|
|
|
}
|
2000-01-09 20:58:00 +00:00
|
|
|
if(mask & KADM5_KEY_DATA){
|
2011-10-05 07:23:29 +00:00
|
|
|
size_t i;
|
2000-01-09 20:58:00 +00:00
|
|
|
Key *key;
|
|
|
|
krb5_key_data *kd;
|
|
|
|
krb5_salt salt;
|
|
|
|
krb5_data *sp;
|
2008-05-07 13:39:42 +00:00
|
|
|
krb5_get_pw_salt(context->context, ent.entry.principal, &salt);
|
|
|
|
out->key_data = malloc(ent.entry.keys.len * sizeof(*out->key_data));
|
2011-10-05 07:23:29 +00:00
|
|
|
if (out->key_data == NULL && ent.entry.keys.len != 0) {
|
2008-05-07 13:39:42 +00:00
|
|
|
ret = ENOMEM;
|
|
|
|
goto out;
|
|
|
|
}
|
|
|
|
for(i = 0; i < ent.entry.keys.len; i++){
|
|
|
|
key = &ent.entry.keys.val[i];
|
2000-01-09 20:58:00 +00:00
|
|
|
kd = &out->key_data[i];
|
|
|
|
kd->key_data_ver = 2;
|
2008-05-07 13:39:42 +00:00
|
|
|
kd->key_data_kvno = ent.entry.kvno;
|
2000-01-09 20:58:00 +00:00
|
|
|
kd->key_data_type[0] = key->key.keytype;
|
|
|
|
if(key->salt)
|
|
|
|
kd->key_data_type[1] = key->salt->type;
|
|
|
|
else
|
2001-02-13 16:46:19 +00:00
|
|
|
kd->key_data_type[1] = KRB5_PADATA_PW_SALT;
|
2000-01-09 20:58:00 +00:00
|
|
|
/* setup key */
|
|
|
|
kd->key_data_length[0] = key->key.keyvalue.length;
|
|
|
|
kd->key_data_contents[0] = malloc(kd->key_data_length[0]);
|
2011-10-05 07:23:29 +00:00
|
|
|
if(kd->key_data_contents[0] == NULL && kd->key_data_length[0] != 0){
|
2000-01-09 20:58:00 +00:00
|
|
|
ret = ENOMEM;
|
|
|
|
break;
|
|
|
|
}
|
2011-10-05 07:23:29 +00:00
|
|
|
memcpy(kd->key_data_contents[0], key->key.keyvalue.data,
|
2000-01-09 20:58:00 +00:00
|
|
|
kd->key_data_length[0]);
|
|
|
|
/* setup salt */
|
|
|
|
if(key->salt)
|
|
|
|
sp = &key->salt->salt;
|
|
|
|
else
|
|
|
|
sp = &salt.saltvalue;
|
|
|
|
kd->key_data_length[1] = sp->length;
|
|
|
|
kd->key_data_contents[1] = malloc(kd->key_data_length[1]);
|
|
|
|
if(kd->key_data_length[1] != 0
|
|
|
|
&& kd->key_data_contents[1] == NULL) {
|
|
|
|
memset(kd->key_data_contents[0], 0, kd->key_data_length[0]);
|
|
|
|
ret = ENOMEM;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
memcpy(kd->key_data_contents[1], sp->data, kd->key_data_length[1]);
|
|
|
|
out->n_key_data = i + 1;
|
|
|
|
}
|
|
|
|
krb5_free_salt(context->context, salt);
|
|
|
|
}
|
|
|
|
if(ret){
|
|
|
|
kadm5_free_principal_ent(context, out);
|
|
|
|
goto out;
|
|
|
|
}
|
2008-05-07 13:39:42 +00:00
|
|
|
if(mask & KADM5_TL_DATA) {
|
|
|
|
time_t last_pw_expire;
|
2011-10-05 07:23:29 +00:00
|
|
|
const HDB_Ext_PKINIT_acl *acl;
|
2008-05-07 13:39:42 +00:00
|
|
|
const HDB_Ext_Aliases *aliases;
|
|
|
|
|
|
|
|
ret = hdb_entry_get_pw_change_time(&ent.entry, &last_pw_expire);
|
|
|
|
if (ret == 0 && last_pw_expire) {
|
|
|
|
unsigned char buf[4];
|
|
|
|
_krb5_put_int(buf, last_pw_expire, sizeof(buf));
|
|
|
|
ret = add_tl_data(out, KRB5_TL_LAST_PWD_CHANGE, buf, sizeof(buf));
|
2022-11-26 17:06:09 +00:00
|
|
|
if (ret)
|
|
|
|
goto out;
|
2008-05-07 13:39:42 +00:00
|
|
|
}
|
|
|
|
if(ret){
|
|
|
|
kadm5_free_principal_ent(context, out);
|
|
|
|
goto out;
|
|
|
|
}
|
2011-10-05 07:23:29 +00:00
|
|
|
/*
|
2008-05-07 13:39:42 +00:00
|
|
|
* If the client was allowed to get key data, let it have the
|
|
|
|
* password too.
|
|
|
|
*/
|
|
|
|
if(mask & KADM5_KEY_DATA) {
|
|
|
|
heim_utf8_string pw;
|
|
|
|
|
2011-10-05 07:23:29 +00:00
|
|
|
ret = hdb_entry_get_password(context->context,
|
2008-05-07 13:39:42 +00:00
|
|
|
context->db, &ent.entry, &pw);
|
|
|
|
if (ret == 0) {
|
heimdal: Fix multiple security vulnerabilities
The following issues are patched:
- CVE-2022-42898 PAC parse integer overflows
- CVE-2022-3437 Overflows and non-constant time leaks in DES{,3} and arcfour
- CVE-2021-44758 NULL dereference DoS in SPNEGO acceptors
- CVE-2022-44640 Heimdal KDC: invalid free in ASN.1 codec
Note that CVE-2022-44640 is a severe vulnerability, possibly a 10.0
on the Common Vulnerability Scoring System (CVSS) v3, as we believe
it should be possible to get an RCE on a KDC, which means that
credentials can be compromised that can be used to impersonate
anyone in a realm or forest of realms.
Heimdal's ASN.1 compiler generates code that allows specially
crafted DER encodings of CHOICEs to invoke the wrong free function
on the decoded structure upon decode error. This is known to impact
the Heimdal KDC, leading to an invalid free() of an address partly
or wholly under the control of the attacker, in turn leading to a
potential remote code execution (RCE) vulnerability.
This error affects the DER codec for all extensible CHOICE types
used in Heimdal, though not all cases will be exploitable. We have
not completed a thorough analysis of all the Heimdal components
affected, thus the Kerberos client, the X.509 library, and other
parts, may be affected as well.
This bug has been in Heimdal's ASN.1 compiler since 2005, but it may
only affect Heimdal 1.6 and up. It was first reported by Douglas
Bagnall, though it had been found independently by the Heimdal
maintainers via fuzzing a few weeks earlier.
While no zero-day exploit is known, such an exploit will likely be
available soon after public disclosure.
- CVE-2019-14870: Validate client attributes in protocol-transition
- CVE-2019-14870: Apply forwardable policy in protocol-transition
- CVE-2019-14870: Always lookup impersonate client in DB
Sponsored by: so (philip)
Obtained from: so (philip)
Tested by: philip, cy
MFC after: immediately
2022-11-08 08:53:29 +00:00
|
|
|
(void) add_tl_data(out, KRB5_TL_PASSWORD, pw, strlen(pw) + 1);
|
2008-05-07 13:39:42 +00:00
|
|
|
free(pw);
|
|
|
|
}
|
2011-10-05 07:23:29 +00:00
|
|
|
krb5_clear_error_message(context->context);
|
|
|
|
}
|
|
|
|
|
|
|
|
ret = hdb_entry_get_pkinit_acl(&ent.entry, &acl);
|
|
|
|
if (ret == 0 && acl) {
|
|
|
|
krb5_data buf;
|
|
|
|
size_t len;
|
|
|
|
|
|
|
|
ASN1_MALLOC_ENCODE(HDB_Ext_PKINIT_acl, buf.data, buf.length,
|
|
|
|
acl, &len, ret);
|
|
|
|
if (ret) {
|
|
|
|
kadm5_free_principal_ent(context, out);
|
|
|
|
goto out;
|
|
|
|
}
|
|
|
|
if (len != buf.length)
|
|
|
|
krb5_abortx(context->context,
|
|
|
|
"internal ASN.1 encoder error");
|
|
|
|
ret = add_tl_data(out, KRB5_TL_PKINIT_ACL, buf.data, buf.length);
|
|
|
|
free(buf.data);
|
|
|
|
if (ret) {
|
|
|
|
kadm5_free_principal_ent(context, out);
|
|
|
|
goto out;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if(ret){
|
|
|
|
kadm5_free_principal_ent(context, out);
|
|
|
|
goto out;
|
2008-05-07 13:39:42 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
ret = hdb_entry_get_aliases(&ent.entry, &aliases);
|
|
|
|
if (ret == 0 && aliases) {
|
|
|
|
krb5_data buf;
|
|
|
|
size_t len;
|
|
|
|
|
|
|
|
ASN1_MALLOC_ENCODE(HDB_Ext_Aliases, buf.data, buf.length,
|
|
|
|
aliases, &len, ret);
|
|
|
|
if (ret) {
|
|
|
|
kadm5_free_principal_ent(context, out);
|
|
|
|
goto out;
|
|
|
|
}
|
|
|
|
if (len != buf.length)
|
|
|
|
krb5_abortx(context->context,
|
|
|
|
"internal ASN.1 encoder error");
|
|
|
|
ret = add_tl_data(out, KRB5_TL_ALIASES, buf.data, buf.length);
|
|
|
|
free(buf.data);
|
|
|
|
if (ret) {
|
|
|
|
kadm5_free_principal_ent(context, out);
|
|
|
|
goto out;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if(ret){
|
|
|
|
kadm5_free_principal_ent(context, out);
|
|
|
|
goto out;
|
|
|
|
}
|
|
|
|
|
|
|
|
}
|
2000-01-09 20:58:00 +00:00
|
|
|
out:
|
|
|
|
hdb_free_entry(context->context, &ent);
|
|
|
|
|
|
|
|
return _kadm5_error_code(ret);
|
|
|
|
}
|