source4/auth/kerberos/kerberos.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    kerberos utility library
   4    Copyright (C) Andrew Tridgell 2001
   5    Copyright (C) Remus Koos 2001
   6    Copyright (C) Nalin Dahyabhai 2004.
   7    Copyright (C) Jeremy Allison 2004.
   8    Copyright (C) Andrew Bartlett <abartlet@samba.org> 2004-2005
   9
  10    This program is free software; you can redistribute it and/or modify
  11    it under the terms of the GNU General Public License as published by
  12    the Free Software Foundation; either version 3 of the License, or
  13    (at your option) any later version.
  14
  15    This program is distributed in the hope that it will be useful,
  16    but WITHOUT ANY WARRANTY; without even the implied warranty of
  17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18    GNU General Public License for more details.
  19
  20    You should have received a copy of the GNU General Public License
  21    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  22 */
  23
  24 #include "includes.h"
  25 #include "system/kerberos.h"
  26 #include "auth/kerberos/kerberos.h"
  27
  28 #ifdef HAVE_KRB5
  29
  30 /*
  31   simulate a kinit, putting the tgt in the given credentials cache.
  32   Orignally by remus@snapserver.com
  33
  34   This version is built to use a keyblock, rather than needing the
  35   original password.
  36 */
  37  krb5_error_code kerberos_kinit_keyblock_cc(krb5_context ctx, krb5_ccache cc,
  38                                 krb5_principal principal, krb5_keyblock *keyblock,
  39                                 time_t *expire_time, time_t *kdc_time)
  40 {
  41         krb5_error_code code = 0;
  42         krb5_creds my_creds;
  43         krb5_get_init_creds_opt *options;
  44
  45         if ((code = krb5_get_init_creds_opt_alloc(ctx, &options))) {
  46                 return code;
  47         }
  48
  49         krb5_get_init_creds_opt_set_default_flags(ctx, NULL, NULL, options);
  50
  51         if ((code = krb5_get_init_creds_keyblock(ctx, &my_creds, principal, keyblock,
  52                                                  0, NULL, options))) {
  53                 return code;
  54         }
  55
  56         if ((code = krb5_cc_initialize(ctx, cc, principal))) {
  57                 krb5_get_init_creds_opt_free(ctx, options);
  58                 krb5_free_cred_contents(ctx, &my_creds);
  59                 return code;
  60         }
  61
  62         if ((code = krb5_cc_store_cred(ctx, cc, &my_creds))) {
  63                 krb5_get_init_creds_opt_free(ctx, options);
  64                 krb5_free_cred_contents(ctx, &my_creds);
  65                 return code;
  66         }
  67
  68         if (expire_time) {
  69                 *expire_time = (time_t) my_creds.times.endtime;
  70         }
  71
  72         if (kdc_time) {
  73                 *kdc_time = (time_t) my_creds.times.starttime;
  74         }
  75
  76         krb5_get_init_creds_opt_free(ctx, options);
  77         krb5_free_cred_contents(ctx, &my_creds);
  78
  79         return 0;
  80 }
  81
  82 /*
  83   simulate a kinit, putting the tgt in the given credentials cache.
  84   Orignally by remus@snapserver.com
  85 */
  86  krb5_error_code kerberos_kinit_password_cc(krb5_context ctx, krb5_ccache cc,
  87                                             krb5_principal principal, const char *password,
  88                                             time_t *expire_time, time_t *kdc_time)
  89 {
  90         krb5_error_code code = 0;
  91         krb5_creds my_creds;
  92         krb5_get_init_creds_opt *options;
  93
  94         if ((code = krb5_get_init_creds_opt_alloc(ctx, &options))) {
  95                 return code;
  96         }
  97
  98         krb5_get_init_creds_opt_set_default_flags(ctx, NULL, NULL, options);
  99
 100         if ((code = krb5_get_init_creds_password(ctx, &my_creds, principal, password,
 101                                                  NULL,
 102                                                  NULL, 0, NULL, options))) {
 103                 return code;
 104         }
 105
 106         if ((code = krb5_cc_initialize(ctx, cc, principal))) {
 107                 krb5_get_init_creds_opt_free(ctx, options);
 108                 krb5_free_cred_contents(ctx, &my_creds);
 109                 return code;
 110         }
 111
 112         if ((code = krb5_cc_store_cred(ctx, cc, &my_creds))) {
 113                 krb5_get_init_creds_opt_free(ctx, options);
 114                 krb5_free_cred_contents(ctx, &my_creds);
 115                 return code;
 116         }
 117
 118         if (expire_time) {
 119                 *expire_time = (time_t) my_creds.times.endtime;
 120         }
 121
 122         if (kdc_time) {
 123                 *kdc_time = (time_t) my_creds.times.starttime;
 124         }
 125
 126         krb5_get_init_creds_opt_free(ctx, options);
 127         krb5_free_cred_contents(ctx, &my_creds);
 128
 129         return 0;
 130 }
 131
 132
 133 #endif