krb5: Improve cccol sub naming; add gss_store_cred_into2()
- Formalize the TYPE:collection_name:subsidiary_name naming scheme for ccaches in ccache collections - KEYRING: ccaches are weird because they have one more optional field: the "anchor", so rather than just assume a naming convention everywhere, we add new functions as well - Add krb5_cc_{resolve,default}_sub() that allows one to specify a "subsidiary" ccache name in a collection separately from the collection name - Add krb5_cc_{resolve,default}_for() which take a principal name, unparse it, and use it as the subsidiary ccache name (with colons replaced) - Make kinit use the new interfaces - Add missing DIR ccache iteration functionality - Revamps test_cc - Add krb5_cc_get_collection() and krb5_cc_get_subsidiary() - Bump the ccops SPI version number - Add gss_store_cred_into2() - Make MEMORY:anonymous not linked into the global MEMORY ccache collection, and uses this for delegated cred handles TBD: - Split this up into a krb5 change and gss mech_krb5 change? - Add krb5_cc_init_and_store() utility, per Greg's suggestion?
This commit is contained in:
@@ -1187,6 +1187,29 @@ gss_store_cred_into(
|
||||
gss_cred_usage_t * /* cred_usage_stored */
|
||||
);
|
||||
|
||||
GSSAPI_LIB_FUNCTION OM_uint32 GSSAPI_LIB_CALL
|
||||
gss_store_cred_into2(
|
||||
OM_uint32 * /* minor_status */,
|
||||
gss_const_cred_id_t /* input_cred_handle */,
|
||||
gss_cred_usage_t /* input_usage */,
|
||||
const gss_OID /* desired_mech */,
|
||||
OM_uint32 /* store_cred_flags */,
|
||||
gss_const_key_value_set_t /* cred_store */,
|
||||
gss_OID_set * /* elements_stored */,
|
||||
gss_cred_usage_t * /* cred_usage_stored */,
|
||||
gss_buffer_set_t * /* env */
|
||||
);
|
||||
|
||||
enum gss_store_cred_flags {
|
||||
GSS_C_STORE_CRED_DEFAULT = 1,
|
||||
GSS_C_STORE_CRED_OVERWRITE = 2,
|
||||
GSS_C_STORE_CRED_SET_PROCESS = 4,
|
||||
};
|
||||
#define GSS_C_STORE_CRED_DEFAULT GSS_C_STORE_CRED_DEFAULT
|
||||
#define GSS_C_STORE_CRED_OVERWRITE GSS_C_STORE_CRED_OVERWRITE
|
||||
#define GSS_C_STORE_CRED_SET_PROCESS GSS_C_STORE_CRED_SET_PROCESS
|
||||
|
||||
|
||||
GSSAPI_LIB_FUNCTION OM_uint32 GSSAPI_CALLCONV
|
||||
gss_set_neg_mechs(
|
||||
OM_uint32 * /* minor_status */,
|
||||
|
@@ -474,6 +474,17 @@ _gss_store_cred_into_t(OM_uint32 *minor_status,
|
||||
gss_OID_set *elements_stored,
|
||||
gss_cred_usage_t *cred_usage_stored);
|
||||
|
||||
typedef OM_uint32 GSSAPI_CALLCONV
|
||||
_gss_store_cred_into2_t(OM_uint32 *minor_status,
|
||||
gss_const_cred_id_t input_cred_handle,
|
||||
gss_cred_usage_t input_usage,
|
||||
gss_OID desired_mech,
|
||||
OM_uint32 store_cred_flags,
|
||||
gss_const_key_value_set_t cred_store,
|
||||
gss_OID_set *elements_stored,
|
||||
gss_cred_usage_t *cred_usage_stored,
|
||||
gss_buffer_set_t *env);
|
||||
|
||||
typedef OM_uint32 GSSAPI_CALLCONV
|
||||
_gss_set_neg_mechs_t(OM_uint32 *minor_status,
|
||||
gss_cred_id_t cred_handle,
|
||||
@@ -623,6 +634,7 @@ typedef struct gssapi_mech_interface_desc {
|
||||
_gss_query_mechanism_info_t *gm_query_mechanism_info;
|
||||
_gss_query_meta_data_t *gm_query_meta_data;
|
||||
_gss_exchange_meta_data_t *gm_exchange_meta_data;
|
||||
_gss_store_cred_into2_t *gm_store_cred_into2;
|
||||
struct gss_mech_compat_desc_struct *gm_compat;
|
||||
} gssapi_mech_interface_desc, *gssapi_mech_interface;
|
||||
|
||||
|
@@ -169,8 +169,7 @@ gsskrb5_accept_delegated_token
|
||||
}
|
||||
|
||||
*delegated_cred_handle = NULL;
|
||||
kret = krb5_cc_new_unique (context, krb5_cc_type_memory,
|
||||
NULL, &ccache);
|
||||
kret = krb5_cc_resolve(context, "MEMORY:anonymous", &ccache);
|
||||
if (kret) {
|
||||
ctx->flags &= ~GSS_C_DELEG_FLAG;
|
||||
goto out;
|
||||
@@ -204,7 +203,7 @@ gsskrb5_accept_delegated_token
|
||||
gsskrb5_cred handle;
|
||||
|
||||
ret = _gsskrb5_krb5_import_cred(minor_status,
|
||||
ccache,
|
||||
&ccache,
|
||||
NULL,
|
||||
NULL,
|
||||
delegated_cred_handle);
|
||||
@@ -212,10 +211,7 @@ gsskrb5_accept_delegated_token
|
||||
goto out;
|
||||
|
||||
handle = (gsskrb5_cred) *delegated_cred_handle;
|
||||
|
||||
handle->cred_flags |= GSS_CF_DESTROY_CRED_ON_RELEASE;
|
||||
krb5_cc_close(context, ccache);
|
||||
ccache = NULL;
|
||||
}
|
||||
|
||||
out:
|
||||
|
@@ -62,9 +62,18 @@ gss_krb5_copy_ccache(OM_uint32 *minor_status,
|
||||
#endif
|
||||
|
||||
|
||||
/*
|
||||
* WARNING: Takes ownership of `id'. Because MEMORY:anonymous is now not
|
||||
* linked into to the MEMORY ccache namespace, we can't use krb5_cc_resolve()
|
||||
* with the cache's name anymore. We need a krb5_cc_clone() or some such, with
|
||||
* attendant new method for ccops. Or we could create a new MEMORY:anonymous
|
||||
* ccache and copy all the creds from `id' into it. But we know callers of
|
||||
* this function don't need `id' after calling it, so for now we'll just take
|
||||
* ownershipd of it.
|
||||
*/
|
||||
OM_uint32
|
||||
_gsskrb5_krb5_import_cred(OM_uint32 *minor_status,
|
||||
krb5_ccache id,
|
||||
krb5_ccache *id,
|
||||
krb5_principal keytab_principal,
|
||||
krb5_keytab keytab,
|
||||
gss_cred_id_t *cred)
|
||||
@@ -88,14 +97,13 @@ _gsskrb5_krb5_import_cred(OM_uint32 *minor_status,
|
||||
|
||||
handle->usage = 0;
|
||||
|
||||
if (id) {
|
||||
if (*id) {
|
||||
time_t now;
|
||||
OM_uint32 left;
|
||||
char *str;
|
||||
|
||||
handle->usage |= GSS_C_INITIATE;
|
||||
|
||||
kret = krb5_cc_get_principal(context, id,
|
||||
kret = krb5_cc_get_principal(context, *id,
|
||||
&handle->principal);
|
||||
if (kret) {
|
||||
free(handle);
|
||||
@@ -121,7 +129,7 @@ _gsskrb5_krb5_import_cred(OM_uint32 *minor_status,
|
||||
krb5_timeofday(context, &now);
|
||||
ret = __gsskrb5_ccache_lifetime(minor_status,
|
||||
context,
|
||||
id,
|
||||
*id,
|
||||
handle->principal,
|
||||
&left);
|
||||
if (ret != GSS_S_COMPLETE) {
|
||||
@@ -131,12 +139,8 @@ _gsskrb5_krb5_import_cred(OM_uint32 *minor_status,
|
||||
}
|
||||
handle->endtime = now + left;
|
||||
|
||||
kret = krb5_cc_get_full_name(context, id, &str);
|
||||
if (kret)
|
||||
goto out;
|
||||
|
||||
kret = krb5_cc_resolve(context, str, &handle->ccache);
|
||||
free(str);
|
||||
handle->ccache = *id;
|
||||
*id = NULL;
|
||||
if (kret)
|
||||
goto out;
|
||||
}
|
||||
|
@@ -404,6 +404,7 @@ static gssapi_mech_interface_desc krb5_mech = {
|
||||
NULL, /* gm_query_mechanism_info */
|
||||
NULL, /* gm_query_meta_data */
|
||||
NULL, /* gm_exchange_meta_data */
|
||||
_gsskrb5_store_cred_into2,
|
||||
NULL /* gm_compat */
|
||||
};
|
||||
|
||||
|
@@ -105,7 +105,7 @@ import_cred(OM_uint32 *minor_status,
|
||||
free(str);
|
||||
str = NULL;
|
||||
|
||||
major_stat = _gsskrb5_krb5_import_cred(minor_status, id, keytab_principal,
|
||||
major_stat = _gsskrb5_krb5_import_cred(minor_status, &id, keytab_principal,
|
||||
keytab, cred_handle);
|
||||
out:
|
||||
if (id)
|
||||
|
@@ -51,64 +51,54 @@ same_princ(krb5_context context, krb5_ccache id1, krb5_ccache id2)
|
||||
return same;
|
||||
}
|
||||
|
||||
/*
|
||||
* Like krb5_cc_cache_match(), but only looking in the default collection.
|
||||
*
|
||||
* We need this to avoid looking for MEMORY ccaches, which risks matching the
|
||||
* same credential that we're storing. We could make sure that MEMORY ccaches
|
||||
* are searched for last in krb5_cc_cache_match(), then ignore any MEMORY
|
||||
* ccaches we find there, but, if we might then store in a ccache that will not
|
||||
* be found later as the default ccache, then it's not worth it.
|
||||
*
|
||||
* XXX In order to remove this, we'll first need to make sure that
|
||||
* krb5_cc_default() searches all collections when KRB5CCNAME is not set,
|
||||
* then we'll need to make sure that krb5_cc_cache_match() searches MEMORY
|
||||
* ccaches last (or else introduce a new ccache type like MEMORY but which
|
||||
* is never searched or searchable), then make sure that the caller below
|
||||
* treat finding a MEMORY the same as not finding a ccache at all.
|
||||
*/
|
||||
static krb5_error_code
|
||||
ccache_match(krb5_context context,
|
||||
krb5_principal princ,
|
||||
const char *cctype,
|
||||
krb5_ccache *id)
|
||||
static OM_uint32
|
||||
add_env(OM_uint32 *minor,
|
||||
gss_buffer_set_t *env,
|
||||
const char *var,
|
||||
const char *val)
|
||||
{
|
||||
krb5_cc_cache_cursor cursor = NULL;
|
||||
krb5_error_code ret;
|
||||
OM_uint32 major;
|
||||
gss_buffer_desc b;
|
||||
char *varval = NULL;
|
||||
|
||||
*id = NULL;
|
||||
ret = krb5_cc_cache_get_first(context, cctype, &cursor);
|
||||
if (ret)
|
||||
return ret;
|
||||
|
||||
while (krb5_cc_cache_next(context, cursor, id) == 0) {
|
||||
krb5_principal p = NULL;
|
||||
|
||||
ret = krb5_cc_get_principal(context, *id, &p);
|
||||
if (ret == 0 &&
|
||||
krb5_principal_compare(context, princ, p)) {
|
||||
krb5_free_principal(context, p);
|
||||
krb5_cc_cache_end_seq_get(context, cursor);
|
||||
return 0;
|
||||
}
|
||||
if (*id)
|
||||
krb5_cc_close(context, *id);
|
||||
*id = NULL;
|
||||
if (asprintf(&varval, "%s=%s", var, val) == -1 || varval == NULL) {
|
||||
*minor = ENOMEM;
|
||||
return GSS_S_FAILURE;
|
||||
}
|
||||
krb5_cc_cache_end_seq_get(context, cursor);
|
||||
return KRB5_CC_END;
|
||||
|
||||
b.value = varval;
|
||||
b.length = strlen(varval) + 1;
|
||||
major = gss_add_buffer_set_member(minor, &b, env);
|
||||
free(varval);
|
||||
return major;
|
||||
}
|
||||
|
||||
static OM_uint32
|
||||
set_proc(OM_uint32 *minor, gss_buffer_set_t env)
|
||||
{
|
||||
size_t i;
|
||||
|
||||
/*
|
||||
* XXX On systems with setpag(), call setpag(). On WIN32... create a
|
||||
* session, set the access token, ...?
|
||||
*/
|
||||
#ifndef WIN32
|
||||
for (i = 0; i < env->count; i++)
|
||||
putenv(env->elements[i].value);
|
||||
#endif
|
||||
return GSS_S_COMPLETE;
|
||||
}
|
||||
|
||||
OM_uint32 GSSAPI_CALLCONV
|
||||
_gsskrb5_store_cred_into(OM_uint32 *minor_status,
|
||||
gss_const_cred_id_t input_cred_handle,
|
||||
gss_cred_usage_t cred_usage,
|
||||
const gss_OID desired_mech,
|
||||
OM_uint32 overwrite_cred,
|
||||
OM_uint32 default_cred,
|
||||
gss_const_key_value_set_t cred_store,
|
||||
gss_OID_set *elements_stored,
|
||||
gss_cred_usage_t *cred_usage_stored)
|
||||
_gsskrb5_store_cred_into2(OM_uint32 *minor_status,
|
||||
gss_const_cred_id_t input_cred_handle,
|
||||
gss_cred_usage_t cred_usage,
|
||||
const gss_OID desired_mech,
|
||||
OM_uint32 store_cred_flags,
|
||||
gss_const_key_value_set_t cred_store,
|
||||
gss_OID_set *elements_stored,
|
||||
gss_cred_usage_t *cred_usage_stored,
|
||||
gss_buffer_set_t *envp)
|
||||
{
|
||||
krb5_context context;
|
||||
krb5_error_code ret;
|
||||
@@ -116,8 +106,11 @@ _gsskrb5_store_cred_into(OM_uint32 *minor_status,
|
||||
krb5_ccache id = NULL;
|
||||
time_t exp_current;
|
||||
time_t exp_new;
|
||||
gss_buffer_set_t env = GSS_C_NO_BUFFER_SET;
|
||||
const char *cs_ccache_name = NULL;
|
||||
OM_uint32 major_status;
|
||||
OM_uint32 major_status, junk;
|
||||
OM_uint32 overwrite_cred = store_cred_flags & GSS_C_STORE_CRED_OVERWRITE;
|
||||
OM_uint32 default_cred = store_cred_flags & GSS_C_STORE_CRED_DEFAULT;
|
||||
|
||||
*minor_status = 0;
|
||||
|
||||
@@ -168,45 +161,17 @@ _gsskrb5_store_cred_into(OM_uint32 *minor_status,
|
||||
}
|
||||
|
||||
if (cs_ccache_name) {
|
||||
/*
|
||||
* Not the default ccache.
|
||||
*
|
||||
* Therefore not a collection type cache.
|
||||
*
|
||||
* Therefore there's no question of switching the primary ccache.
|
||||
*
|
||||
* Therefore we reset default_cred.
|
||||
*
|
||||
* XXX Perhaps we should fail in this case if default_cred is true.
|
||||
*/
|
||||
default_cred = 0;
|
||||
ret = krb5_cc_resolve(context, cs_ccache_name, &id);
|
||||
ret = krb5_cc_resolve(context, cs_ccache_name, &id);
|
||||
} else {
|
||||
const char *cctype = NULL;
|
||||
|
||||
/*
|
||||
* Use the default ccache, and if it's a collection, switch it if
|
||||
* default_cred is true.
|
||||
*/
|
||||
ret = krb5_cc_default(context, &id);
|
||||
if (ret == 0) {
|
||||
cctype = krb5_cc_get_type(context, id);
|
||||
if (krb5_cc_support_switch(context, cctype)) {
|
||||
/* The default ccache is a collection type */
|
||||
|
||||
krb5_cc_close(context, id);
|
||||
id = NULL;
|
||||
|
||||
/* Find a matching ccache or create a new one */
|
||||
ret = ccache_match(context, input_cred->principal,
|
||||
cctype, &id);
|
||||
if (ret || id == NULL) {
|
||||
/* Since the ccache is new, just store unconditionally */
|
||||
overwrite_cred = 1;
|
||||
ret = krb5_cc_new_unique(context, cctype, NULL, &id);
|
||||
}
|
||||
}
|
||||
}
|
||||
ret = krb5_cc_default_for(context, input_cred->principal, &id);
|
||||
if (ret == 0 &&
|
||||
krb5_cc_support_switch(context, krb5_cc_get_type(context, id)))
|
||||
overwrite_cred = 1;
|
||||
}
|
||||
|
||||
if (ret || id == NULL) {
|
||||
@@ -215,14 +180,7 @@ _gsskrb5_store_cred_into(OM_uint32 *minor_status,
|
||||
return ret == 0 ? GSS_S_NO_CRED : GSS_S_FAILURE;
|
||||
}
|
||||
|
||||
/*
|
||||
* If the new creds are for a different principal than we had before,
|
||||
* overwrite.
|
||||
*/
|
||||
if (!overwrite_cred && !same_princ(context, id, input_cred->ccache))
|
||||
overwrite_cred = 1;
|
||||
|
||||
if (!overwrite_cred) {
|
||||
if (!overwrite_cred && same_princ(context, id, input_cred->ccache)) {
|
||||
/*
|
||||
* If current creds are for the same princ as we already had creds for,
|
||||
* and the new creds live longer than the old, overwrite.
|
||||
@@ -246,9 +204,47 @@ _gsskrb5_store_cred_into(OM_uint32 *minor_status,
|
||||
NULL);
|
||||
if (ret == 0 && default_cred)
|
||||
krb5_cc_switch(context, id);
|
||||
|
||||
if ((store_cred_flags & GSS_C_STORE_CRED_SET_PROCESS) && envp == NULL)
|
||||
envp = &env;
|
||||
if (envp != NULL) {
|
||||
char *fullname = NULL;
|
||||
|
||||
if ((ret = krb5_cc_get_full_name(context, id, &fullname)) == 0) {
|
||||
major_status = add_env(minor_status, envp, "KRB5CCNAME", fullname);
|
||||
free(fullname);
|
||||
if (major_status)
|
||||
ret = *minor_status;
|
||||
}
|
||||
}
|
||||
(void) krb5_cc_close(context, id);
|
||||
|
||||
HEIMDAL_MUTEX_unlock(&input_cred->cred_id_mutex);
|
||||
if (ret == 0 && (store_cred_flags & GSS_C_STORE_CRED_SET_PROCESS) &&
|
||||
(major_status = set_proc(minor_status, *envp)) != GSS_S_COMPLETE)
|
||||
ret = *minor_status;
|
||||
(void) gss_release_buffer_set(&junk, &env);
|
||||
*minor_status = ret;
|
||||
return ret ? GSS_S_FAILURE : GSS_S_COMPLETE;
|
||||
}
|
||||
|
||||
OM_uint32 GSSAPI_CALLCONV
|
||||
_gsskrb5_store_cred_into(OM_uint32 *minor_status,
|
||||
gss_const_cred_id_t input_cred_handle,
|
||||
gss_cred_usage_t cred_usage,
|
||||
const gss_OID desired_mech,
|
||||
OM_uint32 overwrite_cred,
|
||||
OM_uint32 default_cred,
|
||||
gss_const_key_value_set_t cred_store,
|
||||
gss_OID_set *elements_stored,
|
||||
gss_cred_usage_t *cred_usage_stored)
|
||||
{
|
||||
OM_uint32 store_cred_flags =
|
||||
(overwrite_cred ? GSS_C_STORE_CRED_OVERWRITE : 0) |
|
||||
(default_cred ? GSS_C_STORE_CRED_DEFAULT : 0);
|
||||
|
||||
return _gsskrb5_store_cred_into2(minor_status, input_cred_handle,
|
||||
cred_usage, desired_mech,
|
||||
store_cred_flags, cred_store,
|
||||
elements_stored, cred_usage_stored, NULL);
|
||||
}
|
||||
|
@@ -96,6 +96,7 @@ EXPORTS
|
||||
gss_sign
|
||||
gss_store_cred
|
||||
gss_store_cred_into
|
||||
gss_store_cred_into2
|
||||
gss_test_oid_set_member
|
||||
gss_unseal
|
||||
gss_unwrap
|
||||
|
@@ -38,14 +38,23 @@ store_mech_cred(OM_uint32 *minor_status,
|
||||
gssapi_mech_interface m,
|
||||
const struct _gss_mechanism_cred *mc,
|
||||
gss_cred_usage_t input_usage,
|
||||
OM_uint32 overwrite_cred,
|
||||
OM_uint32 default_cred,
|
||||
OM_uint32 store_cred_flags,
|
||||
gss_const_key_value_set_t cred_store,
|
||||
gss_cred_usage_t *usage_stored)
|
||||
gss_cred_usage_t *usage_stored,
|
||||
gss_buffer_set_t *env)
|
||||
{
|
||||
OM_uint32 major_status;
|
||||
OM_uint32 overwrite_cred =
|
||||
!!(store_cred_flags & GSS_C_STORE_CRED_OVERWRITE);
|
||||
OM_uint32 default_cred = !!(store_cred_flags & GSS_C_STORE_CRED_DEFAULT);
|
||||
|
||||
if (m->gm_store_cred_into)
|
||||
if (m->gm_store_cred_into2)
|
||||
major_status = m->gm_store_cred_into2(minor_status, mc->gmc_cred,
|
||||
input_usage, &m->gm_mech_oid,
|
||||
store_cred_flags, cred_store,
|
||||
NULL, usage_stored,
|
||||
env);
|
||||
else if (m->gm_store_cred_into)
|
||||
major_status = m->gm_store_cred_into(minor_status, mc->gmc_cred,
|
||||
input_usage, &m->gm_mech_oid,
|
||||
overwrite_cred, default_cred,
|
||||
@@ -66,25 +75,28 @@ store_mech_cred(OM_uint32 *minor_status,
|
||||
* const key/value hashmap-like thing that specifies a credential store in a
|
||||
* mechanism- and implementation-specific way, though Heimdal and MIT agree on
|
||||
* at least the following keys for the Kerberos mechanism: ccache, keytab, and
|
||||
* client_keytab.
|
||||
* client_keytab. A set of environment variables may be output as well
|
||||
*/
|
||||
GSSAPI_LIB_FUNCTION OM_uint32 GSSAPI_LIB_CALL
|
||||
gss_store_cred_into(OM_uint32 *minor_status,
|
||||
gss_const_cred_id_t input_cred_handle,
|
||||
gss_cred_usage_t input_usage,
|
||||
const gss_OID desired_mech,
|
||||
OM_uint32 overwrite_cred,
|
||||
OM_uint32 default_cred,
|
||||
gss_const_key_value_set_t cred_store,
|
||||
gss_OID_set *elements_stored,
|
||||
gss_cred_usage_t *cred_usage_stored)
|
||||
gss_store_cred_into2(OM_uint32 *minor_status,
|
||||
gss_const_cred_id_t input_cred_handle,
|
||||
gss_cred_usage_t input_usage,
|
||||
const gss_OID desired_mech,
|
||||
OM_uint32 store_cred_flags,
|
||||
gss_const_key_value_set_t cred_store,
|
||||
gss_OID_set *elements_stored,
|
||||
gss_cred_usage_t *cred_usage_stored,
|
||||
gss_buffer_set_t *env)
|
||||
{
|
||||
struct _gss_cred *cred = (struct _gss_cred *) input_cred_handle;
|
||||
struct _gss_cred *cred = (struct _gss_cred *)input_cred_handle;
|
||||
struct _gss_mechanism_cred *mc;
|
||||
OM_uint32 major_status;
|
||||
OM_uint32 minor;
|
||||
size_t successes;
|
||||
|
||||
if (env != NULL)
|
||||
*env = NULL;
|
||||
|
||||
if (input_cred_handle == NULL)
|
||||
return GSS_S_CALL_INACCESSIBLE_READ;
|
||||
|
||||
@@ -117,10 +129,9 @@ gss_store_cred_into(OM_uint32 *minor_status,
|
||||
!gss_oid_equal(&m->gm_mech_oid, desired_mech))
|
||||
continue;
|
||||
|
||||
major_status = store_mech_cred(minor_status, m, mc,
|
||||
input_usage, overwrite_cred,
|
||||
default_cred, cred_store,
|
||||
cred_usage_stored);
|
||||
major_status = store_mech_cred(minor_status, m, mc, input_usage,
|
||||
store_cred_flags, cred_store,
|
||||
cred_usage_stored, env);
|
||||
if (major_status == GSS_S_COMPLETE) {
|
||||
if (elements_stored && desired_mech != GSS_C_NO_OID)
|
||||
gss_add_oid_set_member(&minor, desired_mech, elements_stored);
|
||||
@@ -142,3 +153,29 @@ gss_store_cred_into(OM_uint32 *minor_status,
|
||||
|
||||
return major_status;
|
||||
}
|
||||
|
||||
/*
|
||||
* See RFC5588 for gss_store_cred(). This function is a variant that takes a
|
||||
* const key/value hashmap-like thing that specifies a credential store in a
|
||||
* mechanism- and implementation-specific way, though Heimdal and MIT agree on
|
||||
* at least the following keys for the Kerberos mechanism: ccache, keytab, and
|
||||
* client_keytab.
|
||||
*/
|
||||
GSSAPI_LIB_FUNCTION OM_uint32 GSSAPI_LIB_CALL
|
||||
gss_store_cred_into(OM_uint32 *minor_status,
|
||||
gss_const_cred_id_t input_cred_handle,
|
||||
gss_cred_usage_t input_usage,
|
||||
const gss_OID desired_mech,
|
||||
OM_uint32 overwrite_cred,
|
||||
OM_uint32 default_cred,
|
||||
gss_const_key_value_set_t cred_store,
|
||||
gss_OID_set *elements_stored,
|
||||
gss_cred_usage_t *cred_usage_stored)
|
||||
{
|
||||
OM_uint32 store_cred_flags =
|
||||
(overwrite_cred ? GSS_C_STORE_CRED_OVERWRITE : 0) |
|
||||
(default_cred ? GSS_C_STORE_CRED_DEFAULT : 0);
|
||||
return gss_store_cred_into2(minor_status, input_cred_handle, input_usage,
|
||||
desired_mech, store_cred_flags, cred_store,
|
||||
elements_stored, cred_usage_stored, NULL);
|
||||
}
|
||||
|
@@ -130,6 +130,7 @@ static gssapi_mech_interface_desc ntlm_mech = {
|
||||
NULL, /* gm_query_mechanism_info */
|
||||
NULL, /* gm_query_meta_data */
|
||||
NULL, /* gm_exchange_meta_data */
|
||||
NULL, /* gm_store_cred_into2 */
|
||||
NULL, /* gm_compat */
|
||||
};
|
||||
|
||||
|
@@ -154,6 +154,7 @@ static gssapi_mech_interface_desc spnego_mech = {
|
||||
NULL, /* gm_query_mechanism_info */
|
||||
NULL, /* gm_query_meta_data */
|
||||
NULL, /* gm_exchange_meta_data */
|
||||
NULL, /* gm_store_cred_into2 */
|
||||
NULL /* gm_compat */
|
||||
};
|
||||
|
||||
|
@@ -94,12 +94,21 @@ gss_err(int exitval, OM_uint32 major, OM_uint32 minor, gss_OID mech,
|
||||
exit(exitval);
|
||||
}
|
||||
|
||||
static int version_flag = 0;
|
||||
static int help_flag = 0;
|
||||
static int version_flag = 0;
|
||||
static int help_flag = 0;
|
||||
static int env_flag = 0;
|
||||
static int def_flag = 0;
|
||||
static int overwrite_flag = 0;
|
||||
|
||||
static struct getargs args[] = {
|
||||
{"version", 0, arg_flag, &version_flag, "print version", NULL },
|
||||
{"help", 0, arg_flag, &help_flag, NULL, NULL }
|
||||
{"help", 0, arg_flag, &help_flag, NULL, NULL },
|
||||
{"env", 'e', arg_flag, &env_flag,
|
||||
"output env settings", NULL },
|
||||
{"default", 0, arg_flag, &def_flag,
|
||||
"switch credential store default principal", NULL },
|
||||
{"overwrite", 0, arg_flag, &overwrite_flag,
|
||||
"overwrite matching credential", NULL },
|
||||
};
|
||||
|
||||
static void
|
||||
@@ -119,6 +128,8 @@ main(int argc, char **argv)
|
||||
gss_cred_id_t cred = GSS_C_NO_CREDENTIAL;
|
||||
gss_key_value_element_desc from_elements, to_elements;
|
||||
gss_key_value_set_desc from, to;
|
||||
gss_buffer_set_t env = GSS_C_NO_BUFFER_SET;
|
||||
OM_uint32 store_flags = 0;
|
||||
int optidx = 0;
|
||||
|
||||
setprogname(argv[0]);
|
||||
@@ -133,6 +144,11 @@ main(int argc, char **argv)
|
||||
exit(0);
|
||||
}
|
||||
|
||||
if (def_flag)
|
||||
store_flags |= GSS_C_STORE_CRED_DEFAULT;
|
||||
if (overwrite_flag)
|
||||
store_flags |= GSS_C_STORE_CRED_OVERWRITE;
|
||||
|
||||
argc -= optidx;
|
||||
argv += optidx;
|
||||
|
||||
@@ -159,12 +175,35 @@ main(int argc, char **argv)
|
||||
gss_err(1, major, minor, GSS_KRB5_MECHANISM,
|
||||
"failed to acquire creds from %s", argv[0]);
|
||||
|
||||
major = gss_store_cred_into(&minor, from_cred, GSS_C_INITIATE,
|
||||
GSS_KRB5_MECHANISM, 1, 1, &to, NULL, NULL);
|
||||
major = gss_store_cred_into2(&minor, from_cred, GSS_C_INITIATE,
|
||||
GSS_KRB5_MECHANISM, store_flags, &to, NULL,
|
||||
NULL, env_flag ? &env : NULL);
|
||||
if (major != GSS_S_COMPLETE)
|
||||
gss_err(1, major, minor, GSS_KRB5_MECHANISM,
|
||||
"failed to store creds into %s", argv[1]);
|
||||
|
||||
if (env_flag) {
|
||||
size_t i;
|
||||
int got_krb5ccname = 0;
|
||||
|
||||
if (env == GSS_C_NO_BUFFER_SET)
|
||||
warnx("No environment settings");
|
||||
|
||||
for (i = 0; env != GSS_C_NO_BUFFER_SET && i < env->count; i++) {
|
||||
got_krb5ccname = got_krb5ccname ||
|
||||
(env->elements[i].length > sizeof("KRB5CCNAME=") &&
|
||||
strncmp((const char *)env->elements[i].value, "KRB5CCNAME=",
|
||||
sizeof("KRB5CCNAME=") - 1) == 0);
|
||||
printf("%.*s\n", (int)env->elements[i].length,
|
||||
(const char *)env->elements[i].value);
|
||||
}
|
||||
(void) gss_release_buffer_set(&minor, &env);
|
||||
|
||||
if (!got_krb5ccname)
|
||||
errx(1, "KRB5CCNAME environment variable not set by "
|
||||
"gss_store_cred_into2()");
|
||||
}
|
||||
|
||||
(void) gss_release_cred(&minor, &from_cred);
|
||||
(void) gss_release_cred(&minor, &to_cred);
|
||||
|
||||
|
@@ -90,6 +90,7 @@ HEIMDAL_GSS_2.0 {
|
||||
gss_sign;
|
||||
gss_store_cred;
|
||||
gss_store_cred_into;
|
||||
gss_store_cred_into2;
|
||||
gss_test_oid_set_member;
|
||||
gss_unseal;
|
||||
gss_unwrap;
|
||||
|
Reference in New Issue
Block a user