From: Kees Monshouwer <mind04@monshouwer.org>
Date: Wed, 3 Aug 2022 14:34:32 +0000 (+0200)
Subject: auth: add missing catalog types in getAllDomains()
X-Git-Tag: rec-4.8.0-alpha1~70^2~3
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=d5540ff1b848d8fea1e41c0adc536edd4b5b189a;p=thirdparty%2Fpdns.git

auth: add missing catalog types in getAllDomains()
---

diff --git a/pdns/auth-main.cc b/pdns/auth-main.cc
index 932f4e9cfe..ed75595bed 100644
--- a/pdns/auth-main.cc
+++ b/pdns/auth-main.cc
@@ -1394,7 +1394,7 @@ int main(int argc, char** argv)
     DynListener::registerFunc("SET", &DLSettingsHandler, "set config variables", "<var> <value>");
     DynListener::registerFunc("RETRIEVE", &DLNotifyRetrieveHandler, "retrieve slave zone", "<zone> [<ip>]");
     DynListener::registerFunc("CURRENT-CONFIG", &DLCurrentConfigHandler, "retrieve the current configuration", "[diff]");
-    DynListener::registerFunc("LIST-ZONES", &DLListZones, "show list of zones", "[primary|secondary|native]");
+    DynListener::registerFunc("LIST-ZONES", &DLListZones, "show list of zones", "[primary|secondary|native|consumer|producer]");
     DynListener::registerFunc("TOKEN-LOGIN", &DLTokenLogin, "Login to a PKCS#11 token", "<module> <slot> <pin>");
     DynListener::registerFunc("XFR-QUEUE", &DLSuckRequests, "Get all requests for XFR in queue");
 
diff --git a/pdns/backends/gsql/gsqlbackend.cc b/pdns/backends/gsql/gsqlbackend.cc
index 91800e640d..7e8c961cbb 100644
--- a/pdns/backends/gsql/gsqlbackend.cc
+++ b/pdns/backends/gsql/gsqlbackend.cc
@@ -1686,7 +1686,14 @@ void GSQLBackend::getAllDomains(vector<DomainInfo>* domains, bool getSerial, boo
         di.kind = DomainInfo::Slave;
       } else if (pdns_iequals(row[3], "NATIVE")) {
         di.kind = DomainInfo::Native;
-      } else {
+      }
+      else if (pdns_iequals(row[3], "PRODUCER")) {
+        di.kind = DomainInfo::Producer;
+      }
+      else if (pdns_iequals(row[3], "CONSUMER")) {
+        di.kind = DomainInfo::Consumer;
+      }
+      else {
         g_log<<Logger::Warning<<"Could not parse domain kind '"<<row[3]<<"' as one of 'MASTER', 'SLAVE' or 'NATIVE'. Setting zone kind to 'NATIVE'"<<endl;
         di.kind = DomainInfo::Native;
       }