usr/src/lib/gss_mechs/mech_krb5/krb5/keytab/ktfns.c

   1 /*
   2  * lib/krb5/keytab/ktfns.c
   3  *
   4  * Copyright 2001 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
  27 /*
  28  * Dispatch methods for keytab code.
  29  */
  30
  31 #include "k5-int.h"
  32
  33 char * KRB5_CALLCONV
  34 krb5_kt_get_type (krb5_context context, krb5_keytab keytab)
  35 {
  36     return keytab->ops->prefix;
  37 }
  38
  39 krb5_error_code KRB5_CALLCONV
  40 krb5_kt_get_name(krb5_context context, krb5_keytab keytab, char *name,
  41                  unsigned int namelen)
  42 {
  43     return krb5_x((keytab)->ops->get_name,(context, keytab,name,namelen));
  44 }
  45
  46 krb5_error_code KRB5_CALLCONV
  47 krb5_kt_close(krb5_context context, krb5_keytab keytab)
  48 {
  49     return krb5_x((keytab)->ops->close,(context, keytab));
  50 }
  51
  52 krb5_error_code KRB5_CALLCONV
  53 krb5_kt_get_entry(krb5_context context, krb5_keytab keytab,
  54                   krb5_const_principal principal, krb5_kvno vno,
  55                   krb5_enctype enctype, krb5_keytab_entry *entry)
  56 {
  57     krb5_error_code err;
  58     krb5_principal_data princ_data;
  59
  60     if (krb5_is_referral_realm(&principal->realm)) {
  61         char *realm;
  62         princ_data = *principal;
  63         principal = &princ_data;
  64         err = krb5_get_default_realm(context, &realm);
  65         if (err)
  66             return err;
  67         princ_data.realm.data = realm;
  68         princ_data.realm.length = strlen(realm);
  69     }
  70     err = krb5_x((keytab)->ops->get,(context, keytab, principal, vno, enctype,
  71                                      entry));
  72     if (principal == &princ_data)
  73         krb5_free_default_realm(context, princ_data.realm.data);
  74     return err;
  75 }
  76
  77 krb5_error_code KRB5_CALLCONV
  78 krb5_kt_start_seq_get(krb5_context context, krb5_keytab keytab,
  79                       krb5_kt_cursor *cursor)
  80 {
  81     return krb5_x((keytab)->ops->start_seq_get,(context, keytab, cursor));
  82 }
  83
  84 krb5_error_code KRB5_CALLCONV
  85 krb5_kt_next_entry(krb5_context context, krb5_keytab keytab,
  86                    krb5_keytab_entry *entry, krb5_kt_cursor *cursor)
  87 {
  88     return krb5_x((keytab)->ops->get_next,(context, keytab, entry, cursor));
  89 }
  90
  91 krb5_error_code KRB5_CALLCONV
  92 krb5_kt_end_seq_get(krb5_context context, krb5_keytab keytab,
  93                     krb5_kt_cursor *cursor)
  94 {
  95     return krb5_x((keytab)->ops->end_get,(context, keytab, cursor));
  96 }