From 20ac274b8f3cd505d00ae0495eccaf9baa730c2a Mon Sep 17 00:00:00 2001
From: Jim Bloom <bloom@ucbvax.Berkeley.EDU>
Date: Fri, 6 Sep 1985 23:50:46 -0800
Subject: [PATCH] fix ruserok to handle case independent comparisons and for
 domain naming

SCCS-vsn: lib/libc/net/rcmd.c 5.3
---
 usr/src/lib/libc/net/rcmd.c | 59 +++++++++++++++++++++++++++++++++----
 1 file changed, 53 insertions(+), 6 deletions(-)

diff --git a/usr/src/lib/libc/net/rcmd.c b/usr/src/lib/libc/net/rcmd.c
index 18defab32b..31a7a2d73a 100644
--- a/usr/src/lib/libc/net/rcmd.c
+++ b/usr/src/lib/libc/net/rcmd.c
@@ -5,11 +5,12 @@
  */
 
 #ifndef lint
-static char sccsid[] = "@(#)rcmd.c	5.2 (Berkeley) %G%";
+static char sccsid[] = "@(#)rcmd.c	5.3 (Berkeley) %G%";
 #endif not lint
 
 #include <stdio.h>
-#include <sys/types.h>
+#include <ctype.h>
+#include <sys/param.h>
 #include <sys/socket.h>
 
 #include <netinet/in.h>
@@ -154,19 +155,33 @@ ruserok(rhost, superuser, ruser, luser)
 	char *ruser, *luser;
 {
 	FILE *hostf;
-	char ahost[32];
+	char fhost[MAXHOSTNAMELEN];
+	char ahost[MAXHOSTNAMELEN];
 	int first = 1;
+	register char *sp, *p;
+	int baselen = -1;
 
+	sp = rhost;
+	p = fhost;
+	while (*sp) {
+		if (*sp == '.') {
+			if (baselen == -1)
+				baselen = sp - rhost;
+			*p++ = *sp++;
+		} else {
+			*p++ = isupper(*sp) ? tolower(*sp++) : *sp++;
+		}
+	}
+	*p = '\0';
 	hostf = superuser ? (FILE *)0 : fopen("/etc/hosts.equiv", "r");
 again:
 	if (hostf) {
 		while (fgets(ahost, sizeof (ahost), hostf)) {
-			register char *p;
 			char *user;
 
 			p = ahost;
 			while (*p != '\n' && *p != ' ' && *p != '\t' && *p != '\0')
-				p++;
+				*p++ = isupper(*p) ? tolower(*p) : *p;
 			if (*p == ' ' || *p == '\t') {
 				*p++ = '\0';
 				while (*p == ' ' || *p == '\t')
@@ -177,7 +192,7 @@ again:
 			} else
 				user = p;
 			*p = '\0';
-			if (!strcmp(rhost, ahost) &&
+			if (_checkhost(fhost, ahost, baselen) &&
 			    !strcmp(ruser, *user ? user : luser)) {
 				(void) fclose(hostf);
 				return (0);
@@ -192,3 +207,35 @@ again:
 	}
 	return (-1);
 }
+
+_checkhost(rhost, lhost, len)
+char *rhost, *lhost;
+int len;
+{
+	static char ldomain[MAXHOSTNAMELEN];
+	static char *domainp = NULL;
+	register char *cp;
+
+	if (len == -1)
+		return(!strcmp(rhost, lhost));
+	if (strncmp(rhost, lhost, len))
+		return(0);
+	if (!strcmp(rhost, lhost))
+		return(1);
+	if (*(lhost + len) != '\0')
+		return(0);
+	if (!domainp) {
+		if (gethostname(ldomain, sizeof(ldomain)) == -1) {
+			domainp = (char *)1;
+			return(0);
+		}
+		ldomain[MAXHOSTNAMELEN] = NULL;
+		domainp = index(ldomain, '.') + 1;
+		cp = domainp;
+		while (*cp)
+			*cp++ = isupper(*cp) ? tolower(*cp) : *cp;
+	}
+	if (domainp == (char *)1)
+		return(0);
+	return(!strcmp(domainp, rhost + len +1));
+}
-- 
2.20.1