From de5742314886625fc0f2872e01f08e02856ed2ba Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Love=20H=C3=B6rnquist=20=C3=85strand?= <lha@kth.se>
Date: Mon, 24 Mar 2008 12:06:30 +0000
Subject: [PATCH] add krb5_principal_set_realm

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@22724 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 880073061..a91be9c41 100644
--- a/lib/krb5/principal.c
+++ b/lib/krb5/principal.c
@@ -511,6 +511,22 @@ krb5_princ_set_realm(krb5_context context,
     princ_realm(principal) = *realm;
 }
 
+krb5_error_code KRB5_LIB_FUNCTION
+krb5_principal_set_realm(krb5_context context,
+			 krb5_principal principal,
+			 krb5_const_realm realm)
+{
+    if (princ_realm(principal))
+	free(princ_realm(principal));
+
+    princ_realm(principal) = strdup(realm);
+    if (princ_realm(principal) == NULL) {
+	krb5_set_error_string(context, "out of memory");
+	return ENOMEM;
+    }
+    return 0;
+}
+
 
 krb5_error_code KRB5_LIB_FUNCTION
 krb5_build_principal(krb5_context context,