xref: /netbsd-src/crypto/external/bsd/heimdal/dist/lib/gssapi/ntlm/acquire_cred.c (revision d3273b5b76f5afaafe308cead5511dbb8df8c5e9)
1 /*	$NetBSD: acquire_cred.c,v 1.2 2017/01/28 21:31:46 christos Exp $	*/
2 
3 /*
4  * Copyright (c) 1997 - 2004 Kungliga Tekniska Högskolan
5  * (Royal Institute of Technology, Stockholm, Sweden).
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  *
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  *
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  *
19  * 3. Neither the name of the Institute nor the names of its contributors
20  *    may be used to endorse or promote products derived from this software
21  *    without specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33  * SUCH DAMAGE.
34  */
35 
36 #include "ntlm.h"
37 
38 OM_uint32 GSSAPI_CALLCONV
_gss_ntlm_acquire_cred(OM_uint32 * min_stat,gss_const_name_t desired_name,OM_uint32 time_req,const gss_OID_set desired_mechs,gss_cred_usage_t cred_usage,gss_cred_id_t * output_cred_handle,gss_OID_set * actual_mechs,OM_uint32 * time_rec)39 _gss_ntlm_acquire_cred(OM_uint32            *min_stat,
40                        gss_const_name_t     desired_name,
41                        OM_uint32            time_req,
42                        const gss_OID_set    desired_mechs,
43                        gss_cred_usage_t     cred_usage,
44                        gss_cred_id_t        *output_cred_handle,
45                        gss_OID_set          *actual_mechs,
46                        OM_uint32            *time_rec)
47 {
48     ntlm_name name = (ntlm_name) desired_name;
49     const char *domain = NULL;
50     OM_uint32 maj_stat;
51     ntlm_ctx ctx;
52 
53     *min_stat = 0;
54     *output_cred_handle = GSS_C_NO_CREDENTIAL;
55     if (actual_mechs)
56 	*actual_mechs = GSS_C_NO_OID_SET;
57     if (time_rec)
58 	*time_rec = GSS_C_INDEFINITE;
59 
60     if (cred_usage == GSS_C_BOTH || cred_usage == GSS_C_ACCEPT) {
61 
62 	maj_stat = _gss_ntlm_allocate_ctx(min_stat, &ctx);
63 	if (maj_stat != GSS_S_COMPLETE)
64 	    return maj_stat;
65 
66         domain = name != NULL ? name->domain : NULL;
67 	maj_stat = (*ctx->server->nsi_probe)(min_stat, ctx->ictx, domain);
68 	{
69 	    gss_ctx_id_t context = (gss_ctx_id_t)ctx;
70 	    OM_uint32 junk;
71 	    _gss_ntlm_delete_sec_context(&junk, &context, NULL);
72 	}
73 	if (maj_stat)
74 	    return maj_stat;
75     }
76     if (cred_usage == GSS_C_BOTH || cred_usage == GSS_C_INITIATE) {
77 	ntlm_cred cred;
78 
79 	*min_stat = _gss_ntlm_get_user_cred(name, &cred);
80 	if (*min_stat)
81 	    return GSS_S_NO_CRED;
82 	cred->usage = cred_usage;
83 
84 	*output_cred_handle = (gss_cred_id_t)cred;
85     }
86 
87     return (GSS_S_COMPLETE);
88 }
89