2 * Copyright (c) 2001-2003 Simon Wilkinson. All rights reserved.
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions
7 * 1. Redistributions of source code must retain the above copyright
8 * notice, this list of conditions and the following disclaimer.
9 * 2. Redistributions in binary form must reproduce the above copyright
10 * notice, this list of conditions and the following disclaimer in the
11 * documentation and/or other materials provided with the distribution.
13 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR `AS IS'' AND ANY EXPRESS OR
14 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
15 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
16 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
17 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
18 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
19 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
20 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
21 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
22 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
38 #include <globus_gss_assist.h>
40 static int ssh_gssapi_gsi_userok(ssh_gssapi_client *client, char *name);
41 static int ssh_gssapi_gsi_localname(ssh_gssapi_client *client, char **user);
42 static void ssh_gssapi_gsi_storecreds(ssh_gssapi_client *client);
44 ssh_gssapi_mech gssapi_gsi_mech_old = {
45 "N3+k7/4wGxHyuP8Yxi4RhA==",
47 {9, "\x2B\x06\x01\x04\x01\x9B\x50\x01\x01"},
49 &ssh_gssapi_gsi_userok,
50 &ssh_gssapi_gsi_localname,
51 &ssh_gssapi_gsi_storecreds
54 ssh_gssapi_mech gssapi_gsi_mech = {
55 "dZuIebMjgUqaxvbF7hDbAw==",
57 {9, "\x2B\x06\x01\x04\x01\x9B\x50\x01\x01"},
59 &ssh_gssapi_gsi_userok,
60 &ssh_gssapi_gsi_localname,
61 &ssh_gssapi_gsi_storecreds
65 * Check if this user is OK to login under GSI. User has been authenticated
66 * as identity in global 'client_name.value' and is trying to log in as passed
69 * Returns non-zero if user is authorized, 0 otherwise.
72 ssh_gssapi_gsi_userok(ssh_gssapi_client *client, char *name)
76 #ifdef GLOBUS_GSI_GSS_ASSIST_MODULE
77 if (globus_module_activate(GLOBUS_GSI_GSS_ASSIST_MODULE) != 0) {
82 /* This returns 0 on success */
83 authorized = (globus_gss_assist_userok(client->displayname.value,
86 logit("GSI user %s is%s authorized as target user %s",
87 (char *) client->displayname.value, (authorized ? "" : " not"), name);
93 * Return the local username associated with the GSI credentials.
96 ssh_gssapi_gsi_localname(ssh_gssapi_client *client, char **user)
98 #ifdef GLOBUS_GSI_GSS_ASSIST_MODULE
99 if (globus_module_activate(GLOBUS_GSI_GSS_ASSIST_MODULE) != 0) {
103 return(globus_gss_assist_gridmap(client->displayname.value, user) == 0);
107 * Export GSI credentials to disk.
110 ssh_gssapi_gsi_storecreds(ssh_gssapi_client *client)
112 OM_uint32 major_status;
113 OM_uint32 minor_status;
114 gss_buffer_desc export_cred = GSS_C_EMPTY_BUFFER;
117 if (!client || !client->creds) {
121 major_status = gss_export_cred(&minor_status,
126 if (GSS_ERROR(major_status) && major_status != GSS_S_UNAVAILABLE) {
128 ssh_gssapi_build_ctx(&ctx);
129 ctx->major = major_status;
130 ctx->minor = minor_status;
131 ssh_gssapi_set_oid(ctx, &gssapi_gsi_mech.oid);
132 ssh_gssapi_error(ctx);
133 ssh_gssapi_delete_ctx(&ctx);
137 p = strchr((char *) export_cred.value, '=');
139 logit("Failed to parse exported credentials string '%.100s'",
140 (char *)export_cred.value);
141 gss_release_buffer(&minor_status, &export_cred);
145 if (strcmp((char *)export_cred.value,"X509_USER_DELEG_PROXY") == 0) {
146 client->store.envvar = strdup("X509_USER_PROXY");
148 client->store.envvar = strdup((char *)export_cred.value);
150 client->store.envval = strdup(p);
152 do_pam_putenv(client->store.envvar, client->store.envval);
154 if (strncmp(p, "FILE:", 5) == 0) {
157 if (access(p, R_OK) == 0) {
158 client->store.filename = strdup(p);
160 gss_release_buffer(&minor_status, &export_cred);