From 0cf8aa13b5a17e98d77a5ec212394fbd10b1351c Mon Sep 17 00:00:00 2001
From: Marty Kraimer <mrkraimer@comcast.net>
Date: Tue, 1 Apr 2003 21:03:57 +0000
Subject: [PATCH] convert host name to lower case

---
 src/as/asLibRoutines.c | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/src/as/asLibRoutines.c b/src/as/asLibRoutines.c
index d60e80d53..de851437c 100644
--- a/src/as/asLibRoutines.c
+++ b/src/as/asLibRoutines.c
@@ -15,6 +15,7 @@
 #include <stddef.h>
 #include <stdio.h>
 #include <string.h>
+#include <ctype.h>
 
 #include "dbDefs.h"
 #include "epicsThread.h"
@@ -1121,12 +1122,16 @@ static HAG *asHagAdd(char *hagName)
 
 static long asHagAddHost(HAG *phag,char *host)
 {
-    HAGNAME	*phagname;
+    HAGNAME *phagname;
+    int     ind;
 
     if(!phag) return(0);
     phagname = asCalloc(1,sizeof(HAGNAME)+strlen(host)+1);
     phagname->host = (char *)(phagname+1);
     strcpy(phagname->host,host);
+    for(ind=0; ind<strlen(phagname->host); ind++) {
+        phagname->host[ind] = tolower(phagname->host[ind]);
+    }
     ellAdd(&phag->list,(ELLNODE *)phagname);
     return(0);
 }