new file

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@1978 ec53bebd-3082-4978-b11e-865c3cabbd6b

lib/krb5/get_default_realm.c

@@ -0,0 +1,16 @@
+#include "krb5_locl.h"
+
+RCSID("$Id$");
+
+krb5_error_code
+krb5_get_default_realm(krb5_context context,
+		       char **realm)
+{
+    char *res;
+
+    res = strdup (context->default_realm);
+    if (res == NULL)
+	return ENOMEM;
+    *realm = res;
+    return 0;
+}