more work on SAML ification
[mech_eap.orig] / set_name_attribute.c
index 33772b8..1c50037 100644 (file)
@@ -39,5 +39,31 @@ gss_set_name_attribute(OM_uint32 *minor,
                        gss_buffer_t attr,
                        gss_buffer_t value)
 {
-    GSSEAP_NOT_IMPLEMENTED;
-} 
+    OM_uint32 major;
+    gss_buffer_desc prefix, suffix;
+    enum gss_eap_attribute_type type;
+
+    if (name == GSS_C_NO_NAME) {
+        *minor = EINVAL;
+        return GSS_S_CALL_INACCESSIBLE_READ | GSS_S_BAD_NAME;
+    }
+
+    GSSEAP_MUTEX_LOCK(&name->mutex);
+
+    major = decomposeAttributeName(minor, attr, &prefix, &suffix);
+    if (GSS_ERROR(major))
+        goto cleanup;
+
+    type = gssEapAttributePrefixToType(&prefix);
+    if (type != ATTR_TYPE_SAML_AAA_ASSERTION) {
+        major = samlSetAttribute(minor, name->samlCtx, complete,
+                                 attr, value);
+    } else {
+        major = GSS_S_UNAVAILABLE;
+    }
+
+cleanup:
+    GSSEAP_MUTEX_UNLOCK(&name->mutex);
+
+    return major;
+}