--- ./squid-2.5.STABLE1/helpers/ntlm_auth/SMB/smbval/smblib.c	Wed Nov 28 09:02:00 2001
+++ ./squidsncf-2.5.STABLE1/helpers/ntlm_auth/SMB/smbval/smblib.c	Tue Oct  1 20:05:59 2002
@@ -173,7 +173,11 @@
     for (i = 0; i < strlen(server); i++)
 	called[i] = toupper(server[i]);
 
+    /* GDT HACHE */
     called[strlen(server)] = 0;	/* Make it a string */
+    if (NULL != (address = strchr(called, '.'))) {
+	*address = '\0';    /* truncate at first '.' */
+    }
 
     for (i = 0; i < strlen(con->myname); i++)
 	calling[i] = toupper(con->myname[i]);