From 8ea172d29c9b73c6beedf6b512dce49028ab237b Mon Sep 17 00:00:00 2001
From: mar <mar>
Date: Thu, 28 Oct 1993 15:20:34 +0000
Subject: [PATCH] updated to handle subnets as well

---
 server/cache.dc | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/server/cache.dc b/server/cache.dc
index 85b0688b..a22c0d18 100644
--- a/server/cache.dc
+++ b/server/cache.dc
@@ -30,6 +30,7 @@ extern int ingres_errno, mr_errcode;
  *		List
  *		String
  *		Machine
+ *		Subnet
  *		Cluster
  *		Filesystem
  *    then we will have to rework the code that only looks at the first
@@ -152,6 +153,10 @@ int *id;
     case 'm':
 	EXEC SQL SELECT mach_id INTO :j FROM machine WHERE name=UPPERCASE(:iname);
 	break;
+    case 'S':
+    case 's':
+	EXEC SQL SELECT snet_id INTO :j FROM subnet WHERE name=UPPERCASE(:iname);
+	break;
     case 'C':
     case 'c':
 	EXEC SQL SELECT clu_id INTO :j FROM cluster WHERE name=:iname;
@@ -249,6 +254,10 @@ char **name;
     case 'm':
 	EXEC SQL SELECT CHAR(name) INTO :iname FROM machine WHERE mach_id=:j;
 	break;
+    case 'S':
+    case 's':
+	EXEC SQL SELECT CHAR(name) INTO :iname FROM subnet WHERE snet_id=:j;
+	break;
     case 'C':
     case 'c':
 	EXEC SQL SELECT CHAR(name) INTO :iname FROM cluster WHERE clu_id=:j;
-- 
2.45.1