krb5samba: Add compat function for krb5_kt_compare

[samba.git] / lib / krb5_wrap / keytab_util.c

diff --git a/lib/krb5_wrap/keytab_util.c b/lib/krb5_wrap/keytab_util.c
index 12aca7f5a092e8feec193dd22866d7a6f9cecc63..91e499002200d254bdc45c87864b28f56d298bdf 100644 (file)
--- a/lib/krb5_wrap/keytab_util.c
+++ b/lib/krb5_wrap/keytab_util.c
@@ -227,3 +227,32 @@ krb5_error_code kt_copy_one_principal(krb5_context context,
     krb5_kt_close (context, dst_keytab);
     return ret;
 }
+
+#if !defined(HAVE_KRB5_KT_COMPARE)
+krb5_boolean smb_krb5_kt_compare(krb5_context context,
+                                krb5_keytab_entry *entry,
+                                krb5_const_principal principal,
+                                krb5_kvno kvno,
+                                krb5_enctype enctype)
+{
+       if (principal) {
+               if (!krb5_principal_compare(context,
+                                           entry->principal, principal)) {
+                       return false;
+               }
+       }
+       if (kvno) {
+               if (entry->vno != kvno) {
+                       return false;
+               }
+       }
+       if (enctype) {
+               if (KRB5_KEY_TYPE(KRB5_KT_KEY(entry)) != enctype) {
+                       return false;
+               }
+       }
+
+       return true;
+}
+#endif
+