From 5941642db5333a4f12eb04a53e1873d6600281ed Mon Sep 17 00:00:00 2001
From: John Kohl <jtkohl@mit.edu>
Date: Wed, 27 Feb 1991 13:32:09 +0000
Subject: make it implement spec via gethostname

git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@1805 dc483132-0cff-0310-8789-dd5450dbe970
---
 src/lib/krb5/os/hst_realm.c | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/src/lib/krb5/os/hst_realm.c b/src/lib/krb5/os/hst_realm.c
index 0b17b4198a..d899df0647 100644
--- a/src/lib/krb5/os/hst_realm.c
+++ b/src/lib/krb5/os/hst_realm.c
@@ -81,6 +81,7 @@ char ***realmsp;
     char *domain;
     FILE *trans_file;
     char trans_host[MAXHOSTNAMELEN+1];
+    char local_host[MAXHOSTNAMELEN+1];
     char trans_realm[DEF_REALMNAME_SIZE];
     krb5_error_code retval;
     int scanval;
@@ -89,6 +90,12 @@ char ***realmsp;
 
     if (!(retrealms = (char **)calloc(2, sizeof(*retrealms))))
 	return ENOMEM;
+    if (!host) {
+	if (gethostname(local_host, sizeof(local_host)-1) == -1)
+	    return errno;
+	local_host[sizeof(local_host)-1] = '\0';
+	host = local_host;
+    }
     domain = strchr(host, '.');
 
     /* prepare default */
-- 
cgit