From: tom <tom>
Date: Wed, 29 Dec 1993 13:36:20 +0000 (+0000)
Subject: removed access restriction from reading machine table
X-Git-Tag: release77~27
X-Git-Url: http://andersk.mit.edu/gitweb/moira.git/commitdiff_plain/fc2f4a27ed42bcff7c3c5ce00573210110b45b21

removed access restriction from reading machine table
---

diff --git a/server/qaccess.dc b/server/qaccess.dc
index 5d13e27a..e795064c 100644
--- a/server/qaccess.dc
+++ b/server/qaccess.dc
@@ -340,7 +340,7 @@ access_filesys(q, argv, cl)
 /* access_host - successful if owner of host, or subnet containing host
  */
 
-int host_access_level = 0;
+int host_access_level = 0;              /* 1 for network, 2 for host */
 
 access_host(q, argv, cl)
     struct query *q;
@@ -361,10 +361,12 @@ access_host(q, argv, cl)
 	  WHERE s.snet_id=:id;
 	mid =0;
     } else if (q->type == RETRIEVE) {
-	name = argv[0];
+/*	name = argv[0];
 	EXEC SQL SELECT m.owner_type, m.owner_id, s.owner_type, s.owner_id
 	  INTO :mtype, :mid, :stype, :sid FROM machine m, subnet s
 	  WHERE m.name=:name and s.snet_id=m.snet_id;
+*/
+	return(MR_SUCCESS);
     } else {
 	id = *(int *)argv[0];
 	EXEC SQL SELECT m.owner_type, m.owner_id, s.owner_type, s.owner_id