source4/rpc_server/dnsserver/dcerpc_dnsserver.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3
   4    DNS Server
   5
   6    Copyright (C) Amitay Isaacs 2011
   7
   8    This program is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License as published by
  10    the Free Software Foundation; either version 3 of the License, or
  11    (at your option) any later version.
  12
  13    This program is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16    GNU General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  20 */
  21
  22 #include "includes.h"
  23 #include "talloc.h"
  24 #include "rpc_server/dcerpc_server.h"
  25 #include "dsdb/samdb/samdb.h"
  26 #include "lib/util/dlinklist.h"
  27 #include "librpc/gen_ndr/ndr_dnsserver.h"
  28 #include "dns_server/dnsserver_common.h"
  29 #include "dnsserver.h"
  30
  31 #define DCESRV_INTERFACE_DNSSERVER_BIND(call, iface) \
  32         dcesrv_interface_dnsserver_bind(call, iface)
  33 static NTSTATUS dcesrv_interface_dnsserver_bind(struct dcesrv_call_state *dce_call,
  34                                                 const struct dcesrv_interface *iface)
  35 {
  36         struct dcesrv_connection_context *context = dce_call->context;
  37         return dcesrv_interface_bind_require_integrity(context, iface);
  38 }
  39
  40 #define DNSSERVER_STATE_MAGIC 0xc9657ab4
  41 struct dnsserver_state {
  42         struct loadparm_context *lp_ctx;
  43         struct ldb_context *samdb;
  44         struct dnsserver_partition *partitions;
  45         struct dnsserver_zone *zones;
  46         int zones_count;
  47         struct dnsserver_serverinfo *serverinfo;
  48 };
  49
  50
  51 /* Utility functions */
  52
  53 static void dnsserver_reload_zones(struct dnsserver_state *dsstate)
  54 {
  55         struct dnsserver_partition *p;
  56         struct dnsserver_zone *zones, *z, *znext, *zmatch;
  57         struct dnsserver_zone *old_list, *new_list;
  58
  59         old_list = dsstate->zones;
  60         new_list = NULL;
  61
  62         for (p = dsstate->partitions; p; p = p->next) {
  63                 zones = dnsserver_db_enumerate_zones(dsstate, dsstate->samdb, p);
  64                 if (zones == NULL) {
  65                         continue;
  66                 }
  67                 for (z = zones; z; ) {
  68                         znext = z->next;
  69                         zmatch = dnsserver_find_zone(old_list, z->name);
  70                         if (zmatch == NULL) {
  71                                 /* Missing zone */
  72                                 z->zoneinfo = dnsserver_init_zoneinfo(z, dsstate->serverinfo);
  73                                 if (z->zoneinfo == NULL) {
  74                                         continue;
  75                                 }
  76                                 DLIST_ADD_END(new_list, z);
  77                                 p->zones_count++;
  78                                 dsstate->zones_count++;
  79                         } else {
  80                                 /* Existing zone */
  81                                 talloc_free(z);
  82                                 DLIST_REMOVE(old_list, zmatch);
  83                                 DLIST_ADD_END(new_list, zmatch);
  84                         }
  85                         z = znext;
  86                 }
  87         }
  88
  89         if (new_list == NULL) {
  90                 return;
  91         }
  92
  93         /* Deleted zones */
  94         for (z = old_list; z; ) {
  95                 znext = z->next;
  96                 z->partition->zones_count--;
  97                 dsstate->zones_count--;
  98                 talloc_free(z);
  99                 z = znext;
 100         }
 101
 102         dsstate->zones = new_list;
 103 }
 104
 105
 106 static struct dnsserver_state *dnsserver_connect(struct dcesrv_call_state *dce_call)
 107 {
 108         struct auth_session_info *session_info =
 109                 dcesrv_call_session_info(dce_call);
 110         struct dnsserver_state *dsstate;
 111         struct dnsserver_zone *zones, *z, *znext;
 112         struct dnsserver_partition *partitions, *p;
 113         NTSTATUS status;
 114
 115         dsstate = dcesrv_iface_state_find_conn(dce_call,
 116                                                DNSSERVER_STATE_MAGIC,
 117                                                struct dnsserver_state);
 118         if (dsstate != NULL) {
 119                 return dsstate;
 120         }
 121
 122         dsstate = talloc_zero(dce_call, struct dnsserver_state);
 123         if (dsstate == NULL) {
 124                 return NULL;
 125         }
 126
 127         dsstate->lp_ctx = dce_call->conn->dce_ctx->lp_ctx;
 128
 129         /* FIXME: create correct auth_session_info for connecting user */
 130         dsstate->samdb = samdb_connect(dsstate,
 131                                        dce_call->event_ctx,
 132                                        dsstate->lp_ctx,
 133                                        session_info,
 134                                        dce_call->conn->remote_address,
 135                                        0);
 136         if (dsstate->samdb == NULL) {
 137                 DEBUG(0,("dnsserver: Failed to open samdb"));
 138                 goto failed;
 139         }
 140
 141         /* Initialize server info */
 142         dsstate->serverinfo = dnsserver_init_serverinfo(dsstate,
 143                                                         dsstate->lp_ctx,
 144                                                         dsstate->samdb);
 145         if (dsstate->serverinfo == NULL) {
 146                 goto failed;
 147         }
 148
 149         /* Search for DNS partitions */
 150         partitions = dnsserver_db_enumerate_partitions(dsstate, dsstate->serverinfo, dsstate->samdb);
 151         if (partitions == NULL) {
 152                 goto failed;
 153         }
 154         dsstate->partitions = partitions;
 155
 156         /* Search for DNS zones */
 157         for (p = partitions; p; p = p->next) {
 158                 zones = dnsserver_db_enumerate_zones(dsstate, dsstate->samdb, p);
 159                 if (zones == NULL) {
 160                         goto failed;
 161                 }
 162                 for (z = zones; z; ) {
 163                         znext = z->next;
 164                         if (dnsserver_find_zone(dsstate->zones, z->name) == NULL) {
 165                                 z->zoneinfo = dnsserver_init_zoneinfo(z, dsstate->serverinfo);
 166                                 if (z->zoneinfo == NULL) {
 167                                         goto failed;
 168                                 }
 169                                 DLIST_ADD_END(dsstate->zones, z);
 170                                 p->zones_count++;
 171                                 dsstate->zones_count++;
 172                         } else {
 173                                 /* Ignore duplicate zone */
 174                                 DEBUG(3,("dnsserver: Ignoring duplicate zone '%s' from '%s'",
 175                                          z->name, ldb_dn_get_linearized(z->zone_dn)));
 176                         }
 177                         z = znext;
 178                 }
 179         }
 180
 181         status = dcesrv_iface_state_store_conn(dce_call,
 182                                                DNSSERVER_STATE_MAGIC,
 183                                                dsstate);
 184         if (!NT_STATUS_IS_OK(status)) {
 185                 goto failed;
 186         }
 187
 188         return dsstate;
 189
 190 failed:
 191         talloc_free(dsstate);
 192         dsstate = NULL;
 193         return NULL;
 194 }
 195
 196
 197 /* dnsserver query functions */
 198
 199 /* [MS-DNSP].pdf Section 3.1.1.1 DNS Server Configuration Information */
 200 static WERROR dnsserver_query_server(struct dnsserver_state *dsstate,
 201                                         TALLOC_CTX *mem_ctx,
 202                                         const char *operation,
 203                                         const unsigned int client_version,
 204                                         enum DNS_RPC_TYPEID *typeid,
 205                                         union DNSSRV_RPC_UNION *r)
 206 {
 207         uint8_t is_integer, is_addresses, is_string, is_wstring, is_stringlist;
 208         uint32_t answer_integer;
 209         struct IP4_ARRAY *answer_iparray;
 210         struct DNS_ADDR_ARRAY *answer_addrarray;
 211         char *answer_string;
 212         struct DNS_RPC_UTF8_STRING_LIST *answer_stringlist;
 213         struct dnsserver_serverinfo *serverinfo;
 214
 215         serverinfo = dsstate->serverinfo;
 216
 217         if (strcasecmp(operation, "ServerInfo") == 0) {
 218                 if (client_version == DNS_CLIENT_VERSION_W2K) {
 219                         *typeid = DNSSRV_TYPEID_SERVER_INFO_W2K;
 220                         r->ServerInfoW2K = talloc_zero(mem_ctx, struct DNS_RPC_SERVER_INFO_W2K);
 221
 222                         r->ServerInfoW2K->dwVersion = serverinfo->dwVersion;
 223                         r->ServerInfoW2K->fBootMethod = serverinfo->fBootMethod;
 224                         r->ServerInfoW2K->fAdminConfigured = serverinfo->fAdminConfigured;
 225                         r->ServerInfoW2K->fAllowUpdate = serverinfo->fAllowUpdate;
 226                         r->ServerInfoW2K->fDsAvailable = serverinfo->fDsAvailable;
 227                         r->ServerInfoW2K->pszServerName = talloc_strdup(mem_ctx, serverinfo->pszServerName);
 228                         r->ServerInfoW2K->pszDsContainer = talloc_strdup(mem_ctx, serverinfo->pszDsContainer);
 229                         r->ServerInfoW2K->aipServerAddrs = dns_addr_array_to_ip4_array(mem_ctx,
 230                                                                                        serverinfo->aipServerAddrs);
 231                         r->ServerInfoW2K->aipListenAddrs = dns_addr_array_to_ip4_array(mem_ctx,
 232                                                                                        serverinfo->aipListenAddrs);
 233                         r->ServerInfoW2K->aipForwarders = ip4_array_copy(mem_ctx, serverinfo->aipForwarders);
 234                         r->ServerInfoW2K->dwLogLevel = serverinfo->dwLogLevel;
 235                         r->ServerInfoW2K->dwDebugLevel = serverinfo->dwDebugLevel;
 236                         r->ServerInfoW2K->dwForwardTimeout = serverinfo->dwForwardTimeout;
 237                         r->ServerInfoW2K->dwRpcProtocol = serverinfo->dwRpcProtocol;
 238                         r->ServerInfoW2K->dwNameCheckFlag = serverinfo->dwNameCheckFlag;
 239                         r->ServerInfoW2K->cAddressAnswerLimit = serverinfo->cAddressAnswerLimit;
 240                         r->ServerInfoW2K->dwRecursionRetry = serverinfo->dwRecursionRetry;
 241                         r->ServerInfoW2K->dwRecursionTimeout = serverinfo->dwRecursionTimeout;
 242                         r->ServerInfoW2K->dwMaxCacheTtl = serverinfo->dwMaxCacheTtl;
 243                         r->ServerInfoW2K->dwDsPollingInterval = serverinfo->dwDsPollingInterval;
 244                         r->ServerInfoW2K->dwScavengingInterval = serverinfo->dwScavengingInterval;
 245                         r->ServerInfoW2K->dwDefaultRefreshInterval = serverinfo->dwDefaultRefreshInterval;
 246                         r->ServerInfoW2K->dwDefaultNoRefreshInterval = serverinfo->dwDefaultNoRefreshInterval;
 247                         r->ServerInfoW2K->fAutoReverseZones = serverinfo->fAutoReverseZones;
 248                         r->ServerInfoW2K->fAutoCacheUpdate = serverinfo->fAutoCacheUpdate;
 249                         r->ServerInfoW2K->fRecurseAfterForwarding = serverinfo->fRecurseAfterForwarding;
 250                         r->ServerInfoW2K->fForwardDelegations = serverinfo->fForwardDelegations;
 251                         r->ServerInfoW2K->fNoRecursion = serverinfo->fNoRecursion;
 252                         r->ServerInfoW2K->fSecureResponses = serverinfo->fSecureResponses;
 253                         r->ServerInfoW2K->fRoundRobin = serverinfo->fRoundRobin;
 254                         r->ServerInfoW2K->fLocalNetPriority = serverinfo->fLocalNetPriority;
 255                         r->ServerInfoW2K->fBindSecondaries = serverinfo->fBindSecondaries;
 256                         r->ServerInfoW2K->fWriteAuthorityNs = serverinfo->fWriteAuthorityNs;
 257                         r->ServerInfoW2K->fStrictFileParsing = serverinfo->fStrictFileParsing;
 258                         r->ServerInfoW2K->fLooseWildcarding = serverinfo->fLooseWildcarding;
 259                         r->ServerInfoW2K->fDefaultAgingState = serverinfo->fDefaultAgingState;
 260
 261                 } else if (client_version == DNS_CLIENT_VERSION_DOTNET) {
 262                         *typeid = DNSSRV_TYPEID_SERVER_INFO_DOTNET;
 263                         r->ServerInfoDotNet = talloc_zero(mem_ctx, struct DNS_RPC_SERVER_INFO_DOTNET);
 264
 265                         r->ServerInfoDotNet->dwRpcStructureVersion = 0x01;
 266                         r->ServerInfoDotNet->dwVersion = serverinfo->dwVersion;
 267                         r->ServerInfoDotNet->fBootMethod = serverinfo->fBootMethod;
 268                         r->ServerInfoDotNet->fAdminConfigured = serverinfo->fAdminConfigured;
 269                         r->ServerInfoDotNet->fAllowUpdate = serverinfo->fAllowUpdate;
 270                         r->ServerInfoDotNet->fDsAvailable = serverinfo->fDsAvailable;
 271                         r->ServerInfoDotNet->pszServerName = talloc_strdup(mem_ctx, serverinfo->pszServerName);
 272                         r->ServerInfoDotNet->pszDsContainer = talloc_strdup(mem_ctx, serverinfo->pszDsContainer);
 273                         r->ServerInfoDotNet->aipServerAddrs = dns_addr_array_to_ip4_array(mem_ctx,
 274                                                                                           serverinfo->aipServerAddrs);
 275                         r->ServerInfoDotNet->aipListenAddrs = dns_addr_array_to_ip4_array(mem_ctx,
 276                                                                                           serverinfo->aipListenAddrs);
 277                         r->ServerInfoDotNet->aipForwarders = ip4_array_copy(mem_ctx, serverinfo->aipForwarders);
 278                         r->ServerInfoDotNet->aipLogFilter = ip4_array_copy(mem_ctx, serverinfo->aipLogFilter);
 279                         r->ServerInfoDotNet->pwszLogFilePath = talloc_strdup(mem_ctx, serverinfo->pwszLogFilePath);
 280                         r->ServerInfoDotNet->pszDomainName = talloc_strdup(mem_ctx, serverinfo->pszDomainName);
 281                         r->ServerInfoDotNet->pszForestName = talloc_strdup(mem_ctx, serverinfo->pszForestName);
 282                         r->ServerInfoDotNet->pszDomainDirectoryPartition = talloc_strdup(mem_ctx, serverinfo->pszDomainDirectoryPartition);
 283                         r->ServerInfoDotNet->pszForestDirectoryPartition = talloc_strdup(mem_ctx, serverinfo->pszForestDirectoryPartition);
 284                         r->ServerInfoDotNet->dwLogLevel = serverinfo->dwLogLevel;
 285                         r->ServerInfoDotNet->dwDebugLevel = serverinfo->dwDebugLevel;
 286                         r->ServerInfoDotNet->dwForwardTimeout = serverinfo->dwForwardTimeout;
 287                         r->ServerInfoDotNet->dwRpcProtocol = serverinfo->dwRpcProtocol;
 288                         r->ServerInfoDotNet->dwNameCheckFlag = serverinfo->dwNameCheckFlag;
 289                         r->ServerInfoDotNet->cAddressAnswerLimit = serverinfo->cAddressAnswerLimit;
 290                         r->ServerInfoDotNet->dwRecursionRetry = serverinfo->dwRecursionRetry;
 291                         r->ServerInfoDotNet->dwRecursionTimeout = serverinfo->dwRecursionTimeout;
 292                         r->ServerInfoDotNet->dwMaxCacheTtl = serverinfo->dwMaxCacheTtl;
 293                         r->ServerInfoDotNet->dwDsPollingInterval = serverinfo->dwDsPollingInterval;
 294                         r->ServerInfoDotNet->dwLocalNetPriorityNetMask = serverinfo->dwLocalNetPriorityNetMask;
 295                         r->ServerInfoDotNet->dwScavengingInterval = serverinfo->dwScavengingInterval;
 296                         r->ServerInfoDotNet->dwDefaultRefreshInterval = serverinfo->dwDefaultRefreshInterval;
 297                         r->ServerInfoDotNet->dwDefaultNoRefreshInterval = serverinfo->dwDefaultNoRefreshInterval;
 298                         r->ServerInfoDotNet->dwLastScavengeTime = serverinfo->dwLastScavengeTime;
 299                         r->ServerInfoDotNet->dwEventLogLevel = serverinfo->dwEventLogLevel;
 300                         r->ServerInfoDotNet->dwLogFileMaxSize = serverinfo->dwLogFileMaxSize;
 301                         r->ServerInfoDotNet->dwDsForestVersion = serverinfo->dwDsForestVersion;
 302                         r->ServerInfoDotNet->dwDsDomainVersion = serverinfo->dwDsDomainVersion;
 303                         r->ServerInfoDotNet->dwDsDsaVersion = serverinfo->dwDsDsaVersion;
 304                         r->ServerInfoDotNet->fAutoReverseZones = serverinfo->fAutoReverseZones;
 305                         r->ServerInfoDotNet->fAutoCacheUpdate = serverinfo->fAutoCacheUpdate;
 306                         r->ServerInfoDotNet->fRecurseAfterForwarding = serverinfo->fRecurseAfterForwarding;
 307                         r->ServerInfoDotNet->fForwardDelegations = serverinfo->fForwardDelegations;
 308                         r->ServerInfoDotNet->fNoRecursion = serverinfo->fNoRecursion;
 309                         r->ServerInfoDotNet->fSecureResponses = serverinfo->fSecureResponses;
 310                         r->ServerInfoDotNet->fRoundRobin = serverinfo->fRoundRobin;
 311                         r->ServerInfoDotNet->fLocalNetPriority = serverinfo->fLocalNetPriority;
 312                         r->ServerInfoDotNet->fBindSecondaries = serverinfo->fBindSecondaries;
 313                         r->ServerInfoDotNet->fWriteAuthorityNs = serverinfo->fWriteAuthorityNs;
 314                         r->ServerInfoDotNet->fStrictFileParsing = serverinfo->fStrictFileParsing;
 315                         r->ServerInfoDotNet->fLooseWildcarding = serverinfo->fLooseWildcarding;
 316                         r->ServerInfoDotNet->fDefaultAgingState = serverinfo->fDefaultAgingState;
 317
 318                 } else if (client_version == DNS_CLIENT_VERSION_LONGHORN) {
 319                         *typeid = DNSSRV_TYPEID_SERVER_INFO;
 320                         r->ServerInfo = talloc_zero(mem_ctx, struct DNS_RPC_SERVER_INFO_LONGHORN);
 321
 322                         r->ServerInfo->dwRpcStructureVersion = 0x02;
 323                         r->ServerInfo->dwVersion = serverinfo->dwVersion;
 324                         r->ServerInfo->fBootMethod = serverinfo->fBootMethod;
 325                         r->ServerInfo->fAdminConfigured = serverinfo->fAdminConfigured;
 326                         r->ServerInfo->fAllowUpdate = serverinfo->fAllowUpdate;
 327                         r->ServerInfo->fDsAvailable = serverinfo->fDsAvailable;
 328                         r->ServerInfo->pszServerName = talloc_strdup(mem_ctx, serverinfo->pszServerName);
 329                         r->ServerInfo->pszDsContainer = talloc_strdup(mem_ctx, serverinfo->pszDsContainer);
 330                         r->ServerInfo->aipServerAddrs = serverinfo->aipServerAddrs;
 331                         r->ServerInfo->aipListenAddrs = serverinfo->aipListenAddrs;
 332                         r->ServerInfo->aipForwarders = ip4_array_to_dns_addr_array(mem_ctx, serverinfo->aipForwarders);
 333                         r->ServerInfo->aipLogFilter = ip4_array_to_dns_addr_array(mem_ctx, serverinfo->aipLogFilter);
 334                         r->ServerInfo->pwszLogFilePath = talloc_strdup(mem_ctx, serverinfo->pwszLogFilePath);
 335                         r->ServerInfo->pszDomainName = talloc_strdup(mem_ctx, serverinfo->pszDomainName);
 336                         r->ServerInfo->pszForestName = talloc_strdup(mem_ctx, serverinfo->pszForestName);
 337                         r->ServerInfo->pszDomainDirectoryPartition = talloc_strdup(mem_ctx, serverinfo->pszDomainDirectoryPartition);
 338                         r->ServerInfo->pszForestDirectoryPartition = talloc_strdup(mem_ctx, serverinfo->pszForestDirectoryPartition);
 339                         r->ServerInfo->dwLogLevel = serverinfo->dwLogLevel;
 340                         r->ServerInfo->dwDebugLevel = serverinfo->dwDebugLevel;
 341                         r->ServerInfo->dwForwardTimeout = serverinfo->dwForwardTimeout;
 342                         r->ServerInfo->dwRpcProtocol = serverinfo->dwRpcProtocol;
 343                         r->ServerInfo->dwNameCheckFlag = serverinfo->dwNameCheckFlag;
 344                         r->ServerInfo->cAddressAnswerLimit = serverinfo->cAddressAnswerLimit;
 345                         r->ServerInfo->dwRecursionRetry = serverinfo->dwRecursionRetry;
 346                         r->ServerInfo->dwRecursionTimeout = serverinfo->dwRecursionTimeout;
 347                         r->ServerInfo->dwMaxCacheTtl = serverinfo->dwMaxCacheTtl;
 348                         r->ServerInfo->dwDsPollingInterval = serverinfo->dwDsPollingInterval;
 349                         r->ServerInfo->dwLocalNetPriorityNetMask = serverinfo->dwLocalNetPriorityNetMask;
 350                         r->ServerInfo->dwScavengingInterval = serverinfo->dwScavengingInterval;
 351                         r->ServerInfo->dwDefaultRefreshInterval = serverinfo->dwDefaultRefreshInterval;
 352                         r->ServerInfo->dwDefaultNoRefreshInterval = serverinfo->dwDefaultNoRefreshInterval;
 353                         r->ServerInfo->dwLastScavengeTime = serverinfo->dwLastScavengeTime;
 354                         r->ServerInfo->dwEventLogLevel = serverinfo->dwEventLogLevel;
 355                         r->ServerInfo->dwLogFileMaxSize = serverinfo->dwLogFileMaxSize;
 356                         r->ServerInfo->dwDsForestVersion = serverinfo->dwDsForestVersion;
 357                         r->ServerInfo->dwDsDomainVersion = serverinfo->dwDsDomainVersion;
 358                         r->ServerInfo->dwDsDsaVersion = serverinfo->dwDsDsaVersion;
 359                         r->ServerInfo->fReadOnlyDC = serverinfo->fReadOnlyDC;
 360                         r->ServerInfo->fAutoReverseZones = serverinfo->fAutoReverseZones;
 361                         r->ServerInfo->fAutoCacheUpdate = serverinfo->fAutoCacheUpdate;
 362                         r->ServerInfo->fRecurseAfterForwarding = serverinfo->fRecurseAfterForwarding;
 363                         r->ServerInfo->fForwardDelegations = serverinfo->fForwardDelegations;
 364                         r->ServerInfo->fNoRecursion = serverinfo->fNoRecursion;
 365                         r->ServerInfo->fSecureResponses = serverinfo->fSecureResponses;
 366                         r->ServerInfo->fRoundRobin = serverinfo->fRoundRobin;
 367                         r->ServerInfo->fLocalNetPriority = serverinfo->fLocalNetPriority;
 368                         r->ServerInfo->fBindSecondaries = serverinfo->fBindSecondaries;
 369                         r->ServerInfo->fWriteAuthorityNs = serverinfo->fWriteAuthorityNs;
 370                         r->ServerInfo->fStrictFileParsing = serverinfo->fStrictFileParsing;
 371                         r->ServerInfo->fLooseWildcarding = serverinfo->fLooseWildcarding;
 372                         r->ServerInfo->fDefaultAgingState = serverinfo->fDefaultAgingState;
 373                 }
 374                 return WERR_OK;
 375         }
 376
 377         is_integer = 0;
 378
 379         if (strcasecmp(operation, "AddressAnswerLimit") == 0) {
 380                 answer_integer = serverinfo->cAddressAnswerLimit;
 381                 is_integer = 1;
 382         } else if (strcasecmp(operation, "AdminConfigured") == 0) {
 383                 answer_integer = serverinfo->fAdminConfigured;
 384                 is_integer = 1;
 385         } else if (strcasecmp(operation, "AllowCNAMEAtNS") == 0) {
 386                 answer_integer = 0;
 387                 is_integer = 1;
 388         } else if (strcasecmp(operation, "AllowUpdate") == 0) {
 389                 answer_integer = serverinfo->fAllowUpdate;
 390                 is_integer = 1;
 391         } else if (strcasecmp(operation, "AutoCacheUpdate") == 0) {
 392                 answer_integer = serverinfo->fAutoCacheUpdate;
 393                 is_integer = 1;
 394         } else if (strcasecmp(operation, "AutoConfigFileZones") == 0) {
 395                 answer_integer = 1;
 396                 is_integer = 1;
 397         } else if (strcasecmp(operation, "BindSecondaries") == 0) {
 398                 answer_integer = serverinfo->fBindSecondaries;
 399                 is_integer = 1;
 400         } else if (strcasecmp(operation, "BootMethod") == 0) {
 401                 answer_integer = serverinfo->fBootMethod;
 402                 is_integer = 1;
 403         } else if (strcasecmp(operation, "DebugLevel") == 0) {
 404                 answer_integer = serverinfo->dwDebugLevel;
 405                 is_integer = 1;
 406         } else if (strcasecmp(operation, "DefaultAgingState") == 0) {
 407                 answer_integer = serverinfo->fDefaultAgingState;
 408                 is_integer = 1;
 409         } else if (strcasecmp(operation, "DefaultNoRefreshInterval") == 0) {
 410                 answer_integer = serverinfo->dwDefaultNoRefreshInterval;
 411                 is_integer = 1;
 412         } else if (strcasecmp(operation, "DefaultRefreshInterval") == 0) {
 413                 answer_integer = serverinfo->dwDefaultRefreshInterval;
 414                 is_integer = 1;
 415         } else if (strcasecmp(operation, "DeleteOutsideGlue") == 0) {
 416                 answer_integer = 0;
 417                 is_integer = 1;
 418         } else if (strcasecmp(operation, "DisjointNets") == 0) {
 419                 answer_integer = 0;
 420                 is_integer = 1;
 421         } else if (strcasecmp(operation, "DsLazyUpdateInterval") == 0) {
 422                 answer_integer = 3; /* seconds */
 423                 is_integer = 1;
 424         } else if (strcasecmp(operation, "DsPollingInterval") == 0) {
 425                 answer_integer = serverinfo->dwDsPollingInterval;
 426                 is_integer = 1;
 427         } else if (strcasecmp(operation, "DsTombstoneInterval") == 0) {
 428                 answer_integer = 0x00127500; /* 14 days */
 429                 is_integer = 1;
 430         } else if (strcasecmp(operation, "EnableRegistryBoot") == 0) {
 431                 answer_integer = 0;
 432                 is_integer = 1;
 433         } else if (strcasecmp(operation, "EventLogLevel") == 0) {
 434                 answer_integer = serverinfo->dwEventLogLevel;
 435                 is_integer = 1;
 436         } else if (strcasecmp(operation, "ForceSoaSerial") == 0) {
 437                 answer_integer = 0;
 438                 is_integer = 1;
 439         } else if (strcasecmp(operation, "ForceSaoRetry") == 0) {
 440                 answer_integer = 0;
 441                 is_integer = 1;
 442         } else if (strcasecmp(operation, "ForceSoaRefresh") == 0) {
 443                 answer_integer = 0;
 444                 is_integer = 1;
 445         } else if (strcasecmp(operation, "ForceSoaMinimumTtl") == 0) {
 446                 answer_integer = 0;
 447                 is_integer = 1;
 448         } else if (strcasecmp(operation, "ForwardDelegations") == 0) {
 449                 answer_integer = 1;
 450                 is_integer = 1;
 451         } else if (strcasecmp(operation, "ForwardingTimeout") == 0) {
 452                 answer_integer = serverinfo->dwForwardTimeout;
 453                 is_integer = 1;
 454         } else if (strcasecmp(operation, "IsSlave") == 0) {
 455                 answer_integer = 0;
 456                 is_integer = 1;
 457         } else if (strcasecmp(operation, "LocalNetPriority") == 0) {
 458                 answer_integer = serverinfo->fLocalNetPriority;
 459                 is_integer = 1;
 460         } else if (strcasecmp(operation, "LogFileMaxSize") == 0) {
 461                 answer_integer = serverinfo->dwLogFileMaxSize;
 462                 is_integer = 1;
 463         } else if (strcasecmp(operation, "LogLevel") == 0) {
 464                 answer_integer = serverinfo->dwLogLevel;
 465                 is_integer = 1;
 466         } else if (strcasecmp(operation, "LooseWildcarding") == 0) {
 467                 answer_integer = serverinfo->fLooseWildcarding;
 468                 is_integer = 1;
 469         } else if (strcasecmp(operation, "MaxCacheTtl") == 0) {
 470                 answer_integer = serverinfo->dwMaxCacheTtl;
 471                 is_integer = 1;
 472         } else if (strcasecmp(operation, "MaxNegativeCacheTtl") == 0) {
 473                 answer_integer = 0x00000384; /* 15 minutes */
 474                 is_integer = 1;
 475         } else if (strcasecmp(operation, "NameCheckFlag") == 0) {
 476                 answer_integer = serverinfo->dwNameCheckFlag;
 477                 is_integer = 1;
 478         } else if (strcasecmp(operation, "NoRecursion") == 0) {
 479                 answer_integer = serverinfo->fNoRecursion;
 480                 is_integer = 1;
 481         } else if (strcasecmp(operation, "NoUpdateDelegations") == 0) {
 482                 answer_integer = 1;
 483                 is_integer = 1;
 484         } else if (strcasecmp(operation, "PublishAutonet") == 0) {
 485                 answer_integer = 0;
 486                 is_integer = 1;
 487         } else if (strcasecmp(operation, "QuietRecvFaultInterval") == 0) {
 488                 answer_integer = 0;
 489                 is_integer = 1;
 490         } else if (strcasecmp(operation, "QuietRecvLogInterval") == 0) {
 491                 answer_integer = 0;
 492                 is_integer = 1;
 493         } else if (strcasecmp(operation, "RecursionRetry") == 0) {
 494                 answer_integer = serverinfo->dwRecursionRetry;
 495                 is_integer = 1;
 496         } else if (strcasecmp(operation, "RecursionTimeout") == 0) {
 497                 answer_integer = serverinfo->dwRecursionTimeout;
 498                 is_integer = 1;
 499         } else if (strcasecmp(operation, "ReloadException") == 0) {
 500                 answer_integer = 0;
 501                 is_integer = 1;
 502         } else if (strcasecmp(operation, "RoundRobin") == 0) {
 503                 answer_integer = serverinfo->fRoundRobin;
 504                 is_integer = 1;
 505         } else if (strcasecmp(operation, "RpcProtocol") == 0) {
 506                 answer_integer = serverinfo->dwRpcProtocol;
 507                 is_integer = 1;
 508         } else if (strcasecmp(operation, "SecureResponses") == 0) {
 509                 answer_integer = serverinfo->fSecureResponses;
 510                 is_integer = 1;
 511         } else if (strcasecmp(operation, "SendPort") == 0) {
 512                 answer_integer = 0;
 513                 is_integer = 1;
 514         } else if (strcasecmp(operation, "ScavengingInterval") == 0) {
 515                 answer_integer = serverinfo->dwScavengingInterval;
 516                 is_integer = 1;
 517         } else if (strcasecmp(operation, "SocketPoolSize") == 0) {
 518                 answer_integer = 0x000009C4;
 519                 is_integer = 1;
 520         } else if (strcasecmp(operation, "StrictFileParsing") == 0) {
 521                 answer_integer = serverinfo->fStrictFileParsing;
 522                 is_integer = 1;
 523         } else if (strcasecmp(operation, "SyncDnsZoneSerial") == 0) {
 524                 answer_integer = 2; /* ZONE_SERIAL_SYNC_XFER */
 525                 is_integer = 1;
 526         } else if (strcasecmp(operation, "UpdateOptions") == 0) {
 527                 answer_integer = 0x0000030F; /* DNS_DEFAULT_UPDATE_OPTIONS */
 528                 is_integer = 1;
 529         } else if (strcasecmp(operation, "UseSystemEvengLog") == 0) {
 530                 answer_integer = 0;
 531                 is_integer = 1;
 532         } else if (strcasecmp(operation, "Version") == 0) {
 533                 answer_integer = serverinfo->dwVersion;
 534                 is_integer = 1;
 535         } else if (strcasecmp(operation, "XfrConnectTimeout") == 0) {
 536                 answer_integer = 0x0000001E;
 537                 is_integer = 1;
 538         } else if (strcasecmp(operation, "WriteAuthorityNs") == 0) {
 539                 answer_integer = serverinfo->fWriteAuthorityNs;
 540                 is_integer = 1;
 541         } else if (strcasecmp(operation, "AdditionalRecursionTimeout") == 0) {
 542                 answer_integer = 0x00000004;
 543                 is_integer = 1;
 544         } else if (strcasecmp(operation, "AppendMsZoneTransferFlag") == 0) {
 545                 answer_integer = 0;
 546                 is_integer = 1;
 547         } else if (strcasecmp(operation, "AutoCreateDelegations") == 0) {
 548                 answer_integer = 0; /* DNS_ACD_DONT_CREATE */
 549                 is_integer = 1;
 550         } else if (strcasecmp(operation, "BreakOnAscFailure") == 0) {
 551                 answer_integer = 0;
 552                 is_integer = 1;
 553         } else if (strcasecmp(operation, "CacheEmptyAuthResponses") == 0) {
 554                 answer_integer = 0;
 555                 is_integer = 1;
 556         } else if (strcasecmp(operation, "DirectoryPartitionAutoEnlistInterval") == 0) {
 557                 answer_integer = 0x00015180; /* 1 day */
 558                 is_integer = 1;
 559         } else if (strcasecmp(operation, "DisableAutoReverseZones") == 0) {
 560                 answer_integer = ~serverinfo->fAutoReverseZones;
 561                 is_integer = 1;
 562         } else if (strcasecmp(operation, "EDnsCacheTimeout") == 0) {
 563                 answer_integer = 0x00000384; /* 15 minutes */
 564                 is_integer = 1;
 565         } else if (strcasecmp(operation, "EnableDirectoryPartitions") == 0) {
 566                 answer_integer = serverinfo->fDsAvailable;
 567                 is_integer = 1;
 568         } else if (strcasecmp(operation, "EnableDnsSec") == 0) {
 569                 answer_integer = 0;
 570                 is_integer = 1;
 571         } else if (strcasecmp(operation, "EnableEDnsProbes") == 0) {
 572                 answer_integer = 0;
 573                 is_integer = 1;
 574         } else if (strcasecmp(operation, "EnableEDnsReception") == 0) {
 575                 answer_integer = 0;
 576                 is_integer = 1;
 577         } else if (strcasecmp(operation, "EnableIPv6") == 0) {
 578                 answer_integer = 0;
 579                 is_integer = 1;
 580         } else if (strcasecmp(operation, "EnableIQueryResponseGeneration") == 0) {
 581                 answer_integer = 0;
 582                 is_integer = 1;
 583         } else if (strcasecmp(operation, "EnableSendErrorSuppression") == 0) {
 584                 answer_integer = 0;
 585                 is_integer = 1;
 586         } else if (strcasecmp(operation, "EnableUpdateForwarding") == 0) {
 587                 answer_integer = 0;
 588                 is_integer = 1;
 589         } else if (strcasecmp(operation, "EnableWinsR") == 0) {
 590                 answer_integer = 0;
 591                 is_integer = 1;
 592         } else if (strcasecmp(operation, "ForceDsaBehaviorVersion") == 0) {
 593                 answer_integer = serverinfo->dwDsDsaVersion;
 594                 is_integer = 1;
 595         } else if (strcasecmp(operation, "ForceDomainBehaviorVersion") == 0) {
 596                 answer_integer = serverinfo->dwDsDsaVersion;
 597                 is_integer = 1;
 598         } else if (strcasecmp(operation, "ForceForestBehaviorVersion") == 0) {
 599                 answer_integer = serverinfo->dwDsDsaVersion;
 600                 is_integer = 1;
 601         } else if (strcasecmp(operation, "HeapDebug") == 0) {
 602                 answer_integer = 0;
 603                 is_integer = 1;
 604         } else if (strcasecmp(operation, "LameDelegationTtl") == 0) {
 605                 answer_integer = 0; /* seconds */
 606                 is_integer = 1;
 607         } else if (strcasecmp(operation, "LocalNetPriorityNetMask") == 0) {
 608                 answer_integer = serverinfo->dwLocalNetPriorityNetMask;
 609                 is_integer = 1;
 610         } else if (strcasecmp(operation, "MaxCacheSize") == 0) {
 611                 answer_integer = 0;
 612                 is_integer = 1;
 613         } else if (strcasecmp(operation, "MaxResourceRecordsInNonSecureUpdate") == 0) {
 614                 answer_integer = 0x0000001E;
 615                 is_integer = 1;
 616         } else if (strcasecmp(operation, "OperationsLogLevel") == 0) {
 617                 answer_integer = 0;
 618                 is_integer = 1;
 619         } else if (strcasecmp(operation, "OperationsLogLevel2") == 0) {
 620                 answer_integer = 0;
 621                 is_integer = 1;
 622         } else if (strcasecmp(operation, "MaximumUdpPacketSize") == 0) {
 623                 answer_integer = 0x00004000; /* maximum possible */
 624                 is_integer = 1;
 625         } else if (strcasecmp(operation, "RecurseToInternetRootMask") == 0) {
 626                 answer_integer = 0;
 627                 is_integer = 1;
 628         } else if (strcasecmp(operation, "SelfTest") == 0) {
 629                 answer_integer = 0;
 630                 is_integer = 1;
 631         } else if (strcasecmp(operation, "SilentlyIgnoreCNameUpdateConflicts") == 0) {
 632                 answer_integer = 1;
 633                 is_integer = 1;
 634         } else if (strcasecmp(operation, "TcpReceivePacketSize") == 0) {
 635                 answer_integer = 0x00010000;
 636                 is_integer = 1;
 637         } else if (strcasecmp(operation, "XfrThrottleMultiplier") == 0) {
 638                 answer_integer = 0x0000000A;
 639                 is_integer = 1;
 640         } else if (strcasecmp(operation, "AllowMsdcsLookupRetry") == 0) {
 641                 answer_integer = 1;
 642                 is_integer = 1;
 643         } else if (strcasecmp(operation, "AllowReadOnlyZoneTransfer") == 0) {
 644                 answer_integer = 0;
 645                 is_integer = 1;
 646         } else if (strcasecmp(operation, "DsBackGroundLoadPaused") == 0) {
 647                 answer_integer = 0;
 648                 is_integer = 1;
 649         } else if (strcasecmp(operation, "DsMinimumBackgroundLoadThreads") == 0) {
 650                 answer_integer = 0;
 651                 is_integer = 1;
 652         } else if (strcasecmp(operation, "DsRemoteReplicationDelay") == 0) {
 653                 answer_integer = 0x0000001E; /* 30 seconds */
 654                 is_integer = 1;
 655         } else if (strcasecmp(operation, "EnableDuplicateQuerySuppresion") == 0) {
 656                 answer_integer = 0;
 657                 is_integer = 1;
 658         } else if (strcasecmp(operation, "EnableGlobalNamesSupport") == 0) {
 659                 answer_integer = 0;
 660                 is_integer = 1;
 661         } else if (strcasecmp(operation, "EnableVersionQuery") == 0) {
 662                 answer_integer = 1; /* DNS_VERSION_QUERY_FULL */
 663                 is_integer = 1;
 664         } else if (strcasecmp(operation, "EnableRsoForRodc") == 0) {
 665                 answer_integer = 0;
 666                 is_integer = 1;
 667         } else if (strcasecmp(operation, "ForceRODCMode") == 0) {
 668                 answer_integer = 0;
 669                 is_integer = 1;
 670         } else if (strcasecmp(operation, "GlobalNamesAlwaysQuerySrv") == 0) {
 671                 answer_integer = 1;
 672                 is_integer = 1;
 673         } else if (strcasecmp(operation, "GlobalNamesBlockUpdates") == 0) {
 674                 answer_integer = 0;
 675                 is_integer = 1;
 676         } else if (strcasecmp(operation, "GlobalNamesEnableEDnsProbes") == 0) {
 677                 answer_integer = 0;
 678                 is_integer = 1;
 679         } else if (strcasecmp(operation, "GlobalNamesPreferAAAA") == 0) {
 680                 answer_integer = 0;
 681                 is_integer = 1;
 682         } else if (strcasecmp(operation, "GlobalNamesQueryOrder") == 0) {
 683                 answer_integer = 1;
 684                 is_integer = 1;
 685         } else if (strcasecmp(operation, "GlobalNamesSendTimeout") == 0) {
 686                 answer_integer = 3; /* seconds */
 687                 is_integer = 1;
 688         } else if (strcasecmp(operation, "GlobalNamesServerQueryInterval") == 0) {
 689                 answer_integer = 0x00005460; /* 6 hours */
 690                 is_integer = 1;
 691         } else if (strcasecmp(operation, "RemoteIPv4RankBoost") == 0) {
 692                 answer_integer = 0;
 693                 is_integer = 1;
 694         } else if (strcasecmp(operation, "RemoteIPv6RankBoost") == 0) {
 695                 answer_integer = 0;
 696                 is_integer = 1;
 697         } else if (strcasecmp(operation, "MaximumRodcRsoAttemptsPerCycle") == 0) {
 698                 answer_integer = 0x00000064;
 699                 is_integer = 1;
 700         } else if (strcasecmp(operation, "MaximumRodcRsoQueueLength") == 0) {
 701                 answer_integer = 0x0000012C;
 702                 is_integer = 1;
 703         } else if (strcasecmp(operation, "EnableGlobalQueryBlockList") == 0) {
 704                 answer_integer = 0;
 705                 is_integer = 1;
 706         } else if (strcasecmp(operation, "OpenACLOnProxyUpdates") == 0) {
 707                 answer_integer = 0;
 708                 is_integer = 1;
 709         } else if (strcasecmp(operation, "CacheLockingPercent") == 0) {
 710                 answer_integer = 0x00000064;
 711                 is_integer = 1;
 712         }
 713
 714         if (is_integer == 1) {
 715                 *typeid = DNSSRV_TYPEID_DWORD;
 716                 r->Dword = answer_integer;
 717                 return WERR_OK;
 718         }
 719
 720         is_addresses = 0;
 721
 722         if (strcasecmp(operation, "Forwarders") == 0) {
 723                 if (client_version == DNS_CLIENT_VERSION_LONGHORN) {
 724                         answer_addrarray = ip4_array_to_dns_addr_array(mem_ctx, serverinfo->aipForwarders);
 725                 } else {
 726                         answer_iparray = ip4_array_copy(mem_ctx, serverinfo->aipForwarders);
 727                 }
 728                 is_addresses = 1;
 729         } else if (strcasecmp(operation, "ListenAddresses") == 0) {
 730                 if (client_version == DNS_CLIENT_VERSION_LONGHORN) {
 731                         answer_addrarray = serverinfo->aipListenAddrs;
 732                 } else {
 733                         answer_iparray = dns_addr_array_to_ip4_array(mem_ctx, serverinfo->aipListenAddrs);
 734                 }
 735                 is_addresses = 1;
 736         } else if (strcasecmp(operation, "BreakOnReceiveFrom") == 0) {
 737                 if (client_version == DNS_CLIENT_VERSION_LONGHORN) {
 738                         answer_addrarray = NULL;
 739                 } else {
 740                         answer_iparray = NULL;
 741                 }
 742                 is_addresses = 1;
 743         } else if (strcasecmp(operation, "BreakOnUpdateFrom") == 0) {
 744                 if (client_version == DNS_CLIENT_VERSION_LONGHORN) {
 745                         answer_addrarray = NULL;
 746                 } else {
 747                         answer_iparray = NULL;
 748                 }
 749                 is_addresses = 1;
 750         } else if (strcasecmp(operation, "LogIPFilterList") == 0) {
 751                 if (client_version == DNS_CLIENT_VERSION_LONGHORN) {
 752                         answer_addrarray = ip4_array_to_dns_addr_array(mem_ctx, serverinfo->aipLogFilter);
 753                 } else {
 754                         answer_iparray = ip4_array_copy(mem_ctx, serverinfo->aipLogFilter);
 755                 }
 756                 is_addresses = 1;
 757         }
 758
 759         if (is_addresses == 1) {
 760                 if (client_version == DNS_CLIENT_VERSION_LONGHORN) {
 761                         *typeid = DNSSRV_TYPEID_ADDRARRAY;
 762                         r->AddrArray = answer_addrarray;
 763                 } else {
 764                         *typeid = DNSSRV_TYPEID_IPARRAY;
 765                         r->IpArray = answer_iparray;
 766                 }
 767                 return WERR_OK;
 768         }
 769
 770         is_string = is_wstring = 0;
 771
 772         if (strcasecmp(operation, "DomainDirectoryPartitionBaseName") == 0) {
 773                 answer_string = talloc_strdup(mem_ctx, "DomainDnsZones");
 774                 if (! answer_string) {
 775                         return WERR_OUTOFMEMORY;
 776                 }
 777                 is_string = 1;
 778         } else if (strcasecmp(operation, "ForestDirectoryPartitionBaseName") == 0) {
 779                 answer_string = talloc_strdup(mem_ctx, "ForestDnsZones");
 780                 if (! answer_string) {
 781                         return WERR_OUTOFMEMORY;
 782                 }
 783                 is_string = 1;
 784         } else if (strcasecmp(operation, "LogFilePath") == 0) {
 785                 answer_string = talloc_strdup(mem_ctx, serverinfo->pwszLogFilePath);
 786                 is_wstring = 1;
 787         } else if (strcasecmp(operation, "ServerLevelPluginDll") == 0) {
 788                 answer_string = NULL;
 789                 is_wstring = 1;
 790         } else if (strcasecmp(operation, "DsBackgroundPauseName") == 0) {
 791                 answer_string = NULL;
 792                 is_string = 1;
 793         } else if (strcasecmp(operation, "DsNotRoundRobinTypes") == 0) {
 794                 answer_string = NULL;
 795                 is_string = 1;
 796         }
 797
 798         if (is_string == 1) {
 799                 *typeid = DNSSRV_TYPEID_LPSTR;
 800                 r->String = answer_string;
 801                 return WERR_OK;
 802         } else if (is_wstring == 1) {
 803                 *typeid = DNSSRV_TYPEID_LPWSTR;
 804                 r->WideString = answer_string;
 805                 return WERR_OK;
 806         }
 807
 808         is_stringlist = 0;
 809
 810         if (strcasecmp(operation, "GlobalQueryBlockList") == 0) {
 811                 answer_stringlist = NULL;
 812                 is_stringlist = 1;
 813         } else if (strcasecmp(operation, "SocketPoolExcludedPortRanges") == 0) {
 814                 answer_stringlist = NULL;
 815                 is_stringlist = 1;
 816         }
 817
 818         if (is_stringlist == 1) {
 819                 *typeid = DNSSRV_TYPEID_UTF8_STRING_LIST;
 820                 r->Utf8StringList = answer_stringlist;
 821                 return WERR_OK;
 822         }
 823
 824         DEBUG(0,("dnsserver: Invalid server operation %s", operation));
 825         return WERR_DNS_ERROR_INVALID_PROPERTY;
 826 }
 827
 828 /* [MS-DNSP].pdf Section 3.1.1.2 Zone Configuration Information */
 829 static WERROR dnsserver_query_zone(struct dnsserver_state *dsstate,
 830                                         TALLOC_CTX *mem_ctx,
 831                                         struct dnsserver_zone *z,
 832                                         const char *operation,
 833                                         const unsigned int client_version,
 834                                         enum DNS_RPC_TYPEID *typeid,
 835                                         union DNSSRV_RPC_UNION *r)
 836 {
 837         uint8_t is_integer, is_addresses, is_string;
 838         uint32_t answer_integer;
 839         struct IP4_ARRAY *answer_iparray;
 840         struct DNS_ADDR_ARRAY *answer_addrarray;
 841         char *answer_string;
 842         struct dnsserver_zoneinfo *zoneinfo;
 843
 844         zoneinfo = z->zoneinfo;
 845
 846         if (strcasecmp(operation, "Zone") == 0) {
 847                 if (client_version == DNS_CLIENT_VERSION_W2K) {
 848                         *typeid = DNSSRV_TYPEID_ZONE_W2K;
 849                         r->ZoneW2K = talloc_zero(mem_ctx, struct DNS_RPC_ZONE_W2K);
 850
 851                         r->ZoneW2K->pszZoneName = talloc_strdup(mem_ctx, z->name);
 852                         r->ZoneW2K->Flags = zoneinfo->Flags;
 853                         r->ZoneW2K->ZoneType = zoneinfo->dwZoneType;
 854                         r->ZoneW2K->Version = zoneinfo->Version;
 855                 } else {
 856                         *typeid = DNSSRV_TYPEID_ZONE;
 857                         r->Zone = talloc_zero(mem_ctx, struct DNS_RPC_ZONE_DOTNET);
 858
 859                         r->Zone->dwRpcStructureVersion = 0x01;
 860                         r->Zone->pszZoneName = talloc_strdup(mem_ctx, z->name);
 861                         r->Zone->Flags = zoneinfo->Flags;
 862                         r->Zone->ZoneType = zoneinfo->dwZoneType;
 863                         r->Zone->Version = zoneinfo->Version;
 864                         r->Zone->dwDpFlags = z->partition->dwDpFlags;
 865                         r->Zone->pszDpFqdn = talloc_strdup(mem_ctx, z->partition->pszDpFqdn);
 866                 }
 867                 return WERR_OK;
 868         }
 869
 870         if (strcasecmp(operation, "ZoneInfo") == 0) {
 871                 if (client_version == DNS_CLIENT_VERSION_W2K) {
 872                         *typeid = DNSSRV_TYPEID_ZONE_INFO_W2K;
 873                         r->ZoneInfoW2K = talloc_zero(mem_ctx, struct DNS_RPC_ZONE_INFO_W2K);
 874
 875                         r->ZoneInfoW2K->pszZoneName = talloc_strdup(mem_ctx, z->name);
 876                         r->ZoneInfoW2K->dwZoneType = zoneinfo->dwZoneType;
 877                         r->ZoneInfoW2K->fReverse = zoneinfo->fReverse;
 878                         r->ZoneInfoW2K->fAllowUpdate = zoneinfo->fAllowUpdate;
 879                         r->ZoneInfoW2K->fPaused = zoneinfo->fPaused;
 880                         r->ZoneInfoW2K->fShutdown = zoneinfo->fShutdown;
 881                         r->ZoneInfoW2K->fAutoCreated = zoneinfo->fAutoCreated;
 882                         r->ZoneInfoW2K->fUseDatabase = zoneinfo->fUseDatabase;
 883                         r->ZoneInfoW2K->pszDataFile = talloc_strdup(mem_ctx, zoneinfo->pszDataFile);
 884                         r->ZoneInfoW2K->aipMasters = ip4_array_copy(mem_ctx, zoneinfo->aipMasters);
 885                         r->ZoneInfoW2K->fSecureSecondaries = zoneinfo->fSecureSecondaries;
 886                         r->ZoneInfoW2K->fNotifyLevel = zoneinfo->fNotifyLevel;
 887                         r->ZoneInfoW2K->aipSecondaries = ip4_array_copy(mem_ctx, zoneinfo->aipSecondaries);
 888                         r->ZoneInfoW2K->aipNotify = ip4_array_copy(mem_ctx, zoneinfo->aipNotify);
 889                         r->ZoneInfoW2K->fUseWins = zoneinfo->fUseWins;
 890                         r->ZoneInfoW2K->fUseNbstat = zoneinfo->fUseNbstat;
 891                         r->ZoneInfoW2K->fAging = zoneinfo->fAging;
 892                         r->ZoneInfoW2K->dwNoRefreshInterval = zoneinfo->dwNoRefreshInterval;
 893                         r->ZoneInfoW2K->dwRefreshInterval = zoneinfo->dwRefreshInterval;
 894                         r->ZoneInfoW2K->dwAvailForScavengeTime = zoneinfo->dwAvailForScavengeTime;
 895                         r->ZoneInfoW2K->aipScavengeServers = ip4_array_copy(mem_ctx, zoneinfo->aipScavengeServers);
 896
 897                 } else if (client_version == DNS_CLIENT_VERSION_DOTNET) {
 898                         *typeid = DNSSRV_TYPEID_ZONE_INFO_DOTNET;
 899                         r->ZoneInfoDotNet = talloc_zero(mem_ctx, struct DNS_RPC_ZONE_INFO_DOTNET);
 900
 901                         r->ZoneInfoDotNet->dwRpcStructureVersion = 0x01;
 902                         r->ZoneInfoDotNet->pszZoneName = talloc_strdup(mem_ctx, z->name);
 903                         r->ZoneInfoDotNet->dwZoneType = zoneinfo->dwZoneType;
 904                         r->ZoneInfoDotNet->fReverse = zoneinfo->fReverse;
 905                         r->ZoneInfoDotNet->fAllowUpdate = zoneinfo->fAllowUpdate;
 906                         r->ZoneInfoDotNet->fPaused = zoneinfo->fPaused;
 907                         r->ZoneInfoDotNet->fShutdown = zoneinfo->fShutdown;
 908                         r->ZoneInfoDotNet->fAutoCreated = zoneinfo->fAutoCreated;
 909                         r->ZoneInfoDotNet->fUseDatabase = zoneinfo->fUseDatabase;
 910                         r->ZoneInfoDotNet->pszDataFile = talloc_strdup(mem_ctx, zoneinfo->pszDataFile);
 911                         r->ZoneInfoDotNet->aipMasters = ip4_array_copy(mem_ctx, zoneinfo->aipMasters);
 912                         r->ZoneInfoDotNet->fSecureSecondaries = zoneinfo->fSecureSecondaries;
 913                         r->ZoneInfoDotNet->fNotifyLevel = zoneinfo->fNotifyLevel;
 914                         r->ZoneInfoDotNet->aipSecondaries = ip4_array_copy(mem_ctx, zoneinfo->aipSecondaries);
 915                         r->ZoneInfoDotNet->aipNotify = ip4_array_copy(mem_ctx, zoneinfo->aipNotify);
 916                         r->ZoneInfoDotNet->fUseWins = zoneinfo->fUseWins;
 917                         r->ZoneInfoDotNet->fUseNbstat = zoneinfo->fUseNbstat;
 918                         r->ZoneInfoDotNet->fAging = zoneinfo->fAging;
 919                         r->ZoneInfoDotNet->dwNoRefreshInterval = zoneinfo->dwNoRefreshInterval;
 920                         r->ZoneInfoDotNet->dwRefreshInterval = zoneinfo->dwRefreshInterval;
 921                         r->ZoneInfoDotNet->dwAvailForScavengeTime = zoneinfo->dwAvailForScavengeTime;
 922                         r->ZoneInfoDotNet->aipScavengeServers = ip4_array_copy(mem_ctx, zoneinfo->aipScavengeServers);
 923                         r->ZoneInfoDotNet->dwForwarderTimeout = zoneinfo->dwForwarderTimeout;
 924                         r->ZoneInfoDotNet->fForwarderSlave = zoneinfo->fForwarderSlave;
 925                         r->ZoneInfoDotNet->aipLocalMasters = ip4_array_copy(mem_ctx, zoneinfo->aipLocalMasters);
 926                         r->ZoneInfoDotNet->dwDpFlags = z->partition->dwDpFlags;
 927                         r->ZoneInfoDotNet->pszDpFqdn = talloc_strdup(mem_ctx, z->partition->pszDpFqdn);
 928                         r->ZoneInfoDotNet->pwszZoneDn = talloc_strdup(mem_ctx, zoneinfo->pwszZoneDn);
 929                         r->ZoneInfoDotNet->dwLastSuccessfulSoaCheck = zoneinfo->dwLastSuccessfulSoaCheck;
 930                         r->ZoneInfoDotNet->dwLastSuccessfulXfr = zoneinfo->dwLastSuccessfulXfr;
 931
 932                 } else {
 933                         *typeid = DNSSRV_TYPEID_ZONE_INFO;
 934                         r->ZoneInfo = talloc_zero(mem_ctx, struct DNS_RPC_ZONE_INFO_LONGHORN);
 935
 936                         r->ZoneInfo->dwRpcStructureVersion = 0x02;
 937                         r->ZoneInfo->pszZoneName = talloc_strdup(mem_ctx, z->name);
 938                         r->ZoneInfo->dwZoneType = zoneinfo->dwZoneType;
 939                         r->ZoneInfo->fReverse = zoneinfo->fReverse;
 940                         r->ZoneInfo->fAllowUpdate = zoneinfo->fAllowUpdate;
 941                         r->ZoneInfo->fPaused = zoneinfo->fPaused;
 942                         r->ZoneInfo->fShutdown = zoneinfo->fShutdown;
 943                         r->ZoneInfo->fAutoCreated = zoneinfo->fAutoCreated;
 944                         r->ZoneInfo->fUseDatabase = zoneinfo->fUseDatabase;
 945                         r->ZoneInfo->pszDataFile = talloc_strdup(mem_ctx, zoneinfo->pszDataFile);
 946                         r->ZoneInfo->aipMasters = ip4_array_to_dns_addr_array(mem_ctx, zoneinfo->aipMasters);
 947                         r->ZoneInfo->fSecureSecondaries = zoneinfo->fSecureSecondaries;
 948                         r->ZoneInfo->fNotifyLevel = zoneinfo->fNotifyLevel;
 949                         r->ZoneInfo->aipSecondaries = ip4_array_to_dns_addr_array(mem_ctx, zoneinfo->aipSecondaries);
 950                         r->ZoneInfo->aipNotify = ip4_array_to_dns_addr_array(mem_ctx, zoneinfo->aipNotify);
 951                         r->ZoneInfo->fUseWins = zoneinfo->fUseWins;
 952                         r->ZoneInfo->fUseNbstat = zoneinfo->fUseNbstat;
 953                         r->ZoneInfo->fAging = zoneinfo->fAging;
 954                         r->ZoneInfo->dwNoRefreshInterval = zoneinfo->dwNoRefreshInterval;
 955                         r->ZoneInfo->dwRefreshInterval = zoneinfo->dwRefreshInterval;
 956                         r->ZoneInfo->dwAvailForScavengeTime = zoneinfo->dwAvailForScavengeTime;
 957                         r->ZoneInfo->aipScavengeServers = ip4_array_to_dns_addr_array(mem_ctx, zoneinfo->aipScavengeServers);
 958                         r->ZoneInfo->dwForwarderTimeout = zoneinfo->dwForwarderTimeout;
 959                         r->ZoneInfo->fForwarderSlave = zoneinfo->fForwarderSlave;
 960                         r->ZoneInfo->aipLocalMasters = ip4_array_to_dns_addr_array(mem_ctx, zoneinfo->aipLocalMasters);
 961                         r->ZoneInfo->dwDpFlags = z->partition->dwDpFlags;
 962                         r->ZoneInfo->pszDpFqdn = talloc_strdup(mem_ctx, z->partition->pszDpFqdn);
 963                         r->ZoneInfo->pwszZoneDn = talloc_strdup(mem_ctx, zoneinfo->pwszZoneDn);
 964                         r->ZoneInfo->dwLastSuccessfulSoaCheck = zoneinfo->dwLastSuccessfulSoaCheck;
 965                         r->ZoneInfo->dwLastSuccessfulXfr = zoneinfo->dwLastSuccessfulXfr;
 966
 967                         r->ZoneInfo->fQueuedForBackgroundLoad = zoneinfo->fQueuedForBackgroundLoad;
 968                         r->ZoneInfo->fBackgroundLoadInProgress = zoneinfo->fBackgroundLoadInProgress;
 969                         r->ZoneInfo->fReadOnlyZone = zoneinfo->fReadOnlyZone;
 970                         r->ZoneInfo->dwLastXfrAttempt = zoneinfo->dwLastXfrAttempt;
 971                         r->ZoneInfo->dwLastXfrResult = zoneinfo->dwLastXfrResult;
 972                 }
 973
 974                 return WERR_OK;
 975         }
 976
 977         is_integer = 0;
 978
 979         if (strcasecmp(operation, "AllowUpdate") == 0) {
 980                 answer_integer = zoneinfo->fAllowUpdate;
 981                 is_integer = 1;
 982         } else if (strcasecmp(operation, "Secured") == 0) {
 983                 answer_integer = 0;
 984                 is_integer = 1;
 985         } else if (strcasecmp(operation, "DsIntegrated") == 0) {
 986                 answer_integer = zoneinfo->fUseDatabase;
 987                 is_integer = 1;
 988         } else if (strcasecmp(operation, "LogUpdates") == 0) {
 989                 answer_integer = 0;
 990                 is_integer = 1;
 991         } else if (strcasecmp(operation, "NoRefreshInterval") == 0) {
 992                 answer_integer = zoneinfo->dwNoRefreshInterval;
 993                 is_integer = 1;
 994         } else if (strcasecmp(operation, "NotifyLevel") == 0) {
 995                 answer_integer = zoneinfo->fNotifyLevel;
 996                 is_integer = 1;
 997         } else if (strcasecmp(operation, "RefreshInterval") == 0) {
 998                 answer_integer = zoneinfo->dwRefreshInterval;
 999                 is_integer = 1;
1000         } else if (strcasecmp(operation, "SecureSecondaries") == 0) {
1001                 answer_integer = zoneinfo->fSecureSecondaries;
1002                 is_integer = 1;
1003         } else if (strcasecmp(operation, "Type") == 0) {
1004                 answer_integer = zoneinfo->dwZoneType;
1005                 is_integer = 1;
1006         } else if (strcasecmp(operation, "Aging") == 0) {
1007                 answer_integer = zoneinfo->fAging;
1008                 is_integer = 1;
1009         } else if (strcasecmp(operation, "ForwarderSlave") == 0) {
1010                 answer_integer = zoneinfo->fForwarderSlave;
1011                 is_integer = 1;
1012         } else if (strcasecmp(operation, "ForwarderTimeout") == 0) {
1013                 answer_integer = zoneinfo->dwForwarderTimeout;
1014                 is_integer = 1;
1015         } else if (strcasecmp(operation, "Unicode") == 0) {
1016                 answer_integer = 0;
1017                 is_integer = 1;
1018         }
1019
1020         if (is_integer == 1) {
1021                 *typeid = DNSSRV_TYPEID_DWORD;
1022                 r->Dword = answer_integer;
1023                 return WERR_OK;
1024         }
1025
1026         is_addresses = 0;
1027
1028         if (strcasecmp(operation, "AllowNSRecordsAutoCreation") == 0) {
1029                 if (client_version == DNS_CLIENT_VERSION_LONGHORN) {
1030                         answer_addrarray = NULL;
1031                 } else {
1032                         answer_iparray = NULL;
1033                 }
1034                 is_addresses = 1;
1035         } else if (strcasecmp(operation, "ScavengeServers") == 0) {
1036                 if (client_version == DNS_CLIENT_VERSION_LONGHORN) {
1037                         answer_addrarray = ip4_array_to_dns_addr_array(mem_ctx, zoneinfo->aipScavengeServers);
1038                 } else {
1039                         answer_iparray = ip4_array_copy(mem_ctx, zoneinfo->aipScavengeServers);
1040                 }
1041                 is_addresses = 1;
1042         } else if (strcasecmp(operation, "MasterServers") == 0) {
1043                 if (client_version == DNS_CLIENT_VERSION_LONGHORN) {
1044                         answer_addrarray = ip4_array_to_dns_addr_array(mem_ctx, zoneinfo->aipMasters);
1045                 } else {
1046                         answer_iparray = ip4_array_copy(mem_ctx, zoneinfo->aipMasters);
1047                 }
1048                 is_addresses = 1;
1049         } else if (strcasecmp(operation, "LocalMasterServers") == 0) {
1050                 if (client_version == DNS_CLIENT_VERSION_LONGHORN) {
1051                         answer_addrarray = ip4_array_to_dns_addr_array(mem_ctx, zoneinfo->aipLocalMasters);
1052                 } else {
1053                         answer_iparray = ip4_array_copy(mem_ctx, zoneinfo->aipLocalMasters);
1054                 }
1055                 is_addresses = 1;
1056         } else if (strcasecmp(operation, "NotifyServers") == 0) {
1057                 if (client_version == DNS_CLIENT_VERSION_LONGHORN) {
1058                         answer_addrarray = ip4_array_to_dns_addr_array(mem_ctx, zoneinfo->aipNotify);
1059                 } else {
1060                         answer_iparray = ip4_array_copy(mem_ctx, zoneinfo->aipNotify);
1061                 }
1062                 is_addresses = 1;
1063         } else if (strcasecmp(operation, "SecondaryServers") == 0) {
1064                 if (client_version == DNS_CLIENT_VERSION_LONGHORN) {
1065                         answer_addrarray = ip4_array_to_dns_addr_array(mem_ctx, zoneinfo->aipSecondaries);
1066                 } else {
1067                         answer_iparray = ip4_array_copy(mem_ctx, zoneinfo->aipSecondaries);
1068                 }
1069                 is_addresses = 1;
1070         }
1071
1072         if (is_addresses == 1) {
1073                 if (client_version == DNS_CLIENT_VERSION_LONGHORN) {
1074                         *typeid = DNSSRV_TYPEID_ADDRARRAY;
1075                         r->AddrArray = answer_addrarray;
1076                 } else {
1077                         *typeid = DNSSRV_TYPEID_IPARRAY;
1078                         r->IpArray = answer_iparray;
1079                 }
1080                 return WERR_OK;
1081         }
1082
1083         is_string = 0;
1084
1085         if (strcasecmp(operation, "DatabaseFile") == 0) {
1086                 answer_string = talloc_strdup(mem_ctx, zoneinfo->pszDataFile);
1087                 is_string = 1;
1088         } else if (strcasecmp(operation, "ApplicationDirectoryPartition") == 0) {
1089                 answer_string = talloc_strdup(mem_ctx, z->partition->pszDpFqdn);
1090                 is_string = 1;
1091         } else if (strcasecmp(operation, "BreakOnNameUpdate") == 0) {
1092                 answer_string = NULL;
1093                 is_string = 1;
1094         }
1095
1096         if (is_string == 1) {
1097                 *typeid = DNSSRV_TYPEID_LPSTR;
1098                 r->String = answer_string;
1099                 return WERR_OK;
1100         }
1101
1102         DEBUG(0,("dnsserver: Invalid zone operation %s", operation));
1103         return WERR_DNS_ERROR_INVALID_PROPERTY;
1104
1105 }
1106
1107 /* dnsserver operation functions */
1108
1109 /* [MS-DNSP].pdf Section 3.1.1.1 DNS Server Configuration Information */
1110 static WERROR dnsserver_operate_server(struct dnsserver_state *dsstate,
1111                                         TALLOC_CTX *mem_ctx,
1112                                         const char *operation,
1113                                         const unsigned int client_version,
1114                                         enum DNS_RPC_TYPEID typeid,
1115                                         union DNSSRV_RPC_UNION *r)
1116 {
1117         bool valid_operation = false;
1118
1119         if (strcasecmp(operation, "ResetDwordProperty") == 0) {
1120                 valid_operation = true;
1121         } else if (strcasecmp(operation, "Restart") == 0) {
1122                 valid_operation = true;
1123         } else if (strcasecmp(operation, "ClearDebugLog") == 0) {
1124                 valid_operation = true;
1125         } else if (strcasecmp(operation, "ClearCache") == 0) {
1126                 valid_operation = true;
1127         } else if (strcasecmp(operation, "WriteDirtyZones") == 0) {
1128                 valid_operation = true;
1129         } else if (strcasecmp(operation, "ZoneCreate") == 0) {
1130                 struct dnsserver_zone *z, *z2;
1131                 WERROR status;
1132                 int len;
1133
1134                 z = talloc_zero(mem_ctx, struct dnsserver_zone);
1135                 W_ERROR_HAVE_NO_MEMORY(z);
1136                 z->partition = talloc_zero(z, struct dnsserver_partition);
1137                 W_ERROR_HAVE_NO_MEMORY_AND_FREE(z->partition, z);
1138                 z->zoneinfo = talloc_zero(z, struct dnsserver_zoneinfo);
1139                 W_ERROR_HAVE_NO_MEMORY_AND_FREE(z->zoneinfo, z);
1140
1141                 if (typeid == DNSSRV_TYPEID_ZONE_CREATE_W2K) {
1142                         len = strlen(r->ZoneCreateW2K->pszZoneName);
1143                         if (r->ZoneCreateW2K->pszZoneName[len-1] == '.') {
1144                                 len -= 1;
1145                         }
1146                         z->name = talloc_strndup(z, r->ZoneCreateW2K->pszZoneName, len);
1147                         z->zoneinfo->dwZoneType = r->ZoneCreateW2K->dwZoneType;
1148                         z->zoneinfo->fAllowUpdate = r->ZoneCreateW2K->fAllowUpdate;
1149                         z->zoneinfo->fAging = r->ZoneCreateW2K->fAging;
1150                         z->zoneinfo->Flags = r->ZoneCreateW2K->dwFlags;
1151                 } else if (typeid == DNSSRV_TYPEID_ZONE_CREATE_DOTNET) {
1152                         len = strlen(r->ZoneCreateDotNet->pszZoneName);
1153                         if (r->ZoneCreateDotNet->pszZoneName[len-1] == '.') {
1154                                 len -= 1;
1155                         }
1156                         z->name = talloc_strndup(z, r->ZoneCreateDotNet->pszZoneName, len);
1157                         z->zoneinfo->dwZoneType = r->ZoneCreateDotNet->dwZoneType;
1158                         z->zoneinfo->fAllowUpdate = r->ZoneCreateDotNet->fAllowUpdate;
1159                         z->zoneinfo->fAging = r->ZoneCreateDotNet->fAging;
1160                         z->zoneinfo->Flags = r->ZoneCreateDotNet->dwFlags;
1161                         z->partition->dwDpFlags = r->ZoneCreateDotNet->dwDpFlags;
1162                 } else if (typeid == DNSSRV_TYPEID_ZONE_CREATE) {
1163                         len = strlen(r->ZoneCreate->pszZoneName);
1164                         if (r->ZoneCreate->pszZoneName[len-1] == '.') {
1165                                 len -= 1;
1166                         }
1167                         z->name = talloc_strndup(z, r->ZoneCreate->pszZoneName, len);
1168                         z->zoneinfo->dwZoneType = r->ZoneCreate->dwZoneType;
1169                         z->zoneinfo->fAllowUpdate = r->ZoneCreate->fAllowUpdate;
1170                         z->zoneinfo->fAging = r->ZoneCreate->fAging;
1171                         z->zoneinfo->Flags = r->ZoneCreate->dwFlags;
1172                         z->partition->dwDpFlags = r->ZoneCreate->dwDpFlags;
1173                 } else {
1174                         talloc_free(z);
1175                         return WERR_DNS_ERROR_INVALID_PROPERTY;
1176                 }
1177
1178                 z2 = dnsserver_find_zone(dsstate->zones, z->name);
1179                 if (z2 != NULL) {
1180                         talloc_free(z);
1181                         return WERR_DNS_ERROR_ZONE_ALREADY_EXISTS;
1182                 }
1183
1184                 status = dnsserver_db_create_zone(dsstate->samdb, dsstate->partitions, z,
1185                                                   dsstate->lp_ctx);
1186                 talloc_free(z);
1187
1188                 if (W_ERROR_IS_OK(status)) {
1189                         dnsserver_reload_zones(dsstate);
1190                 }
1191                 return status;
1192         } else if (strcasecmp(operation, "ClearStatistics") == 0) {
1193                 valid_operation = true;
1194         } else if (strcasecmp(operation, "EnlistDirectoryPartition") == 0) {
1195                 valid_operation = true;
1196         } else if (strcasecmp(operation, "StartScavenging") == 0) {
1197                 valid_operation = true;
1198         } else if (strcasecmp(operation, "AbortScavenging") == 0) {
1199                 valid_operation = true;
1200         } else if (strcasecmp(operation, "AutoConfigure") == 0) {
1201                 valid_operation = true;
1202         } else if (strcasecmp(operation, "ExportSettings") == 0) {
1203                 valid_operation = true;
1204         } else if (strcasecmp(operation, "PrepareForDemotion") == 0) {
1205                 valid_operation = true;
1206         } else if (strcasecmp(operation, "PrepareForUninstall") == 0) {
1207                 valid_operation = true;
1208         } else if (strcasecmp(operation, "DeleteNode") == 0) {
1209                 valid_operation = true;
1210         } else if (strcasecmp(operation, "DeleteRecord") == 0) {
1211                 valid_operation = true;
1212         } else if (strcasecmp(operation, "WriteBackFile") == 0) {
1213                 valid_operation = true;
1214         } else if (strcasecmp(operation, "ListenAddresses") == 0) {
1215                 valid_operation = true;
1216         } else if (strcasecmp(operation, "Forwarders") == 0) {
1217                 valid_operation = true;
1218         } else if (strcasecmp(operation, "LogFilePath") == 0) {
1219                 valid_operation = true;
1220         } else if (strcasecmp(operation, "LogIpFilterList") == 0) {
1221                 valid_operation = true;
1222         } else if (strcasecmp(operation, "ForestDirectoryPartitionBaseName") == 0) {
1223                 valid_operation = true;
1224         } else if (strcasecmp(operation, "DomainDirectoryPartitionBaseName") == 0) {
1225                 valid_operation = true;
1226         } else if (strcasecmp(operation, "GlobalQueryBlockList") == 0) {
1227                 valid_operation = true;
1228         } else if (strcasecmp(operation, "BreakOnReceiveFrom") == 0) {
1229                 valid_operation = true;
1230         } else if (strcasecmp(operation, "BreakOnUpdateFrom") == 0) {
1231                 valid_operation = true;
1232         } else if (strcasecmp(operation, "ServerLevelPluginDll") == 0) {
1233                 valid_operation = true;
1234         }
1235
1236         if (valid_operation) {
1237                 DEBUG(0, ("dnsserver: server operation '%s' not implemented", operation));
1238                 return WERR_CALL_NOT_IMPLEMENTED;
1239         }
1240
1241         DEBUG(0, ("dnsserver: invalid server operation '%s'", operation));
1242         return WERR_DNS_ERROR_INVALID_PROPERTY;
1243 }
1244
1245 static WERROR dnsserver_complex_operate_server(struct dnsserver_state *dsstate,
1246                                         TALLOC_CTX *mem_ctx,
1247                                         const char *operation,
1248                                         const unsigned int client_version,
1249                                         enum DNS_RPC_TYPEID typeid_in,
1250                                         union DNSSRV_RPC_UNION *rin,
1251                                         enum DNS_RPC_TYPEID *typeid_out,
1252                                         union DNSSRV_RPC_UNION *rout)
1253 {
1254         int valid_operation = 0;
1255         struct dnsserver_zone *z, **zlist;
1256         size_t zcount;
1257         bool found1, found2, found3, found4;
1258         size_t i;
1259
1260         if (strcasecmp(operation, "QueryDwordProperty") == 0) {
1261                 if (typeid_in == DNSSRV_TYPEID_LPSTR) {
1262                         return dnsserver_query_server(dsstate, mem_ctx,
1263                                                         rin->String,
1264                                                         client_version,
1265                                                         typeid_out,
1266                                                         rout);
1267                 }
1268         } else if (strcasecmp(operation, "EnumZones") == 0) {
1269                 if (typeid_in != DNSSRV_TYPEID_DWORD) {
1270                         return WERR_DNS_ERROR_INVALID_PROPERTY;
1271                 }
1272
1273                 zcount = 0;
1274                 zlist = talloc_zero_array(mem_ctx, struct dnsserver_zone *, 0);
1275                 for (z = dsstate->zones; z; z = z->next) {
1276
1277                         /* Match the flags in groups
1278                          *
1279                          * Group1 : PRIMARY, SECONDARY, CACHE, AUTO
1280                          * Group2 : FORWARD, REVERSE, FORWARDER, STUB
1281                          * Group3 : DS, NON_DS, DOMAIN_DP, FOREST_DP
1282                          * Group4 : CUSTOM_DP, LEGACY_DP
1283                          */
1284
1285                         /* Group 1 */
1286                         found1 = false;
1287                         if (rin->Dword & 0x0000000f) {
1288                                 if (rin->Dword & DNS_ZONE_REQUEST_PRIMARY) {
1289                                         if (z->zoneinfo->dwZoneType == DNS_ZONE_TYPE_PRIMARY) {
1290                                         found1 = true;
1291                                         }
1292                                 }
1293                                 if (rin->Dword & DNS_ZONE_REQUEST_SECONDARY) {
1294                                         if (z->zoneinfo->dwZoneType == DNS_ZONE_TYPE_SECONDARY) {
1295                                                 found1 = true;
1296                                         }
1297                                 }
1298                                 if (rin->Dword & DNS_ZONE_REQUEST_CACHE) {
1299                                         if (z->zoneinfo->dwZoneType == DNS_ZONE_TYPE_CACHE) {
1300                                                 found1 = true;
1301                                         }
1302                                 }
1303                                 if (rin->Dword & DNS_ZONE_REQUEST_AUTO) {
1304                                         if (z->zoneinfo->fAutoCreated
1305                                                 || z->partition->dwDpFlags & DNS_DP_AUTOCREATED) {
1306                                                 found1 = true;
1307                                         }
1308                                 }
1309                         } else {
1310                                 found1 = true;
1311                         }
1312
1313                         /* Group 2 */
1314                         found2 = false;
1315                         if (rin->Dword & 0x000000f0) {
1316                                 if (rin->Dword & DNS_ZONE_REQUEST_FORWARD) {
1317                                         if (!(z->zoneinfo->fReverse)) {
1318                                                 found2 = true;
1319                                         }
1320                                 }
1321                                 if (rin->Dword & DNS_ZONE_REQUEST_REVERSE) {
1322                                         if (z->zoneinfo->fReverse) {
1323                                                 found2 = true;
1324                                         }
1325                                 }
1326                                 if (rin->Dword & DNS_ZONE_REQUEST_FORWARDER) {
1327                                         if (z->zoneinfo->dwZoneType == DNS_ZONE_TYPE_FORWARDER) {
1328                                                 found2 = true;
1329                                         }
1330                                 }
1331                                 if (rin->Dword & DNS_ZONE_REQUEST_STUB) {
1332                                         if (z->zoneinfo->dwZoneType == DNS_ZONE_TYPE_STUB) {
1333                                                 found2 = true;
1334                                         }
1335                                 }
1336                         } else {
1337                                 found2 = true;
1338                         }
1339
1340                         /* Group 3 */
1341                         found3 = false;
1342                         if (rin->Dword & 0x00000f00) {
1343                                 if (rin->Dword & DNS_ZONE_REQUEST_DS) {
1344                                         if (z->zoneinfo->Flags & DNS_RPC_ZONE_DSINTEGRATED) {
1345                                                 found3 = true;
1346                                         }
1347                                 }
1348                                 if (rin->Dword & DNS_ZONE_REQUEST_NON_DS) {
1349                                         if (!(z->zoneinfo->Flags & DNS_RPC_ZONE_DSINTEGRATED)) {
1350                                                 found3 = true;
1351                                         }
1352                                 }
1353                                 if (rin->Dword & DNS_ZONE_REQUEST_DOMAIN_DP) {
1354                                         if (!(z->partition->dwDpFlags & DNS_DP_DOMAIN_DEFAULT)) {
1355                                                 found3 = true;
1356                                         }
1357                                 }
1358                                 if (rin->Dword & DNS_ZONE_REQUEST_FOREST_DP) {
1359                                         if (!(z->partition->dwDpFlags & DNS_DP_FOREST_DEFAULT)) {
1360                                                 found3 = true;
1361                                         }
1362                                 }
1363                         } else {
1364                                 found3 = true;
1365                         }
1366
1367                         /* Group 4 */
1368                         if (rin->Dword & 0x0000f000) {
1369                                 found4 = false;
1370                         } else {
1371                                 found4 = true;
1372                         }
1373
1374                         if (found1 && found2 && found3 && found4) {
1375                                 zlist = talloc_realloc(mem_ctx, zlist, struct dnsserver_zone *, zcount+1);
1376                                 zlist[zcount] = z;
1377                                 zcount++;
1378                         }
1379                 }
1380
1381                 if (client_version == DNS_CLIENT_VERSION_W2K) {
1382                         *typeid_out = DNSSRV_TYPEID_ZONE_LIST_W2K;
1383                         rout->ZoneListW2K = talloc_zero(mem_ctx, struct DNS_RPC_ZONE_LIST_W2K);
1384
1385                         if (zcount == 0) {
1386                                 rout->ZoneListW2K->dwZoneCount = 0;
1387                                 rout->ZoneListW2K->ZoneArray = NULL;
1388
1389                                 return WERR_OK;
1390                         }
1391
1392                         rout->ZoneListW2K->ZoneArray = talloc_zero_array(mem_ctx, struct DNS_RPC_ZONE_W2K *, zcount);
1393                         W_ERROR_HAVE_NO_MEMORY_AND_FREE(rout->ZoneListW2K->ZoneArray, zlist);
1394
1395                         for (i=0; i<zcount; i++) {
1396                                 rout->ZoneListW2K->ZoneArray[i] = talloc_zero(mem_ctx, struct DNS_RPC_ZONE_W2K);
1397
1398                                 rout->ZoneListW2K->ZoneArray[i]->pszZoneName = talloc_strdup(mem_ctx, zlist[i]->name);
1399                                 rout->ZoneListW2K->ZoneArray[i]->Flags = zlist[i]->zoneinfo->Flags;
1400                                 rout->ZoneListW2K->ZoneArray[i]->ZoneType = zlist[i]->zoneinfo->dwZoneType;
1401                                 rout->ZoneListW2K->ZoneArray[i]->Version = zlist[i]->zoneinfo->Version;
1402                         }
1403                         rout->ZoneListW2K->dwZoneCount = zcount;
1404
1405                 } else {
1406                         *typeid_out = DNSSRV_TYPEID_ZONE_LIST;
1407                         rout->ZoneList = talloc_zero(mem_ctx, struct DNS_RPC_ZONE_LIST_DOTNET);
1408
1409                         if (zcount == 0) {
1410                                 rout->ZoneList->dwRpcStructureVersion = 1;
1411                                 rout->ZoneList->dwZoneCount = 0;
1412                                 rout->ZoneList->ZoneArray = NULL;
1413
1414                                 return WERR_OK;
1415                         }
1416
1417                         rout->ZoneList->ZoneArray = talloc_zero_array(mem_ctx, struct DNS_RPC_ZONE_DOTNET *, zcount);
1418                         W_ERROR_HAVE_NO_MEMORY_AND_FREE(rout->ZoneList->ZoneArray, zlist);
1419
1420                         for (i=0; i<zcount; i++) {
1421                                 rout->ZoneList->ZoneArray[i] = talloc_zero(mem_ctx, struct DNS_RPC_ZONE_DOTNET);
1422
1423                                 rout->ZoneList->ZoneArray[i]->dwRpcStructureVersion = 1;
1424                                 rout->ZoneList->ZoneArray[i]->pszZoneName = talloc_strdup(mem_ctx, zlist[i]->name);
1425                                 rout->ZoneList->ZoneArray[i]->Flags = zlist[i]->zoneinfo->Flags;
1426                                 rout->ZoneList->ZoneArray[i]->ZoneType = zlist[i]->zoneinfo->dwZoneType;
1427                                 rout->ZoneList->ZoneArray[i]->Version = zlist[i]->zoneinfo->Version;
1428                                 rout->ZoneList->ZoneArray[i]->dwDpFlags = zlist[i]->partition->dwDpFlags;
1429                                 rout->ZoneList->ZoneArray[i]->pszDpFqdn = talloc_strdup(mem_ctx, zlist[i]->partition->pszDpFqdn);
1430                         }
1431                         rout->ZoneList->dwRpcStructureVersion = 1;
1432                         rout->ZoneList->dwZoneCount = zcount;
1433                 }
1434                 talloc_free(zlist);
1435                 return WERR_OK;
1436         } else if (strcasecmp(operation, "EnumZones2") == 0) {
1437                 valid_operation = true;
1438         } else if (strcasecmp(operation, "EnumDirectoryPartitions") == 0) {
1439                 if (typeid_in != DNSSRV_TYPEID_DWORD) {
1440                         return WERR_DNS_ERROR_INVALID_PROPERTY;
1441                 }
1442
1443                 *typeid_out = DNSSRV_TYPEID_DP_LIST;
1444                 rout->DirectoryPartitionList = talloc_zero(mem_ctx, struct DNS_RPC_DP_LIST);
1445
1446                 if (rin->Dword != 0) {
1447                         rout->DirectoryPartitionList->dwDpCount = 0;
1448                         rout->DirectoryPartitionList->DpArray = NULL;
1449                 } else {
1450                         struct DNS_RPC_DP_ENUM **dplist;
1451                         struct dnsserver_partition *p;
1452                         int pcount = 2;
1453
1454                         dplist = talloc_zero_array(mem_ctx, struct DNS_RPC_DP_ENUM *, pcount);
1455                         W_ERROR_HAVE_NO_MEMORY(dplist);
1456
1457                         p = dsstate->partitions;
1458                         for (i=0; i<pcount; i++) {
1459                                 dplist[i] = talloc_zero(dplist, struct DNS_RPC_DP_ENUM);
1460
1461                                 dplist[i]->pszDpFqdn = talloc_strdup(mem_ctx, p->pszDpFqdn);
1462                                 dplist[i]->dwFlags = p->dwDpFlags;
1463                                 dplist[i]->dwZoneCount = p->zones_count;
1464                                 p = p->next;
1465                         }
1466
1467                         rout->DirectoryPartitionList->dwDpCount = pcount;
1468                         rout->DirectoryPartitionList->DpArray = dplist;
1469                 }
1470                 return WERR_OK;
1471         } else if (strcasecmp(operation, "DirectoryPartitionInfo") == 0) {
1472                 struct dnsserver_partition *p;
1473                 struct dnsserver_partition_info *partinfo;
1474                 struct DNS_RPC_DP_INFO *dpinfo = NULL;
1475
1476                 if (typeid_in != DNSSRV_TYPEID_LPSTR) {
1477                         return WERR_DNS_ERROR_INVALID_PROPERTY;
1478                 }
1479
1480                 *typeid_out = DNSSRV_TYPEID_DP_INFO;
1481
1482                 for (p = dsstate->partitions; p; p = p->next) {
1483                         if (strcasecmp(p->pszDpFqdn, rin->String) == 0) {
1484                                 dpinfo = talloc_zero(mem_ctx, struct DNS_RPC_DP_INFO);
1485                                 W_ERROR_HAVE_NO_MEMORY(dpinfo);
1486
1487                                 partinfo = dnsserver_db_partition_info(mem_ctx, dsstate->samdb, p);
1488                                 W_ERROR_HAVE_NO_MEMORY(partinfo);
1489
1490                                 dpinfo->pszDpFqdn = talloc_strdup(dpinfo, p->pszDpFqdn);
1491                                 dpinfo->pszDpDn = talloc_strdup(dpinfo, ldb_dn_get_linearized(p->partition_dn));
1492                                 dpinfo->pszCrDn = talloc_steal(dpinfo, partinfo->pszCrDn);
1493                                 dpinfo->dwFlags = p->dwDpFlags;
1494                                 dpinfo->dwZoneCount = p->zones_count;
1495                                 dpinfo->dwState = partinfo->dwState;
1496                                 dpinfo->dwReplicaCount = partinfo->dwReplicaCount;
1497                                 if (partinfo->dwReplicaCount > 0) {
1498                                         dpinfo->ReplicaArray = talloc_steal(dpinfo,
1499                                                                             partinfo->ReplicaArray);
1500                                 } else {
1501                                         dpinfo->ReplicaArray = NULL;
1502                                 }
1503                                 break;
1504                         }
1505                 }
1506
1507                 if (dpinfo == NULL) {
1508                         return WERR_DNS_ERROR_DP_DOES_NOT_EXIST;
1509                 }
1510
1511                 rout->DirectoryPartition = dpinfo;
1512                 return WERR_OK;
1513         } else if (strcasecmp(operation, "Statistics") == 0) {
1514                 valid_operation = true;
1515         } else if (strcasecmp(operation, "IpValidate") == 0) {
1516                 valid_operation = true;
1517         }
1518
1519         if (valid_operation) {
1520                 DEBUG(0, ("dnsserver: server complex operation '%s' not implemented", operation));
1521                 return WERR_CALL_NOT_IMPLEMENTED;
1522         }
1523
1524         DEBUG(0, ("dnsserver: invalid server complex operation '%s'", operation));
1525         return WERR_DNS_ERROR_INVALID_PROPERTY;
1526 }
1527
1528 /* [MS-DNSP].pdf Section 3.1.1.2 Zone Configuration Information */
1529 static WERROR dnsserver_operate_zone(struct dnsserver_state *dsstate,
1530                                         TALLOC_CTX *mem_ctx,
1531                                         struct dnsserver_zone *z,
1532                                         unsigned int request_filter,
1533                                         const char *operation,
1534                                         const unsigned int client_version,
1535                                         enum DNS_RPC_TYPEID typeid,
1536                                         union DNSSRV_RPC_UNION *r)
1537 {
1538         bool valid_operation = false;
1539
1540         if (strcasecmp(operation, "ResetDwordProperty") == 0) {
1541
1542                 if (typeid != DNSSRV_TYPEID_NAME_AND_PARAM) {
1543                         return WERR_DNS_ERROR_INVALID_PROPERTY;
1544                 }
1545
1546                 return dnsserver_db_do_reset_dword(dsstate->samdb, z,
1547                                                    r->NameAndParam);
1548
1549         } else if (strcasecmp(operation, "ZoneTypeReset") == 0) {
1550                 valid_operation = true;
1551         } else if (strcasecmp(operation, "PauseZone") == 0) {
1552                 valid_operation = true;
1553         } else if (strcasecmp(operation, "ResumeZone") == 0) {
1554                 valid_operation = true;
1555         } else if (strcasecmp(operation, "DeleteZone") == 0) {
1556                 valid_operation = true;
1557         } else if (strcasecmp(operation, "ReloadZone") == 0) {
1558                 valid_operation = true;
1559         } else if (strcasecmp(operation, "RefreshZone") == 0) {
1560                 valid_operation = true;
1561         } else if (strcasecmp(operation, "ExpireZone") == 0) {
1562                 valid_operation = true;
1563         } else if (strcasecmp(operation, "IncrementVersion") == 0) {
1564                 valid_operation = true;
1565         } else if (strcasecmp(operation, "WriteBackFile") == 0) {
1566                 valid_operation = true;
1567         } else if (strcasecmp(operation, "DeleteZoneFromDs") == 0) {
1568                 WERROR status;
1569                 if (z == NULL) {
1570                         return WERR_DNS_ERROR_ZONE_DOES_NOT_EXIST;
1571                 }
1572                 status =  dnsserver_db_delete_zone(dsstate->samdb, z);
1573                 if (W_ERROR_IS_OK(status)) {
1574                         dnsserver_reload_zones(dsstate);
1575                 }
1576                 return status;
1577         } else if (strcasecmp(operation, "UpdateZoneFromDs") == 0) {
1578                 valid_operation = true;
1579         } else if (strcasecmp(operation, "ZoneExport") == 0) {
1580                 valid_operation = true;
1581         } else if (strcasecmp(operation, "ZoneChangeDirectoryPartition") == 0) {
1582                 valid_operation = true;
1583         } else if (strcasecmp(operation, "DeleteNode") == 0) {
1584                 valid_operation = true;
1585         } else if (strcasecmp(operation, "DeleteRecordSet") == 0) {
1586                 valid_operation = true;
1587         } else if (strcasecmp(operation, "ForceAgingOnNode") == 0) {
1588                 valid_operation = true;
1589         } else if (strcasecmp(operation, "DatabaseFile") == 0) {
1590                 valid_operation = true;
1591         } else if (strcasecmp(operation, "MasterServers") == 0) {
1592                 valid_operation = true;
1593         } else if (strcasecmp(operation, "LocalMasterServers") == 0) {
1594                 valid_operation = true;
1595         } else if (strcasecmp(operation, "NotifyServers") == 0) {
1596                 valid_operation = true;
1597         } else if (strcasecmp(operation, "SecondaryServers") == 0) {
1598                 valid_operation = true;
1599         } else if (strcasecmp(operation, "ScavengingServers") == 0) {
1600                 valid_operation = true;
1601         } else if (strcasecmp(operation, "AllowNSRecordsAutoCreation") == 0) {
1602                 valid_operation = true;
1603         } else if (strcasecmp(operation, "BreakOnNameUpdate") == 0) {
1604                 valid_operation = true;
1605         } else if (strcasecmp(operation, "ApplicationDirectoryPartition") == 0) {
1606                 valid_operation = true;
1607         }
1608
1609         if (valid_operation) {
1610                 DEBUG(0, ("dnsserver: zone operation '%s' not implemented", operation));
1611                 return WERR_CALL_NOT_IMPLEMENTED;
1612         }
1613
1614         DEBUG(0, ("dnsserver: invalid zone operation '%s'", operation));
1615         return WERR_DNS_ERROR_INVALID_PROPERTY;
1616 }
1617
1618 static WERROR dnsserver_complex_operate_zone(struct dnsserver_state *dsstate,
1619                                         TALLOC_CTX *mem_ctx,
1620                                         struct dnsserver_zone *z,
1621                                         const char *operation,
1622                                         const unsigned int client_version,
1623                                         enum DNS_RPC_TYPEID typeid_in,
1624                                         union DNSSRV_RPC_UNION *rin,
1625                                         enum DNS_RPC_TYPEID *typeid_out,
1626                                         union DNSSRV_RPC_UNION *rout)
1627 {
1628         if (strcasecmp(operation, "QueryDwordProperty") == 0) {
1629                 if (typeid_in == DNSSRV_TYPEID_LPSTR) {
1630                         return dnsserver_query_zone(dsstate, mem_ctx, z,
1631                                                 rin->String,
1632                                                 client_version,
1633                                                 typeid_out,
1634                                                 rout);
1635
1636                 }
1637         }
1638
1639         DEBUG(0,("dnsserver: Invalid zone operation %s", operation));
1640         return WERR_DNS_ERROR_INVALID_PROPERTY;
1641 }
1642
1643 /* dnsserver enumerate function */
1644
1645 static WERROR dnsserver_enumerate_root_records(struct dnsserver_state *dsstate,
1646                                         TALLOC_CTX *mem_ctx,
1647                                         unsigned int client_version,
1648                                         const char *node_name,
1649                                         enum dns_record_type record_type,
1650                                         unsigned int select_flag,
1651                                         unsigned int *buffer_length,
1652                                         struct DNS_RPC_RECORDS_ARRAY **buffer)
1653 {
1654         TALLOC_CTX *tmp_ctx;
1655         struct dnsserver_zone *z;
1656         const char * const attrs[] = { "name", "dnsRecord", NULL };
1657         struct ldb_result *res;
1658         struct DNS_RPC_RECORDS_ARRAY *recs;
1659         char **add_names;
1660         char *rname;
1661         int add_count;
1662         int i, ret, len;
1663         WERROR status;
1664
1665         tmp_ctx = talloc_new(mem_ctx);
1666         W_ERROR_HAVE_NO_MEMORY(tmp_ctx);
1667
1668         z = dnsserver_find_zone(dsstate->zones, ".");
1669         if (z == NULL) {
1670                 return WERR_DNS_ERROR_NAME_DOES_NOT_EXIST;
1671         }
1672
1673         ret = ldb_search(dsstate->samdb, tmp_ctx, &res, z->zone_dn,
1674                          LDB_SCOPE_ONELEVEL, attrs,
1675                          "(&(objectClass=dnsNode)(name=@)(!(dNSTombstoned=TRUE)))");
1676         if (ret != LDB_SUCCESS) {
1677                 talloc_free(tmp_ctx);
1678                 return WERR_INTERNAL_DB_ERROR;
1679         }
1680         if (res->count == 0) {
1681                 talloc_free(tmp_ctx);
1682                 return WERR_DNS_ERROR_NAME_DOES_NOT_EXIST;
1683         }
1684
1685         recs = talloc_zero(mem_ctx, struct DNS_RPC_RECORDS_ARRAY);
1686         W_ERROR_HAVE_NO_MEMORY_AND_FREE(recs, tmp_ctx);
1687
1688         add_names = NULL;
1689         add_count = 0;
1690
1691         for (i=0; i<res->count; i++) {
1692                 status = dns_fill_records_array(tmp_ctx, NULL, record_type,
1693                                                 select_flag, NULL,
1694                                                 res->msgs[i], 0, recs,
1695                                                 &add_names, &add_count);
1696                 if (!W_ERROR_IS_OK(status)) {
1697                         talloc_free(tmp_ctx);
1698                         return status;
1699                 }
1700         }
1701         talloc_free(res);
1702
1703         /* Add any additional records */
1704         if (select_flag & DNS_RPC_VIEW_ADDITIONAL_DATA) {
1705                 for (i=0; i<add_count; i++) {
1706                         char *encoded_name
1707                                 = ldb_binary_encode_string(tmp_ctx,
1708                                                            add_names[i]);
1709                         ret = ldb_search(dsstate->samdb, tmp_ctx, &res, z->zone_dn,
1710                                          LDB_SCOPE_ONELEVEL, attrs,
1711                                          "(&(objectClass=dnsNode)(name=%s)(!(dNSTombstoned=TRUE)))",
1712                                          encoded_name);
1713                         if (ret != LDB_SUCCESS || res->count == 0) {
1714                                 talloc_free(res);
1715                                 continue;
1716                         }
1717
1718                         len = strlen(add_names[i]);
1719                         if (add_names[i][len-1] == '.') {
1720                                 rname = talloc_strdup(tmp_ctx, add_names[i]);
1721                         } else {
1722                                 rname = talloc_asprintf(tmp_ctx, "%s.", add_names[i]);
1723                         }
1724                         status = dns_fill_records_array(tmp_ctx, NULL, DNS_TYPE_A,
1725                                                         select_flag, rname,
1726                                                         res->msgs[0], 0, recs,
1727                                                         NULL, NULL);
1728                         talloc_free(rname);
1729                         talloc_free(res);
1730                 }
1731         }
1732
1733         talloc_free(tmp_ctx);
1734
1735         *buffer_length = ndr_size_DNS_RPC_RECORDS_ARRAY(recs, 0);
1736         *buffer = recs;
1737
1738         return WERR_OK;
1739 }
1740
1741
1742 static WERROR dnsserver_enumerate_records(struct dnsserver_state *dsstate,
1743                                         TALLOC_CTX *mem_ctx,
1744                                         struct dnsserver_zone *z,
1745                                         unsigned int client_version,
1746                                         const char *node_name,
1747                                         const char *start_child,
1748                                         enum dns_record_type record_type,
1749                                         unsigned int select_flag,
1750                                         const char *filter_start,
1751                                         const char *filter_stop,
1752                                         unsigned int *buffer_length,
1753                                         struct DNS_RPC_RECORDS_ARRAY **buffer)
1754 {
1755         TALLOC_CTX *tmp_ctx;
1756         char *name;
1757         const char * const attrs[] = { "name", "dnsRecord", NULL };
1758         struct ldb_result *res;
1759         struct DNS_RPC_RECORDS_ARRAY *recs;
1760         char **add_names = NULL;
1761         char *rname;
1762         int add_count = 0;
1763         int i, ret, len;
1764         WERROR status;
1765         struct dns_tree *tree, *base, *node;
1766
1767         tmp_ctx = talloc_new(mem_ctx);
1768         W_ERROR_HAVE_NO_MEMORY(tmp_ctx);
1769
1770         name = dns_split_node_name(tmp_ctx, node_name, z->name);
1771         W_ERROR_HAVE_NO_MEMORY_AND_FREE(name, tmp_ctx);
1772
1773         /* search all records under parent tree */
1774         if (strcasecmp(name, z->name) == 0) {
1775                 ret = ldb_search(dsstate->samdb, tmp_ctx, &res, z->zone_dn,
1776                                  LDB_SCOPE_ONELEVEL, attrs,
1777                                  "(&(objectClass=dnsNode)(!(dNSTombstoned=TRUE)))");
1778         } else {
1779                 char *encoded_name
1780                         = ldb_binary_encode_string(tmp_ctx, name);
1781                 ret = ldb_search(dsstate->samdb, tmp_ctx, &res, z->zone_dn,
1782                                  LDB_SCOPE_ONELEVEL, attrs,
1783                                  "(&(objectClass=dnsNode)(|(name=%s)(name=*.%s))(!(dNSTombstoned=TRUE)))",
1784                                  encoded_name, encoded_name);
1785         }
1786         if (ret != LDB_SUCCESS) {
1787                 talloc_free(tmp_ctx);
1788                 return WERR_INTERNAL_DB_ERROR;
1789         }
1790         if (res->count == 0) {
1791                 talloc_free(tmp_ctx);
1792                 return WERR_DNS_ERROR_NAME_DOES_NOT_EXIST;
1793         }
1794
1795         recs = talloc_zero(mem_ctx, struct DNS_RPC_RECORDS_ARRAY);
1796         W_ERROR_HAVE_NO_MEMORY_AND_FREE(recs, tmp_ctx);
1797
1798         /* Sort the names, so that the first record is the parent record */
1799         ldb_qsort(res->msgs, res->count, sizeof(struct ldb_message *), name,
1800                         (ldb_qsort_cmp_fn_t)dns_name_compare);
1801
1802         /* Build a tree of name components from dns name */
1803         if (strcasecmp(name, z->name) == 0) {
1804                 tree = dns_build_tree(tmp_ctx, "@", res);
1805         } else {
1806                 tree = dns_build_tree(tmp_ctx, name, res);
1807         }
1808         W_ERROR_HAVE_NO_MEMORY_AND_FREE(tree, tmp_ctx);
1809
1810         /* Find the parent record in the tree */
1811         base = tree;
1812         while (base->level != -1) {
1813                 base = base->children[0];
1814         }
1815
1816         /* Add the parent record with blank name */
1817         if (!(select_flag & DNS_RPC_VIEW_ONLY_CHILDREN)) {
1818                 status = dns_fill_records_array(tmp_ctx, z, record_type,
1819                                                 select_flag, NULL,
1820                                                 base->data, 0,
1821                                                 recs, &add_names, &add_count);
1822                 if (!W_ERROR_IS_OK(status)) {
1823                         talloc_free(tmp_ctx);
1824                         return status;
1825                 }
1826         }
1827
1828         /* Add all the children records */
1829         if (!(select_flag & DNS_RPC_VIEW_NO_CHILDREN)) {
1830                 for (i=0; i<base->num_children; i++) {
1831                         node = base->children[i];
1832
1833                         status = dns_fill_records_array(tmp_ctx, z, record_type,
1834                                                         select_flag, node->name,
1835                                                         node->data, node->num_children,
1836                                                         recs, &add_names, &add_count);
1837                         if (!W_ERROR_IS_OK(status)) {
1838                                 talloc_free(tmp_ctx);
1839                                 return status;
1840                         }
1841                 }
1842         }
1843
1844         talloc_free(res);
1845         talloc_free(tree);
1846         talloc_free(name);
1847
1848         /* Add any additional records */
1849         if (select_flag & DNS_RPC_VIEW_ADDITIONAL_DATA) {
1850                 for (i=0; i<add_count; i++) {
1851                         struct dnsserver_zone *z2;
1852
1853                         /* Search all the available zones for additional name */
1854                         for (z2 = dsstate->zones; z2; z2 = z2->next) {
1855                                 char *encoded_name;
1856                                 name = dns_split_node_name(tmp_ctx, add_names[i], z2->name);
1857                                 encoded_name
1858                                         = ldb_binary_encode_string(tmp_ctx,
1859                                                                    name);
1860                                 ret = ldb_search(dsstate->samdb, tmp_ctx, &res, z2->zone_dn,
1861                                                 LDB_SCOPE_ONELEVEL, attrs,
1862                                                 "(&(objectClass=dnsNode)(name=%s)(!(dNSTombstoned=TRUE)))",
1863                                                 encoded_name);
1864                                 talloc_free(name);
1865                                 if (ret != LDB_SUCCESS) {
1866                                         continue;
1867                                 }
1868                                 if (res->count == 1) {
1869                                         break;
1870                                 } else {
1871                                         talloc_free(res);
1872                                         continue;
1873                                 }
1874                         }
1875
1876                         len = strlen(add_names[i]);
1877                         if (add_names[i][len-1] == '.') {
1878                                 rname = talloc_strdup(tmp_ctx, add_names[i]);
1879                         } else {
1880                                 rname = talloc_asprintf(tmp_ctx, "%s.", add_names[i]);
1881                         }
1882                         status = dns_fill_records_array(tmp_ctx, NULL, DNS_TYPE_A,
1883                                                         select_flag, rname,
1884                                                         res->msgs[0], 0, recs,
1885                                                         NULL, NULL);
1886                         talloc_free(rname);
1887                         talloc_free(res);
1888                 }
1889         }
1890
1891         *buffer_length = ndr_size_DNS_RPC_RECORDS_ARRAY(recs, 0);
1892         *buffer = recs;
1893
1894         return WERR_OK;
1895 }
1896
1897 /*
1898  * Check str1 + '.' + str2 = name, for example:
1899  * ("dc0", "example.com", "dc0.example.com") = true
1900  */
1901 static bool cname_self_reference(const char* node_name,
1902                                  const char* zone_name,
1903                                  struct DNS_RPC_NAME name) {
1904         size_t node_len, zone_len;
1905
1906         if (node_name == NULL || zone_name == NULL) {
1907                 return false;
1908         }
1909
1910         node_len = strlen(node_name);
1911         zone_len = strlen(zone_name);
1912
1913         if (node_len == 0 ||
1914             zone_len == 0 ||
1915             (name.len != node_len + zone_len + 1)) {
1916                 return false;
1917         }
1918
1919         if (strncmp(node_name, name.str, node_len) == 0 &&
1920             name.str[node_len] == '.' &&
1921             strncmp(zone_name, name.str + node_len + 1, zone_len) == 0) {
1922                 return true;
1923         }
1924
1925         return false;
1926 }
1927
1928 /* dnsserver update function */
1929
1930 static WERROR dnsserver_update_record(struct dnsserver_state *dsstate,
1931                                         TALLOC_CTX *mem_ctx,
1932                                         struct dnsserver_zone *z,
1933                                         unsigned int client_version,
1934                                         const char *node_name,
1935                                         struct DNS_RPC_RECORD_BUF *add_buf,
1936                                         struct DNS_RPC_RECORD_BUF *del_buf)
1937 {
1938         TALLOC_CTX *tmp_ctx;
1939         char *name;
1940         WERROR status;
1941
1942         tmp_ctx = talloc_new(mem_ctx);
1943         W_ERROR_HAVE_NO_MEMORY(tmp_ctx);
1944
1945         /* If node_name is @ or zone name, dns record is @ */
1946         if (strcmp(node_name, "@") == 0 ||
1947             strcmp(node_name, ".") == 0 ||
1948             strcasecmp(node_name, z->name) == 0) {
1949                 name = talloc_strdup(tmp_ctx, "@");
1950         } else {
1951                 name = dns_split_node_name(tmp_ctx, node_name, z->name);
1952         }
1953         W_ERROR_HAVE_NO_MEMORY_AND_FREE(name, tmp_ctx);
1954
1955         /* CNAMEs can't point to themselves */
1956         if (add_buf != NULL && add_buf->rec.wType == DNS_TYPE_CNAME) {
1957                 if (cname_self_reference(node_name, z->name, add_buf->rec.data.name)) {
1958                         return WERR_DNS_ERROR_CNAME_LOOP;
1959                 }
1960         }
1961
1962         if (add_buf != NULL) {
1963                 if (del_buf == NULL) {
1964                         /* Add record */
1965                         status = dnsserver_db_add_record(tmp_ctx, dsstate->samdb,
1966                                                                 z, name,
1967                                                                 &add_buf->rec);
1968                 } else {
1969                         /* Update record */
1970                         status = dnsserver_db_update_record(tmp_ctx, dsstate->samdb,
1971                                                                 z, name,
1972                                                                 &add_buf->rec,
1973                                                                 &del_buf->rec);
1974                 }
1975         } else {
1976                 if (del_buf == NULL) {
1977                         /* Add empty node */
1978                         status = dnsserver_db_add_empty_node(tmp_ctx, dsstate->samdb,
1979                                                                 z, name);
1980                 } else {
1981                         /* Delete record */
1982                         status = dnsserver_db_delete_record(tmp_ctx, dsstate->samdb,
1983                                                                 z, name,
1984                                                                 &del_buf->rec);
1985                 }
1986         }
1987
1988         talloc_free(tmp_ctx);
1989         return status;
1990 }
1991
1992
1993 /* dnsserver interface functions */
1994
1995 static WERROR dcesrv_DnssrvOperation(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct DnssrvOperation *r)
1996 {
1997         struct dnsserver_state *dsstate;
1998         struct dnsserver_zone *z = NULL;
1999         uint32_t request_filter = 0;
2000         WERROR ret;
2001
2002         if ((dsstate = dnsserver_connect(dce_call)) == NULL) {
2003                 return WERR_DNS_ERROR_DS_UNAVAILABLE;
2004         }
2005
2006         if (r->in.dwContext == 0) {
2007                 if (r->in.pszZone != NULL) {
2008                         request_filter = dnsserver_zone_to_request_filter(r->in.pszZone);
2009                 }
2010         } else {
2011                 request_filter = r->in.dwContext;
2012         }
2013
2014         if (r->in.pszZone == NULL) {
2015                 ret = dnsserver_operate_server(dsstate, mem_ctx,
2016                                                 r->in.pszOperation,
2017                                                 DNS_CLIENT_VERSION_W2K,
2018                                                 r->in.dwTypeId,
2019                                                 &r->in.pData);
2020         } else {
2021                 z = dnsserver_find_zone(dsstate->zones, r->in.pszZone);
2022                 if (z == NULL && request_filter == 0) {
2023                         return WERR_DNS_ERROR_ZONE_DOES_NOT_EXIST;
2024                 }
2025
2026                 ret = dnsserver_operate_zone(dsstate, mem_ctx, z,
2027                                                 request_filter,
2028                                                 r->in.pszOperation,
2029                                                 DNS_CLIENT_VERSION_W2K,
2030                                                 r->in.dwTypeId,
2031                                                 &r->in.pData);
2032         }
2033
2034         if (W_ERROR_EQUAL(ret, WERR_CALL_NOT_IMPLEMENTED)) {
2035                 NDR_PRINT_FUNCTION_DEBUG(DnssrvOperation, NDR_IN, r);
2036         }
2037         return ret;
2038 }
2039
2040 static WERROR dcesrv_DnssrvQuery(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct DnssrvQuery *r)
2041 {
2042         struct dnsserver_state *dsstate;
2043         struct dnsserver_zone *z;
2044         WERROR ret;
2045
2046         ZERO_STRUCTP(r->out.pdwTypeId);
2047         ZERO_STRUCTP(r->out.ppData);
2048
2049         if ((dsstate = dnsserver_connect(dce_call)) == NULL) {
2050                 return WERR_DNS_ERROR_DS_UNAVAILABLE;
2051         }
2052
2053         if (r->in.pszZone == NULL) {
2054                 /* FIXME: DNS Server Configuration Access Control List */
2055                 ret = dnsserver_query_server(dsstate, mem_ctx,
2056                                                 r->in.pszOperation,
2057                                                 DNS_CLIENT_VERSION_W2K,
2058                                                 r->out.pdwTypeId,
2059                                                 r->out.ppData);
2060         } else {
2061                 z = dnsserver_find_zone(dsstate->zones, r->in.pszZone);
2062                 if (z == NULL) {
2063                         return WERR_DNS_ERROR_ZONE_DOES_NOT_EXIST;
2064                 }
2065
2066                 ret = dnsserver_query_zone(dsstate, mem_ctx, z,
2067                                                 r->in.pszOperation,
2068                                                 DNS_CLIENT_VERSION_W2K,
2069                                                 r->out.pdwTypeId,
2070                                                 r->out.ppData);
2071         }
2072
2073         if (W_ERROR_EQUAL(ret, WERR_CALL_NOT_IMPLEMENTED)) {
2074                 NDR_PRINT_FUNCTION_DEBUG(DnssrvQuery, NDR_IN, r);
2075         }
2076         return ret;
2077 }
2078
2079 static WERROR dcesrv_DnssrvComplexOperation(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct DnssrvComplexOperation *r)
2080 {
2081         struct dnsserver_state *dsstate;
2082         struct dnsserver_zone *z;
2083         WERROR ret;
2084
2085         ZERO_STRUCTP(r->out.pdwTypeOut);
2086         ZERO_STRUCTP(r->out.ppDataOut);
2087
2088         if ((dsstate = dnsserver_connect(dce_call)) == NULL) {
2089                 return WERR_DNS_ERROR_DS_UNAVAILABLE;
2090         }
2091
2092         if (r->in.pszZone == NULL) {
2093                 /* Server operation */
2094                 ret = dnsserver_complex_operate_server(dsstate, mem_ctx,
2095                                                         r->in.pszOperation,
2096                                                         DNS_CLIENT_VERSION_W2K,
2097                                                         r->in.dwTypeIn,
2098                                                         &r->in.pDataIn,
2099                                                         r->out.pdwTypeOut,
2100                                                         r->out.ppDataOut);
2101         } else {
2102                 z = dnsserver_find_zone(dsstate->zones, r->in.pszZone);
2103                 if (z == NULL) {
2104                         return WERR_DNS_ERROR_ZONE_DOES_NOT_EXIST;
2105                 }
2106
2107                 ret = dnsserver_complex_operate_zone(dsstate, mem_ctx, z,
2108                                                         r->in.pszOperation,
2109                                                         DNS_CLIENT_VERSION_W2K,
2110                                                         r->in.dwTypeIn,
2111                                                         &r->in.pDataIn,
2112                                                         r->out.pdwTypeOut,
2113                                                         r->out.ppDataOut);
2114         }
2115
2116         if (W_ERROR_EQUAL(ret, WERR_CALL_NOT_IMPLEMENTED)) {
2117                 NDR_PRINT_FUNCTION_DEBUG(DnssrvComplexOperation, NDR_IN, r);
2118         }
2119         return ret;
2120 }
2121
2122 static WERROR dcesrv_DnssrvEnumRecords(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct DnssrvEnumRecords *r)
2123 {
2124         struct dnsserver_state *dsstate;
2125         struct dnsserver_zone *z;
2126         WERROR ret;
2127
2128         ZERO_STRUCTP(r->out.pdwBufferLength);
2129         ZERO_STRUCTP(r->out.pBuffer);
2130
2131         if ((dsstate = dnsserver_connect(dce_call)) == NULL) {
2132                 return WERR_DNS_ERROR_DS_UNAVAILABLE;
2133         }
2134
2135         if (r->in.pszZone == NULL) {
2136                 return WERR_DNS_ERROR_NAME_DOES_NOT_EXIST;
2137         }
2138
2139         if (strcasecmp(r->in.pszZone, "..RootHints") == 0) {
2140                 ret = dnsserver_enumerate_root_records(dsstate, mem_ctx,
2141                                         DNS_CLIENT_VERSION_W2K,
2142                                         r->in.pszNodeName,
2143                                         r->in.wRecordType,
2144                                         r->in.fSelectFlag,
2145                                         r->out.pdwBufferLength,
2146                                         r->out.pBuffer);
2147         } else {
2148                 z = dnsserver_find_zone(dsstate->zones, r->in.pszZone);
2149                 if (z == NULL) {
2150                         return WERR_DNS_ERROR_NAME_DOES_NOT_EXIST;
2151                 }
2152
2153                 ret = dnsserver_enumerate_records(dsstate, mem_ctx, z,
2154                                         DNS_CLIENT_VERSION_W2K,
2155                                         r->in.pszNodeName,
2156                                         r->in.pszStartChild,
2157                                         r->in.wRecordType,
2158                                         r->in.fSelectFlag,
2159                                         r->in.pszFilterStart,
2160                                         r->in.pszFilterStop,
2161                                         r->out.pdwBufferLength,
2162                                         r->out.pBuffer);
2163         }
2164
2165         if (W_ERROR_EQUAL(ret, WERR_CALL_NOT_IMPLEMENTED)) {
2166                 NDR_PRINT_FUNCTION_DEBUG(DnssrvEnumRecords, NDR_IN, r);
2167         }
2168         return ret;
2169 }
2170
2171 static WERROR dcesrv_DnssrvUpdateRecord(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct DnssrvUpdateRecord *r)
2172 {
2173         struct dnsserver_state *dsstate;
2174         struct dnsserver_zone *z;
2175         WERROR ret;
2176
2177         if ((dsstate = dnsserver_connect(dce_call)) == NULL) {
2178                 return WERR_DNS_ERROR_DS_UNAVAILABLE;
2179         }
2180
2181         if (r->in.pszZone == NULL) {
2182                 return WERR_DNS_ERROR_NAME_DOES_NOT_EXIST;
2183         }
2184
2185         z = dnsserver_find_zone(dsstate->zones, r->in.pszZone);
2186         if (z == NULL) {
2187                 return WERR_DNS_ERROR_NAME_DOES_NOT_EXIST;
2188         }
2189
2190         ret = dnsserver_update_record(dsstate, mem_ctx, z,
2191                                         DNS_CLIENT_VERSION_W2K,
2192                                         r->in.pszNodeName,
2193                                         r->in.pAddRecord,
2194                                         r->in.pDeleteRecord);
2195
2196         if (W_ERROR_EQUAL(ret, WERR_CALL_NOT_IMPLEMENTED)) {
2197                 NDR_PRINT_FUNCTION_DEBUG(DnssrvUpdateRecord, NDR_IN, r);
2198         }
2199         return ret;
2200 }
2201
2202 static WERROR dcesrv_DnssrvOperation2(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct DnssrvOperation2 *r)
2203 {
2204         struct dnsserver_state *dsstate;
2205         struct dnsserver_zone *z = NULL;
2206         uint32_t request_filter = 0;
2207         WERROR ret;
2208
2209         if ((dsstate = dnsserver_connect(dce_call)) == NULL) {
2210                 return WERR_DNS_ERROR_DS_UNAVAILABLE;
2211         }
2212
2213         if (r->in.dwContext == 0) {
2214                 if (r->in.pszZone != NULL) {
2215                         request_filter = dnsserver_zone_to_request_filter(r->in.pszZone);
2216                 }
2217         } else {
2218                 request_filter = r->in.dwContext;
2219         }
2220
2221         if (r->in.pszZone == NULL) {
2222                 ret = dnsserver_operate_server(dsstate, mem_ctx,
2223                                                 r->in.pszOperation,
2224                                                 r->in.dwClientVersion,
2225                                                 r->in.dwTypeId,
2226                                                 &r->in.pData);
2227         } else {
2228                 z = dnsserver_find_zone(dsstate->zones, r->in.pszZone);
2229                 if (z == NULL && request_filter == 0) {
2230                         return WERR_DNS_ERROR_ZONE_DOES_NOT_EXIST;
2231                 }
2232
2233                 ret = dnsserver_operate_zone(dsstate, mem_ctx, z,
2234                                                 request_filter,
2235                                                 r->in.pszOperation,
2236                                                 r->in.dwClientVersion,
2237                                                 r->in.dwTypeId,
2238                                                 &r->in.pData);
2239         }
2240
2241         if (W_ERROR_EQUAL(ret, WERR_CALL_NOT_IMPLEMENTED)) {
2242                 NDR_PRINT_FUNCTION_DEBUG(DnssrvOperation2, NDR_IN, r);
2243         }
2244         return ret;
2245 }
2246
2247 static WERROR dcesrv_DnssrvQuery2(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct DnssrvQuery2 *r)
2248 {
2249         struct dnsserver_state *dsstate;
2250         struct dnsserver_zone *z;
2251         WERROR ret;
2252
2253         ZERO_STRUCTP(r->out.pdwTypeId);
2254         ZERO_STRUCTP(r->out.ppData);
2255
2256         if ((dsstate = dnsserver_connect(dce_call)) == NULL) {
2257                 return WERR_DNS_ERROR_DS_UNAVAILABLE;
2258         }
2259
2260         if (r->in.pszZone == NULL) {
2261                 /* FIXME: DNS Server Configuration Access Control List */
2262                 ret = dnsserver_query_server(dsstate, mem_ctx,
2263                                                 r->in.pszOperation,
2264                                                 r->in.dwClientVersion,
2265                                                 r->out.pdwTypeId,
2266                                                 r->out.ppData);
2267         } else {
2268                 z = dnsserver_find_zone(dsstate->zones, r->in.pszZone);
2269                 if (z == NULL) {
2270                         return WERR_DNS_ERROR_ZONE_DOES_NOT_EXIST;
2271                 }
2272
2273                 ret = dnsserver_query_zone(dsstate, mem_ctx, z,
2274                                         r->in.pszOperation,
2275                                         r->in.dwClientVersion,
2276                                         r->out.pdwTypeId,
2277                                         r->out.ppData);
2278         }
2279
2280         if (W_ERROR_EQUAL(ret, WERR_CALL_NOT_IMPLEMENTED)) {
2281                 NDR_PRINT_FUNCTION_DEBUG(DnssrvQuery2, NDR_IN, r);
2282         }
2283         return ret;
2284 }
2285
2286 static WERROR dcesrv_DnssrvComplexOperation2(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct DnssrvComplexOperation2 *r)
2287 {
2288         struct dnsserver_state *dsstate;
2289         struct dnsserver_zone *z;
2290         WERROR ret;
2291
2292         ZERO_STRUCTP(r->out.pdwTypeOut);
2293         ZERO_STRUCTP(r->out.ppDataOut);
2294
2295         if ((dsstate = dnsserver_connect(dce_call)) == NULL) {
2296                 return WERR_DNS_ERROR_DS_UNAVAILABLE;
2297         }
2298
2299         if (r->in.pszZone == NULL) {
2300                 /* Server operation */
2301                 ret =  dnsserver_complex_operate_server(dsstate, mem_ctx,
2302                                                         r->in.pszOperation,
2303                                                         r->in.dwClientVersion,
2304                                                         r->in.dwTypeIn,
2305                                                         &r->in.pDataIn,
2306                                                         r->out.pdwTypeOut,
2307                                                         r->out.ppDataOut);
2308         } else {
2309
2310                 z = dnsserver_find_zone(dsstate->zones, r->in.pszZone);
2311                 if (z == NULL) {
2312                         return WERR_DNS_ERROR_ZONE_DOES_NOT_EXIST;
2313                 }
2314
2315                 ret = dnsserver_complex_operate_zone(dsstate, mem_ctx, z,
2316                                                         r->in.pszOperation,
2317                                                         r->in.dwClientVersion,
2318                                                         r->in.dwTypeIn,
2319                                                         &r->in.pDataIn,
2320                                                         r->out.pdwTypeOut,
2321                                                         r->out.ppDataOut);
2322         }
2323
2324         if (W_ERROR_EQUAL(ret, WERR_CALL_NOT_IMPLEMENTED)) {
2325                 NDR_PRINT_FUNCTION_DEBUG(DnssrvComplexOperation2, NDR_IN, r);
2326         }
2327         return ret;
2328 }
2329
2330 static WERROR dcesrv_DnssrvEnumRecords2(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct DnssrvEnumRecords2 *r)
2331 {
2332         struct dnsserver_state *dsstate;
2333         struct dnsserver_zone *z;
2334         WERROR ret;
2335
2336         ZERO_STRUCTP(r->out.pdwBufferLength);
2337         ZERO_STRUCTP(r->out.pBuffer);
2338
2339         if ((dsstate = dnsserver_connect(dce_call)) == NULL) {
2340                 return WERR_DNS_ERROR_DS_UNAVAILABLE;
2341         }
2342
2343         if (r->in.pszZone == NULL) {
2344                 return WERR_DNS_ERROR_NAME_DOES_NOT_EXIST;
2345         }
2346
2347         if (strcasecmp(r->in.pszZone, "..RootHints") == 0) {
2348                 ret =  dnsserver_enumerate_root_records(dsstate, mem_ctx,
2349                                         r->in.dwClientVersion,
2350                                         r->in.pszNodeName,
2351                                         r->in.wRecordType,
2352                                         r->in.fSelectFlag,
2353                                         r->out.pdwBufferLength,
2354                                         r->out.pBuffer);
2355         } else {
2356                 z = dnsserver_find_zone(dsstate->zones, r->in.pszZone);
2357                 if (z == NULL) {
2358                         return WERR_DNS_ERROR_NAME_DOES_NOT_EXIST;
2359                 }
2360
2361                 ret =  dnsserver_enumerate_records(dsstate, mem_ctx, z,
2362                                         r->in.dwClientVersion,
2363                                         r->in.pszNodeName,
2364                                         r->in.pszStartChild,
2365                                         r->in.wRecordType,
2366                                         r->in.fSelectFlag,
2367                                         r->in.pszFilterStart,
2368                                         r->in.pszFilterStop,
2369                                         r->out.pdwBufferLength,
2370                                         r->out.pBuffer);
2371
2372         }
2373
2374         if (W_ERROR_EQUAL(ret, WERR_CALL_NOT_IMPLEMENTED)) {
2375                 NDR_PRINT_FUNCTION_DEBUG(DnssrvEnumRecords2, NDR_IN, r);
2376         }
2377         return ret;
2378 }
2379
2380 static WERROR dcesrv_DnssrvUpdateRecord2(struct dcesrv_call_state *dce_call, TALLOC_CTX *mem_ctx, struct DnssrvUpdateRecord2 *r)
2381 {
2382         struct dnsserver_state *dsstate;
2383         struct dnsserver_zone *z;
2384         WERROR ret;
2385
2386         if ((dsstate = dnsserver_connect(dce_call)) == NULL) {
2387                 return WERR_DNS_ERROR_DS_UNAVAILABLE;
2388         }
2389
2390         if (r->in.pszZone == NULL) {
2391                 return WERR_DNS_ERROR_NAME_DOES_NOT_EXIST;
2392         }
2393
2394         z = dnsserver_find_zone(dsstate->zones, r->in.pszZone);
2395         if (z == NULL) {
2396                 return WERR_DNS_ERROR_NAME_DOES_NOT_EXIST;
2397         }
2398
2399         ret = dnsserver_update_record(dsstate, mem_ctx, z,
2400                                         r->in.dwClientVersion,
2401                                         r->in.pszNodeName,
2402                                         r->in.pAddRecord,
2403                                         r->in.pDeleteRecord);
2404
2405         if (W_ERROR_EQUAL(ret, WERR_CALL_NOT_IMPLEMENTED)) {
2406                 NDR_PRINT_FUNCTION_DEBUG(DnssrvUpdateRecord2, NDR_IN, r);
2407         }
2408         return ret;
2409 }
2410
2411 /* include the generated boilerplate */
2412 #include "librpc/gen_ndr/ndr_dnsserver_s.c"