From 0124c1d219267a77984c8effb9eed7b6620253f7 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Love=20H=C3=B6rnquist=20=C3=85strand?= <lha@kth.se>
Date: Mon, 13 Oct 2008 03:02:25 +0000
Subject: [PATCH] add krb5_principal_get_num_comp

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@23901 ec53bebd-3082-4978-b11e-865c3cabbd6b
---
 lib/krb5/principal.c | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

diff --git a/lib/krb5/principal.c b/lib/krb5/principal.c
index 556658213..628e81579 100644
--- a/lib/krb5/principal.c
+++ b/lib/krb5/principal.c
@@ -122,6 +122,22 @@ krb5_principal_get_comp_string(krb5_context context,
     return princ_ncomp(principal, component);
 }
 
+/**
+ * Get number of component is principal.
+ *
+ * @param context Kerberos 5 context
+ * @param principal principal to query
+ * @return number of components in string
+ * @ingroup krb5
+ */
+
+unsigned int KRB5_LIB_FUNCTION
+krb5_principal_get_num_comp(krb5_context context,
+			    krb5_const_principal principal)
+{
+    return princ_num_comp(principal);
+}
+
 krb5_error_code KRB5_LIB_FUNCTION
 krb5_parse_name_flags(krb5_context context,
 		      const char *name,