src/lib/gssapi/krb5/set_ccache.c

   1 /*
   2  * lib/gssapi/krb5/set_ccache.c
   3  *
   4  * Copyright 1999, 2003 by the Massachusetts Institute of Technology.
   5  * All Rights Reserved.
   6  *
   7  * Export of this software from the United States of America may
   8  *   require a specific license from the United States Government.
   9  *   It is the responsibility of any person or organization contemplating
  10  *   export to obtain such a license before exporting.
  11  *
  12  * WITHIN THAT CONSTRAINT, permission to use, copy, modify, and
  13  * distribute this software and its documentation for any purpose and
  14  * without fee is hereby granted, provided that the above copyright
  15  * notice appear in all copies and that both that copyright notice and
  16  * this permission notice appear in supporting documentation, and that
  17  * the name of M.I.T. not be used in advertising or publicity pertaining
  18  * to distribution of the software without specific, written prior
  19  * permission.  Furthermore if you modify this software you must label
  20  * your software as modified software and not distribute it in such a
  21  * fashion that it might be confused with the original M.I.T. software.
  22  * M.I.T. makes no representations about the suitability of
  23  * this software for any purpose.  It is provided "as is" without express
  24  * or implied warranty.
  25  *
  26  * Set ccache name used by gssapi, and optionally obtain old ccache
  27  * name.  Caller should not free returned name.
  28  */
  29
  30 #include <string.h>
  31 #include "gssapiP_krb5.h"
  32 #include "gss_libinit.h"
  33
  34 OM_uint32 KRB5_CALLCONV
  35 gss_krb5_ccache_name(minor_status, name, out_name)
  36         OM_uint32 *minor_status;
  37         const char *name;
  38         const char **out_name;
  39 {
  40     char *old_name = NULL;
  41     OM_uint32 err = 0;
  42     OM_uint32 minor = 0;
  43     char *gss_out_name;
  44
  45     err = gssint_initialize_library();
  46     if (err) {
  47         *minor_status = err;
  48         return GSS_S_FAILURE;
  49     }
  50
  51     gss_out_name = k5_getspecific(K5_KEY_GSS_KRB5_SET_CCACHE_OLD_NAME);
  52
  53     if (out_name) {
  54         const char *tmp_name = NULL;
  55
  56         if (!err) {
  57             kg_get_ccache_name (&err, &tmp_name);
  58         }
  59         if (!err) {
  60             old_name = gss_out_name;
  61             gss_out_name = tmp_name;
  62         }
  63     }
  64     /* If out_name was NULL, we keep the same gss_out_name value, and
  65        don't free up any storage (leave old_name NULL).  */
  66
  67     if (!err)
  68         kg_set_ccache_name (&err, name);
  69
  70     minor = k5_setspecific(K5_KEY_GSS_KRB5_SET_CCACHE_OLD_NAME, gss_out_name);
  71     if (minor) {
  72         /* Um.  Now what?  */
  73         if (err == 0) {
  74             err = minor;
  75         }
  76         free(gss_out_name);
  77         gss_out_name = NULL;
  78     }
  79
  80     if (!err) {
  81         if (out_name) {
  82             *out_name = gss_out_name;
  83         }
  84     }
  85
  86     if (old_name != NULL) {
  87         free (old_name);
  88     }
  89
  90     *minor_status = err;
  91     return (*minor_status == 0) ? GSS_S_COMPLETE : GSS_S_FAILURE;
  92 }