xref: /freebsd/crypto/heimdal/lib/gssapi/krb5/context_time.c (revision 6a068746777241722b2b32c5d0bc443a2a64d80b)
1c19800e8SDoug Rabson /*
2*ae771770SStanislav Sedov  * Copyright (c) 1997 - 2003 Kungliga Tekniska Högskolan
3c19800e8SDoug Rabson  * (Royal Institute of Technology, Stockholm, Sweden).
4c19800e8SDoug Rabson  * All rights reserved.
5c19800e8SDoug Rabson  *
6c19800e8SDoug Rabson  * Redistribution and use in source and binary forms, with or without
7c19800e8SDoug Rabson  * modification, are permitted provided that the following conditions
8c19800e8SDoug Rabson  * are met:
9c19800e8SDoug Rabson  *
10c19800e8SDoug Rabson  * 1. Redistributions of source code must retain the above copyright
11c19800e8SDoug Rabson  *    notice, this list of conditions and the following disclaimer.
12c19800e8SDoug Rabson  *
13c19800e8SDoug Rabson  * 2. Redistributions in binary form must reproduce the above copyright
14c19800e8SDoug Rabson  *    notice, this list of conditions and the following disclaimer in the
15c19800e8SDoug Rabson  *    documentation and/or other materials provided with the distribution.
16c19800e8SDoug Rabson  *
17c19800e8SDoug Rabson  * 3. Neither the name of the Institute nor the names of its contributors
18c19800e8SDoug Rabson  *    may be used to endorse or promote products derived from this software
19c19800e8SDoug Rabson  *    without specific prior written permission.
20c19800e8SDoug Rabson  *
21c19800e8SDoug Rabson  * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
22c19800e8SDoug Rabson  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23c19800e8SDoug Rabson  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24c19800e8SDoug Rabson  * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
25c19800e8SDoug Rabson  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26c19800e8SDoug Rabson  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27c19800e8SDoug Rabson  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28c19800e8SDoug Rabson  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29c19800e8SDoug Rabson  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30c19800e8SDoug Rabson  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31c19800e8SDoug Rabson  * SUCH DAMAGE.
32c19800e8SDoug Rabson  */
33c19800e8SDoug Rabson 
34*ae771770SStanislav Sedov #include "gsskrb5_locl.h"
35c19800e8SDoug Rabson 
36c19800e8SDoug Rabson OM_uint32
_gsskrb5_lifetime_left(OM_uint32 * minor_status,krb5_context context,OM_uint32 lifetime,OM_uint32 * lifetime_rec)37c19800e8SDoug Rabson _gsskrb5_lifetime_left(OM_uint32 *minor_status,
38c19800e8SDoug Rabson 		       krb5_context context,
39c19800e8SDoug Rabson 		       OM_uint32 lifetime,
40c19800e8SDoug Rabson 		       OM_uint32 *lifetime_rec)
41c19800e8SDoug Rabson {
42c19800e8SDoug Rabson     krb5_timestamp timeret;
43c19800e8SDoug Rabson     krb5_error_code kret;
44c19800e8SDoug Rabson 
45c19800e8SDoug Rabson     if (lifetime == 0) {
46c19800e8SDoug Rabson 	*lifetime_rec = GSS_C_INDEFINITE;
47c19800e8SDoug Rabson 	return GSS_S_COMPLETE;
48c19800e8SDoug Rabson     }
49c19800e8SDoug Rabson 
50c19800e8SDoug Rabson     kret = krb5_timeofday(context, &timeret);
51c19800e8SDoug Rabson     if (kret) {
52c19800e8SDoug Rabson 	*minor_status = kret;
53c19800e8SDoug Rabson 	return GSS_S_FAILURE;
54c19800e8SDoug Rabson     }
55c19800e8SDoug Rabson 
56c19800e8SDoug Rabson     if (lifetime < timeret)
57c19800e8SDoug Rabson 	*lifetime_rec = 0;
58c19800e8SDoug Rabson     else
59c19800e8SDoug Rabson 	*lifetime_rec = lifetime - timeret;
60c19800e8SDoug Rabson 
61c19800e8SDoug Rabson     return GSS_S_COMPLETE;
62c19800e8SDoug Rabson }
63c19800e8SDoug Rabson 
64c19800e8SDoug Rabson 
_gsskrb5_context_time(OM_uint32 * minor_status,const gss_ctx_id_t context_handle,OM_uint32 * time_rec)65*ae771770SStanislav Sedov OM_uint32 GSSAPI_CALLCONV _gsskrb5_context_time
66c19800e8SDoug Rabson            (OM_uint32 * minor_status,
67c19800e8SDoug Rabson             const gss_ctx_id_t context_handle,
68c19800e8SDoug Rabson             OM_uint32 * time_rec
69c19800e8SDoug Rabson            )
70c19800e8SDoug Rabson {
71c19800e8SDoug Rabson     krb5_context context;
72c19800e8SDoug Rabson     OM_uint32 lifetime;
73c19800e8SDoug Rabson     OM_uint32 major_status;
74c19800e8SDoug Rabson     const gsskrb5_ctx ctx = (const gsskrb5_ctx) context_handle;
75c19800e8SDoug Rabson 
76c19800e8SDoug Rabson     GSSAPI_KRB5_INIT (&context);
77c19800e8SDoug Rabson 
78c19800e8SDoug Rabson     HEIMDAL_MUTEX_lock(&ctx->ctx_id_mutex);
79c19800e8SDoug Rabson     lifetime = ctx->lifetime;
80c19800e8SDoug Rabson     HEIMDAL_MUTEX_unlock(&ctx->ctx_id_mutex);
81c19800e8SDoug Rabson 
82c19800e8SDoug Rabson     major_status = _gsskrb5_lifetime_left(minor_status, context,
83c19800e8SDoug Rabson 					  lifetime, time_rec);
84c19800e8SDoug Rabson     if (major_status != GSS_S_COMPLETE)
85c19800e8SDoug Rabson 	return major_status;
86c19800e8SDoug Rabson 
87c19800e8SDoug Rabson     *minor_status = 0;
88c19800e8SDoug Rabson 
89c19800e8SDoug Rabson     if (*time_rec == 0)
90c19800e8SDoug Rabson 	return GSS_S_CONTEXT_EXPIRED;
91c19800e8SDoug Rabson 
92c19800e8SDoug Rabson     return GSS_S_COMPLETE;
93c19800e8SDoug Rabson }
94