#include "mech_locl.h"
OM_uint32
_gss_find_mn(OM_uint32 *minor_status, struct _gss_name *name, gss_OID mech,
struct _gss_mechanism_name **output_mn)
{
OM_uint32 major_status;
gssapi_mech_interface m;
struct _gss_mechanism_name *mn;
*output_mn = NULL;
if (name == NULL)
return GSS_S_COMPLETE;
SLIST_FOREACH(mn, &name->gn_mn, gmn_link) {
if (gss_oid_equal(mech, mn->gmn_mech_oid))
break;
}
if (!mn) {
if (!name->gn_value.value)
return GSS_S_BAD_NAME;
m = __gss_get_mechanism(mech);
if (!m)
return (GSS_S_BAD_MECH);
mn = malloc(sizeof(struct _gss_mechanism_name));
if (!mn)
return GSS_S_FAILURE;
major_status = m->gm_import_name(minor_status,
&name->gn_value,
(name->gn_type.elements
? &name->gn_type : GSS_C_NO_OID),
&mn->gmn_name);
if (major_status != GSS_S_COMPLETE) {
_gss_mg_error(m, *minor_status);
free(mn);
return major_status;
}
mn->gmn_mech = m;
mn->gmn_mech_oid = &m->gm_mech_oid;
SLIST_INSERT_HEAD(&name->gn_mn, mn, gmn_link);
}
*output_mn = mn;
return 0;
}
struct _gss_name *
_gss_make_name(gssapi_mech_interface m, gss_name_t new_mn)
{
struct _gss_name *name;
struct _gss_mechanism_name *mn;
name = malloc(sizeof(struct _gss_name));
if (!name)
return (0);
memset(name, 0, sizeof(struct _gss_name));
mn = malloc(sizeof(struct _gss_mechanism_name));
if (!mn) {
free(name);
return (0);
}
SLIST_INIT(&name->gn_mn);
mn->gmn_mech = m;
mn->gmn_mech_oid = &m->gm_mech_oid;
mn->gmn_name = new_mn;
SLIST_INSERT_HEAD(&name->gn_mn, mn, gmn_link);
return (name);
}
OM_uint32
_gss_mech_import_name(OM_uint32 * minor_status,
const gss_OID mech,
struct _gss_name_type *names,
const gss_buffer_t input_name_buffer,
const gss_OID input_name_type,
gss_name_t * output_name)
{
struct _gss_name_type *name;
gss_buffer_t name_buffer = input_name_buffer;
gss_buffer_desc export_name;
*minor_status = 0;
if (output_name == NULL)
return GSS_S_CALL_INACCESSIBLE_WRITE;
*output_name = GSS_C_NO_NAME;
if (gss_oid_equal(input_name_type, GSS_C_NT_EXPORT_NAME)) {
unsigned char *p;
uint32_t length;
if (name_buffer->length < 10 + mech->length)
return GSS_S_BAD_NAME;
p = name_buffer->value;
if (memcmp(&p[0], "\x04\x01\x00", 3) != 0 ||
p[3] != mech->length + 2 ||
p[4] != 0x06 ||
p[5] != mech->length ||
memcmp(&p[6], mech->elements, mech->length) != 0)
return GSS_S_BAD_NAME;
p += 6 + mech->length;
length = p[0] << 24 | p[1] << 16 | p[2] << 8 | p[3];
p += 4;
if (length > name_buffer->length - 10 - mech->length)
return GSS_S_BAD_NAME;
export_name.length = length;
export_name.value = p;
name_buffer = &export_name;
}
for (name = names; name->gnt_parse != NULL; name++) {
if (gss_oid_equal(input_name_type, name->gnt_name_type)
|| (name->gnt_name_type == GSS_C_NO_OID && input_name_type == GSS_C_NO_OID))
return name->gnt_parse(minor_status, mech, name_buffer,
input_name_type, output_name);
}
return GSS_S_BAD_NAMETYPE;
}
OM_uint32
_gss_mech_inquire_names_for_mech(OM_uint32 * minor_status,
struct _gss_name_type *names,
gss_OID_set * name_types)
{
struct _gss_name_type *name;
OM_uint32 ret;
ret = gss_create_empty_oid_set(minor_status, name_types);
if (ret != GSS_S_COMPLETE)
return ret;
for (name = names; name->gnt_parse != NULL; name++) {
if (name->gnt_name_type == GSS_C_NO_OID)
continue;
ret = gss_add_oid_set_member(minor_status,
name->gnt_name_type,
name_types);
if (ret != GSS_S_COMPLETE)
break;
}
if (ret != GSS_S_COMPLETE)
gss_release_oid_set(NULL, name_types);
return GSS_S_COMPLETE;
}