From e85c1cf099e4c6b863675623fd59c0c711fd1239 Mon Sep 17 00:00:00 2001
From: John Kohl <jtkohl@mit.edu>
Date: Wed, 15 Nov 1989 06:35:33 +0000
Subject: add stuff for %host%, %canon% support

---
 zwgc/subscriptions.c | 41 ++++++++++++++++++++++++++++++++++++++---
 1 file changed, 38 insertions(+), 3 deletions(-)

(limited to 'zwgc/subscriptions.c')

diff --git a/zwgc/subscriptions.c b/zwgc/subscriptions.c
index 34165cf..f091006 100644
--- a/zwgc/subscriptions.c
+++ b/zwgc/subscriptions.c
@@ -13,7 +13,7 @@
  */
 
 #if (!defined(lint) && !defined(SABER))
-static char rcsid_subscriptions_c[] = "$Header$";
+static char rcsid_subscriptions_c[] = "$Id$";
 #endif
 
 #include <zephyr/mit-copyright.h>
@@ -26,6 +26,8 @@ static char rcsid_subscriptions_c[] = "$Header$";
 
 #include <stdio.h>
 #include <zephyr/zephyr.h>
+#include <sys/param.h>
+#include <netdb.h>
 #include "new_memory.h"
 #include "new_string.h"
 #include "int_dictionary.h"
@@ -215,11 +217,44 @@ static void unsubscribe(class, instance, recipient)
 /*                                                                          */
 /****************************************************************************/
 
+#define	TOKEN_HOSTNAME	"%host%"
+#define	TOKEN_CANONNAME	"%canon%"
+#define	TOKEN_ME	"%me%"
+#define	TOKEN_WILD	"*"
+
+char ourhost[MAXHOSTNAMELEN],ourhostcanon[MAXHOSTNAMELEN];
+
+static void inithosts()
+{
+    struct hostent *hent;
+    if (gethostname(ourhost,sizeof(ourhost)-1) == -1) {
+	ERROR3("unable to retrieve hostname, %s and %s will be wrong in subscriptions.", TOKEN_HOSTNAME, TOKEN_CANONNAME);
+	return;
+    }
+
+    if (!(hent = gethostbyname(ourhost))) {
+	ERROR2("unable to resolve hostname, %s will be wrong in subscriptions.", TOKEN_CANONNAME);
+	return;
+    }
+    (void) strncpy(ourhostcanon,hent->h_name, sizeof(ourhostcanon)-1);
+    return;
+}
+
 static void macro_sub(str)
      char *str;
 {
-    if (string_Eq(str, "%me%"))
-      strcpy(str, ZGetSender());
+    static int initedhosts = 0;
+
+    if (!initedhosts) {
+	inithosts();
+	initedhosts = 1;
+    }
+    if (string_Eq(str, TOKEN_ME))
+	strcpy(str, ZGetSender());
+    else if (string_Eq(str, TOKEN_HOSTNAME))
+	strcpy(str, ourhost);	
+    else if (string_Eq(str, TOKEN_CANONNAME))
+	strcpy(str, ourhostcanon);
 }
 
 #define  UNSUBSCRIBE_CHARACTER  '!'
-- 
cgit v1.2.3