1c19800e8SDoug Rabson /* 2c19800e8SDoug Rabson * 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 34c19800e8SDoug Rabson #include "krb5/gsskrb5_locl.h" 35c19800e8SDoug Rabson 36c19800e8SDoug Rabson RCSID("$Id: context_time.c 19031 2006-11-13 18:02:57Z lha $"); 37c19800e8SDoug Rabson 38c19800e8SDoug Rabson OM_uint32 39c19800e8SDoug Rabson _gsskrb5_lifetime_left(OM_uint32 *minor_status, 40c19800e8SDoug Rabson krb5_context context, 41c19800e8SDoug Rabson OM_uint32 lifetime, 42c19800e8SDoug Rabson OM_uint32 *lifetime_rec) 43c19800e8SDoug Rabson { 44c19800e8SDoug Rabson krb5_timestamp timeret; 45c19800e8SDoug Rabson krb5_error_code kret; 46c19800e8SDoug Rabson 47c19800e8SDoug Rabson if (lifetime == 0) { 48c19800e8SDoug Rabson *lifetime_rec = GSS_C_INDEFINITE; 49c19800e8SDoug Rabson return GSS_S_COMPLETE; 50c19800e8SDoug Rabson } 51c19800e8SDoug Rabson 52c19800e8SDoug Rabson kret = krb5_timeofday(context, &timeret); 53c19800e8SDoug Rabson if (kret) { 54c19800e8SDoug Rabson *minor_status = kret; 55c19800e8SDoug Rabson return GSS_S_FAILURE; 56c19800e8SDoug Rabson } 57c19800e8SDoug Rabson 58c19800e8SDoug Rabson if (lifetime < timeret) 59c19800e8SDoug Rabson *lifetime_rec = 0; 60c19800e8SDoug Rabson else 61c19800e8SDoug Rabson *lifetime_rec = lifetime - timeret; 62c19800e8SDoug Rabson 63c19800e8SDoug Rabson return GSS_S_COMPLETE; 64c19800e8SDoug Rabson } 65c19800e8SDoug Rabson 66c19800e8SDoug Rabson 67c19800e8SDoug Rabson OM_uint32 _gsskrb5_context_time 68c19800e8SDoug Rabson (OM_uint32 * minor_status, 69c19800e8SDoug Rabson const gss_ctx_id_t context_handle, 70c19800e8SDoug Rabson OM_uint32 * time_rec 71c19800e8SDoug Rabson ) 72c19800e8SDoug Rabson { 73c19800e8SDoug Rabson krb5_context context; 74c19800e8SDoug Rabson OM_uint32 lifetime; 75c19800e8SDoug Rabson OM_uint32 major_status; 76c19800e8SDoug Rabson const gsskrb5_ctx ctx = (const gsskrb5_ctx) context_handle; 77c19800e8SDoug Rabson 78c19800e8SDoug Rabson GSSAPI_KRB5_INIT (&context); 79c19800e8SDoug Rabson 80c19800e8SDoug Rabson HEIMDAL_MUTEX_lock(&ctx->ctx_id_mutex); 81c19800e8SDoug Rabson lifetime = ctx->lifetime; 82c19800e8SDoug Rabson HEIMDAL_MUTEX_unlock(&ctx->ctx_id_mutex); 83c19800e8SDoug Rabson 84c19800e8SDoug Rabson major_status = _gsskrb5_lifetime_left(minor_status, context, 85c19800e8SDoug Rabson lifetime, time_rec); 86c19800e8SDoug Rabson if (major_status != GSS_S_COMPLETE) 87c19800e8SDoug Rabson return major_status; 88c19800e8SDoug Rabson 89c19800e8SDoug Rabson *minor_status = 0; 90c19800e8SDoug Rabson 91c19800e8SDoug Rabson if (*time_rec == 0) 92c19800e8SDoug Rabson return GSS_S_CONTEXT_EXPIRED; 93c19800e8SDoug Rabson 94c19800e8SDoug Rabson return GSS_S_COMPLETE; 95c19800e8SDoug Rabson } 96