From dcc5e181b9e1bf597a2f58f20cd9733beb7fbe51 Mon Sep 17 00:00:00 2001
From: zacheiss <zacheiss>
Date: Mon, 18 Nov 2002 20:19:33 +0000
Subject: [PATCH] Return containers you can administer in gaus output.

---
 server/qsupport.pc | 19 ++++++++++++++++++-
 1 file changed, 18 insertions(+), 1 deletion(-)

diff --git a/server/qsupport.pc b/server/qsupport.pc
index c18d94d4..fbc893ad 100644
--- a/server/qsupport.pc
+++ b/server/qsupport.pc
@@ -888,7 +888,24 @@ int get_ace_internal(char *atype, int aid,
       found++;
     }
   EXEC SQL CLOSE csr116;
-  
+
+  rargv[0] = "CONTAINER";
+  EXEC SQL DECLARE csr117c CURSOR FOR
+    SELECT name FROM containers c
+    WHERE c.acl_type = :type AND c.acl_id = :id;
+  if (dbms_errno)
+    return mr_errcode;
+  EXEC SQL OPEN csr117c;
+  while (1)
+    {
+      EXEC SQL FETCH csr117c INTO :name;
+      if (sqlca.sqlcode)
+	break;
+      (*action)(2, rargv, actarg);
+      found++;
+    }
+  EXEC SQL CLOSE csr117c;
+
   if (!found)
     return MR_NO_MATCH;
   return MR_SUCCESS;
-- 
2.45.2