1 files changed, 40 insertions, 0 deletions
diff --git a/src/lib/krb5/krb/princ_comp.c b/src/lib/krb5/krb/princ_comp.c
new file mode 100644
index 000000000..03921200b
--- /dev/null
+++ b/src/lib/krb5/krb/princ_comp.c
@@ -0,0 +1,40 @@
+/*
+ * $Source$
+ * $Author$
+ *
+ * Copyright 1990 by the Massachusetts Institute of Technology.
+ *
+ * For copying and distribution information, please see the file
+ * <krb5/mit-copyright.h>.
+ *
+ * compare two principals, returning a krb5_boolean true if equal, false if
+ * not.
+ */
+
+#if !defined(lint) && !defined(SABER)
+static char rcsid_princ_comp_c[] =
+"$Id$";
+#endif	/* !lint & !SABER */
+
+#include <krb5/copyright.h>
+
+#include <krb5/krb5.h>
+
+#ifndef min
+#define min(a,b) ((a) < (b) ? (a) : (b))
+#endif min
+
+krb5_boolean
+krb5_principal_compare(princ1, princ2)
+krb5_principal princ1, princ2;
+{
+    register krb5_data **p1, **p2;
+
+    for (p1 = princ1, p2 = princ2; *p1  && *p2; p1++, p2++)
+	if (strncmp((*p1)->data, (*p2)->data, min((*p1)->length,
+						  (*p2)->length)))
+	    return FALSE;
+    if (*p1 || *p2)			/* didn't both run out at once */
+	return FALSE;
+    return TRUE;
+}