From faf5762875a834c660fb6a8d89c23cb7bb3f6082 Mon Sep 17 00:00:00 2001
From: ben <ben@cda61777-01e9-0310-a592-d414129be87e>
Date: Wed, 15 Jan 2003 18:47:41 +0000
Subject: [PATCH] MacTCP returns canonical names with a trailing dot.  We don't
 want this, so strip it off.

git-svn-id: svn://svn.tartarus.org/sgt/putty@2612 cda61777-01e9-0310-a592-d414129be87e
---
 mac/mtcpnet.c | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/mac/mtcpnet.c b/mac/mtcpnet.c
index 6cddc108..5c256655 100644
--- a/mac/mtcpnet.c
+++ b/mac/mtcpnet.c
@@ -276,6 +276,7 @@ SockAddr mactcp_namelookup(char const *host, char **canonicalname)
     OSErr err;
     volatile int done = FALSE;
     char *realhost;
+    int realhostlen;
 
     /* Clear the structure. */
     memset(ret, 0, sizeof(struct SockAddr_tag));
@@ -293,9 +294,13 @@ SockAddr mactcp_namelookup(char const *host, char **canonicalname)
 	    continue;
     ret->resolved = TRUE;
     
-    if (ret->hostinfo.rtnCode == noErr)
+    if (ret->hostinfo.rtnCode == noErr) {
 	realhost = ret->hostinfo.cname;
-    else
+	/* MacTCP puts trailing dots on canonical names. */
+	realhostlen = strlen(realhost);
+	if (realhost[realhostlen - 1] == '.')
+	    realhost[realhostlen - 1] = '\0';
+    } else
 	realhost = "";
     *canonicalname = smalloc(1+strlen(realhost));
     strcpy(*canonicalname, realhost);
-- 
2.11.0