ed9ee8bb6f257f8af1a8f33ba63f6ee58164cad5
[mat/samba.git] / source3 / rpc_server / lsa / srv_lsa_nt.c
1 /*
2  *  Unix SMB/CIFS implementation.
3  *  RPC Pipe client / server routines
4  *  Copyright (C) Andrew Tridgell              1992-1997,
5  *  Copyright (C) Luke Kenneth Casson Leighton 1996-1997,
6  *  Copyright (C) Paul Ashton                       1997,
7  *  Copyright (C) Jeremy Allison                    2001, 2006.
8  *  Copyright (C) Rafal Szczesniak                  2002,
9  *  Copyright (C) Jim McDonough <jmcd@us.ibm.com>   2002,
10  *  Copyright (C) Simo Sorce                        2003.
11  *  Copyright (C) Gerald (Jerry) Carter             2005.
12  *  Copyright (C) Volker Lendecke                   2005.
13  *  Copyright (C) Guenther Deschner                 2008.
14  *  Copyright (C) Andrew Bartlett                   2010.
15  *
16  *  This program is free software; you can redistribute it and/or modify
17  *  it under the terms of the GNU General Public License as published by
18  *  the Free Software Foundation; either version 3 of the License, or
19  *  (at your option) any later version.
20  *
21  *  This program is distributed in the hope that it will be useful,
22  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
23  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
24  *  GNU General Public License for more details.
25  *
26  *  You should have received a copy of the GNU General Public License
27  *  along with this program; if not, see <http://www.gnu.org/licenses/>.
28  */
29
30 /* This is the implementation of the lsa server code. */
31
32 #include "includes.h"
33 #include "../librpc/gen_ndr/srv_lsa.h"
34 #include "secrets.h"
35 #include "../librpc/gen_ndr/netlogon.h"
36 #include "rpc_client/init_lsa.h"
37 #include "../libcli/security/security.h"
38 #include "../libcli/security/dom_sid.h"
39 #include "../librpc/gen_ndr/drsblobs.h"
40 #include "../librpc/gen_ndr/ndr_drsblobs.h"
41 #include "../lib/crypto/arcfour.h"
42
43 #undef DBGC_CLASS
44 #define DBGC_CLASS DBGC_RPC_SRV
45
46 #define MAX_LOOKUP_SIDS 0x5000 /* 20480 */
47
48 enum lsa_handle_type {
49         LSA_HANDLE_POLICY_TYPE = 1,
50         LSA_HANDLE_ACCOUNT_TYPE = 2,
51         LSA_HANDLE_TRUST_TYPE = 3};
52
53 struct lsa_info {
54         struct dom_sid sid;
55         const char *name;
56         uint32 access;
57         enum lsa_handle_type type;
58         struct security_descriptor *sd;
59 };
60
61 const struct generic_mapping lsa_account_mapping = {
62         LSA_ACCOUNT_READ,
63         LSA_ACCOUNT_WRITE,
64         LSA_ACCOUNT_EXECUTE,
65         LSA_ACCOUNT_ALL_ACCESS
66 };
67
68 const struct generic_mapping lsa_policy_mapping = {
69         LSA_POLICY_READ,
70         LSA_POLICY_WRITE,
71         LSA_POLICY_EXECUTE,
72         LSA_POLICY_ALL_ACCESS
73 };
74
75 const struct generic_mapping lsa_secret_mapping = {
76         LSA_SECRET_READ,
77         LSA_SECRET_WRITE,
78         LSA_SECRET_EXECUTE,
79         LSA_SECRET_ALL_ACCESS
80 };
81
82 const struct generic_mapping lsa_trusted_domain_mapping = {
83         LSA_TRUSTED_DOMAIN_READ,
84         LSA_TRUSTED_DOMAIN_WRITE,
85         LSA_TRUSTED_DOMAIN_EXECUTE,
86         LSA_TRUSTED_DOMAIN_ALL_ACCESS
87 };
88
89 /***************************************************************************
90  init_lsa_ref_domain_list - adds a domain if it's not already in, returns the index.
91 ***************************************************************************/
92
93 static int init_lsa_ref_domain_list(TALLOC_CTX *mem_ctx,
94                                     struct lsa_RefDomainList *ref,
95                                     const char *dom_name,
96                                     struct dom_sid *dom_sid)
97 {
98         int num = 0;
99
100         if (dom_name != NULL) {
101                 for (num = 0; num < ref->count; num++) {
102                         if (dom_sid_equal(dom_sid, ref->domains[num].sid)) {
103                                 return num;
104                         }
105                 }
106         } else {
107                 num = ref->count;
108         }
109
110         if (num >= LSA_REF_DOMAIN_LIST_MULTIPLIER) {
111                 /* index not found, already at maximum domain limit */
112                 return -1;
113         }
114
115         ref->count = num + 1;
116         ref->max_size = LSA_REF_DOMAIN_LIST_MULTIPLIER;
117
118         ref->domains = TALLOC_REALLOC_ARRAY(mem_ctx, ref->domains,
119                                             struct lsa_DomainInfo, ref->count);
120         if (!ref->domains) {
121                 return -1;
122         }
123
124         ZERO_STRUCT(ref->domains[num]);
125
126         init_lsa_StringLarge(&ref->domains[num].name, dom_name);
127         ref->domains[num].sid = dom_sid_dup(mem_ctx, dom_sid);
128         if (!ref->domains[num].sid) {
129                 return -1;
130         }
131
132         return num;
133 }
134
135
136 /***************************************************************************
137  initialize a lsa_DomainInfo structure.
138  ***************************************************************************/
139
140 static void init_dom_query_3(struct lsa_DomainInfo *r,
141                              const char *name,
142                              struct dom_sid *sid)
143 {
144         init_lsa_StringLarge(&r->name, name);
145         r->sid = sid;
146 }
147
148 /***************************************************************************
149  initialize a lsa_DomainInfo structure.
150  ***************************************************************************/
151
152 static void init_dom_query_5(struct lsa_DomainInfo *r,
153                              const char *name,
154                              struct dom_sid *sid)
155 {
156         init_lsa_StringLarge(&r->name, name);
157         r->sid = sid;
158 }
159
160 /***************************************************************************
161  lookup_lsa_rids. Must be called as root for lookup_name to work.
162  ***************************************************************************/
163
164 static NTSTATUS lookup_lsa_rids(TALLOC_CTX *mem_ctx,
165                                 struct lsa_RefDomainList *ref,
166                                 struct lsa_TranslatedSid *prid,
167                                 uint32_t num_entries,
168                                 struct lsa_String *name,
169                                 int flags,
170                                 uint32_t *pmapped_count)
171 {
172         uint32 mapped_count, i;
173
174         SMB_ASSERT(num_entries <= MAX_LOOKUP_SIDS);
175
176         mapped_count = 0;
177         *pmapped_count = 0;
178
179         for (i = 0; i < num_entries; i++) {
180                 struct dom_sid sid;
181                 uint32 rid;
182                 int dom_idx;
183                 const char *full_name;
184                 const char *domain;
185                 enum lsa_SidType type = SID_NAME_UNKNOWN;
186
187                 /* Split name into domain and user component */
188
189                 /* follow w2k8 behavior and return the builtin domain when no
190                  * input has been passed in */
191
192                 if (name[i].string) {
193                         full_name = name[i].string;
194                 } else {
195                         full_name = "BUILTIN";
196                 }
197
198                 DEBUG(5, ("lookup_lsa_rids: looking up name %s\n", full_name));
199
200                 /* We can ignore the result of lookup_name, it will not touch
201                    "type" if it's not successful */
202
203                 lookup_name(mem_ctx, full_name, flags, &domain, NULL,
204                             &sid, &type);
205
206                 switch (type) {
207                 case SID_NAME_USER:
208                 case SID_NAME_DOM_GRP:
209                 case SID_NAME_DOMAIN:
210                 case SID_NAME_ALIAS:
211                 case SID_NAME_WKN_GRP:
212                         DEBUG(5, ("init_lsa_rids: %s found\n", full_name));
213                         /* Leave these unchanged */
214                         break;
215                 default:
216                         /* Don't hand out anything but the list above */
217                         DEBUG(5, ("init_lsa_rids: %s not found\n", full_name));
218                         type = SID_NAME_UNKNOWN;
219                         break;
220                 }
221
222                 rid = 0;
223                 dom_idx = -1;
224
225                 if (type != SID_NAME_UNKNOWN) {
226                         if (type == SID_NAME_DOMAIN) {
227                                 rid = (uint32_t)-1;
228                         } else {
229                                 sid_split_rid(&sid, &rid);
230                         }
231                         dom_idx = init_lsa_ref_domain_list(mem_ctx, ref, domain, &sid);
232                         mapped_count++;
233                 }
234
235                 prid[i].sid_type        = type;
236                 prid[i].rid             = rid;
237                 prid[i].sid_index       = dom_idx;
238         }
239
240         *pmapped_count = mapped_count;
241         return NT_STATUS_OK;
242 }
243
244 /***************************************************************************
245  lookup_lsa_sids. Must be called as root for lookup_name to work.
246  ***************************************************************************/
247
248 static NTSTATUS lookup_lsa_sids(TALLOC_CTX *mem_ctx,
249                                 struct lsa_RefDomainList *ref,
250                                 struct lsa_TranslatedSid3 *trans_sids,
251                                 uint32_t num_entries,
252                                 struct lsa_String *name,
253                                 int flags,
254                                 uint32 *pmapped_count)
255 {
256         uint32 mapped_count, i;
257
258         SMB_ASSERT(num_entries <= MAX_LOOKUP_SIDS);
259
260         mapped_count = 0;
261         *pmapped_count = 0;
262
263         for (i = 0; i < num_entries; i++) {
264                 struct dom_sid sid;
265                 uint32 rid;
266                 int dom_idx;
267                 const char *full_name;
268                 const char *domain;
269                 enum lsa_SidType type = SID_NAME_UNKNOWN;
270
271                 ZERO_STRUCT(sid);
272
273                 /* Split name into domain and user component */
274
275                 full_name = name[i].string;
276                 if (full_name == NULL) {
277                         return NT_STATUS_NO_MEMORY;
278                 }
279
280                 DEBUG(5, ("init_lsa_sids: looking up name %s\n", full_name));
281
282                 /* We can ignore the result of lookup_name, it will not touch
283                    "type" if it's not successful */
284
285                 lookup_name(mem_ctx, full_name, flags, &domain, NULL,
286                             &sid, &type);
287
288                 switch (type) {
289                 case SID_NAME_USER:
290                 case SID_NAME_DOM_GRP:
291                 case SID_NAME_DOMAIN:
292                 case SID_NAME_ALIAS:
293                 case SID_NAME_WKN_GRP:
294                         DEBUG(5, ("init_lsa_sids: %s found\n", full_name));
295                         /* Leave these unchanged */
296                         break;
297                 default:
298                         /* Don't hand out anything but the list above */
299                         DEBUG(5, ("init_lsa_sids: %s not found\n", full_name));
300                         type = SID_NAME_UNKNOWN;
301                         break;
302                 }
303
304                 rid = 0;
305                 dom_idx = -1;
306
307                 if (type != SID_NAME_UNKNOWN) {
308                         struct dom_sid domain_sid;
309                         sid_copy(&domain_sid, &sid);
310                         sid_split_rid(&domain_sid, &rid);
311                         dom_idx = init_lsa_ref_domain_list(mem_ctx, ref, domain, &domain_sid);
312                         mapped_count++;
313                 }
314
315                 /* Initialize the lsa_TranslatedSid3 return. */
316                 trans_sids[i].sid_type = type;
317                 trans_sids[i].sid = dom_sid_dup(mem_ctx, &sid);
318                 trans_sids[i].sid_index = dom_idx;
319         }
320
321         *pmapped_count = mapped_count;
322         return NT_STATUS_OK;
323 }
324
325 static NTSTATUS make_lsa_object_sd(TALLOC_CTX *mem_ctx, struct security_descriptor **sd, size_t *sd_size,
326                                         const struct generic_mapping *map,
327                                         struct dom_sid *sid, uint32_t sid_access)
328 {
329         struct dom_sid adm_sid;
330         struct security_ace ace[5];
331         size_t i = 0;
332
333         struct security_acl *psa = NULL;
334
335         /* READ|EXECUTE access for Everyone */
336
337         init_sec_ace(&ace[i++], &global_sid_World, SEC_ACE_TYPE_ACCESS_ALLOWED,
338                         map->generic_execute | map->generic_read, 0);
339
340         /* Add Full Access 'BUILTIN\Administrators' and 'BUILTIN\Account Operators */
341
342         init_sec_ace(&ace[i++], &global_sid_Builtin_Administrators,
343                         SEC_ACE_TYPE_ACCESS_ALLOWED, map->generic_all, 0);
344         init_sec_ace(&ace[i++], &global_sid_Builtin_Account_Operators,
345                         SEC_ACE_TYPE_ACCESS_ALLOWED, map->generic_all, 0);
346
347         /* Add Full Access for Domain Admins */
348         sid_compose(&adm_sid, get_global_sam_sid(), DOMAIN_RID_ADMINS);
349         init_sec_ace(&ace[i++], &adm_sid, SEC_ACE_TYPE_ACCESS_ALLOWED,
350                         map->generic_all, 0);
351
352         /* If we have a sid, give it some special access */
353
354         if (sid) {
355                 init_sec_ace(&ace[i++], sid, SEC_ACE_TYPE_ACCESS_ALLOWED,
356                         sid_access, 0);
357         }
358
359         if((psa = make_sec_acl(mem_ctx, NT4_ACL_REVISION, i, ace)) == NULL)
360                 return NT_STATUS_NO_MEMORY;
361
362         if((*sd = make_sec_desc(mem_ctx, SECURITY_DESCRIPTOR_REVISION_1,
363                                 SEC_DESC_SELF_RELATIVE, &adm_sid, NULL, NULL,
364                                 psa, sd_size)) == NULL)
365                 return NT_STATUS_NO_MEMORY;
366
367         return NT_STATUS_OK;
368 }
369
370 /***************************************************************************
371  ***************************************************************************/
372
373 static NTSTATUS create_lsa_policy_handle(TALLOC_CTX *mem_ctx,
374                                          struct pipes_struct *p,
375                                          enum lsa_handle_type type,
376                                          uint32_t acc_granted,
377                                          struct dom_sid *sid,
378                                          const char *name,
379                                          const struct security_descriptor *sd,
380                                          struct policy_handle *handle)
381 {
382         struct lsa_info *info;
383
384         ZERO_STRUCTP(handle);
385
386         info = talloc_zero(mem_ctx, struct lsa_info);
387         if (!info) {
388                 return NT_STATUS_NO_MEMORY;
389         }
390
391         info->type = type;
392         info->access = acc_granted;
393
394         if (sid) {
395                 sid_copy(&info->sid, sid);
396         }
397
398         info->name = talloc_strdup(info, name);
399
400         if (sd) {
401                 info->sd = dup_sec_desc(info, sd);
402                 if (!info->sd) {
403                         talloc_free(info);
404                         return NT_STATUS_NO_MEMORY;
405                 }
406         }
407
408         if (!create_policy_hnd(p, handle, info)) {
409                 talloc_free(info);
410                 ZERO_STRUCTP(handle);
411                 return NT_STATUS_NO_MEMORY;
412         }
413
414         return NT_STATUS_OK;
415 }
416
417 /***************************************************************************
418  _lsa_OpenPolicy2
419  ***************************************************************************/
420
421 NTSTATUS _lsa_OpenPolicy2(struct pipes_struct *p,
422                           struct lsa_OpenPolicy2 *r)
423 {
424         struct security_descriptor *psd = NULL;
425         size_t sd_size;
426         uint32 des_access = r->in.access_mask;
427         uint32 acc_granted;
428         NTSTATUS status;
429
430         /* Work out max allowed. */
431         map_max_allowed_access(p->server_info->security_token,
432                                &p->server_info->utok,
433                                &des_access);
434
435         /* map the generic bits to the lsa policy ones */
436         se_map_generic(&des_access, &lsa_policy_mapping);
437
438         /* get the generic lsa policy SD until we store it */
439         status = make_lsa_object_sd(p->mem_ctx, &psd, &sd_size, &lsa_policy_mapping,
440                         NULL, 0);
441         if (!NT_STATUS_IS_OK(status)) {
442                 return status;
443         }
444
445         status = access_check_object(psd, p->server_info->security_token,
446                                      SEC_PRIV_INVALID, SEC_PRIV_INVALID, 0, des_access,
447                                      &acc_granted, "_lsa_OpenPolicy2" );
448         if (!NT_STATUS_IS_OK(status)) {
449                 return status;
450         }
451
452         status = create_lsa_policy_handle(p->mem_ctx, p,
453                                           LSA_HANDLE_POLICY_TYPE,
454                                           acc_granted,
455                                           get_global_sam_sid(),
456                                           NULL,
457                                           psd,
458                                           r->out.handle);
459         if (!NT_STATUS_IS_OK(status)) {
460                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
461         }
462
463         return NT_STATUS_OK;
464 }
465
466 /***************************************************************************
467  _lsa_OpenPolicy
468  ***************************************************************************/
469
470 NTSTATUS _lsa_OpenPolicy(struct pipes_struct *p,
471                          struct lsa_OpenPolicy *r)
472 {
473         struct lsa_OpenPolicy2 o;
474
475         o.in.system_name        = NULL; /* should be ignored */
476         o.in.attr               = r->in.attr;
477         o.in.access_mask        = r->in.access_mask;
478
479         o.out.handle            = r->out.handle;
480
481         return _lsa_OpenPolicy2(p, &o);
482 }
483
484 /***************************************************************************
485  _lsa_EnumTrustDom - this needs fixing to do more than return NULL ! JRA.
486  ufff, done :)  mimir
487  ***************************************************************************/
488
489 NTSTATUS _lsa_EnumTrustDom(struct pipes_struct *p,
490                            struct lsa_EnumTrustDom *r)
491 {
492         struct lsa_info *info;
493         uint32_t count;
494         struct trustdom_info **domains;
495         struct lsa_DomainInfo *entries;
496         int i;
497         NTSTATUS nt_status;
498
499         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
500                 return NT_STATUS_INVALID_HANDLE;
501
502         if (info->type != LSA_HANDLE_POLICY_TYPE) {
503                 return NT_STATUS_INVALID_HANDLE;
504         }
505
506         /* check if the user has enough rights */
507         if (!(info->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
508                 return NT_STATUS_ACCESS_DENIED;
509
510         become_root();
511         nt_status = pdb_enum_trusteddoms(p->mem_ctx, &count, &domains);
512         unbecome_root();
513
514         if (!NT_STATUS_IS_OK(nt_status)) {
515                 return nt_status;
516         }
517
518         entries = TALLOC_ZERO_ARRAY(p->mem_ctx, struct lsa_DomainInfo, count);
519         if (!entries) {
520                 return NT_STATUS_NO_MEMORY;
521         }
522
523         for (i=0; i<count; i++) {
524                 init_lsa_StringLarge(&entries[i].name, domains[i]->name);
525                 entries[i].sid = &domains[i]->sid;
526         }
527
528         if (*r->in.resume_handle >= count) {
529                 *r->out.resume_handle = -1;
530                 TALLOC_FREE(entries);
531                 return NT_STATUS_NO_MORE_ENTRIES;
532         }
533
534         /* return the rest, limit by max_size. Note that we
535            use the w2k3 element size value of 60 */
536         r->out.domains->count = count - *r->in.resume_handle;
537         r->out.domains->count = MIN(r->out.domains->count,
538                                  1+(r->in.max_size/LSA_ENUM_TRUST_DOMAIN_MULTIPLIER));
539
540         r->out.domains->domains = entries + *r->in.resume_handle;
541
542         if (r->out.domains->count < count - *r->in.resume_handle) {
543                 *r->out.resume_handle = *r->in.resume_handle + r->out.domains->count;
544                 return STATUS_MORE_ENTRIES;
545         }
546
547         /* according to MS-LSAD 3.1.4.7.8 output resume handle MUST
548          * always be larger than the previous input resume handle, in
549          * particular when hitting the last query it is vital to set the
550          * resume handle correctly to avoid infinite client loops, as
551          * seen e.g. with Windows XP SP3 when resume handle is 0 and
552          * status is NT_STATUS_OK - gd */
553
554         *r->out.resume_handle = (uint32_t)-1;
555
556         return NT_STATUS_OK;
557 }
558
559 #define LSA_AUDIT_NUM_CATEGORIES_NT4    7
560 #define LSA_AUDIT_NUM_CATEGORIES_WIN2K  9
561 #define LSA_AUDIT_NUM_CATEGORIES LSA_AUDIT_NUM_CATEGORIES_NT4
562
563 /***************************************************************************
564  _lsa_QueryInfoPolicy
565  ***************************************************************************/
566
567 NTSTATUS _lsa_QueryInfoPolicy(struct pipes_struct *p,
568                               struct lsa_QueryInfoPolicy *r)
569 {
570         NTSTATUS status = NT_STATUS_OK;
571         struct lsa_info *handle;
572         struct dom_sid domain_sid;
573         const char *name;
574         struct dom_sid *sid = NULL;
575         union lsa_PolicyInformation *info = NULL;
576         uint32_t acc_required = 0;
577
578         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle))
579                 return NT_STATUS_INVALID_HANDLE;
580
581         if (handle->type != LSA_HANDLE_POLICY_TYPE) {
582                 return NT_STATUS_INVALID_HANDLE;
583         }
584
585         switch (r->in.level) {
586         case LSA_POLICY_INFO_AUDIT_LOG:
587         case LSA_POLICY_INFO_AUDIT_EVENTS:
588                 acc_required = LSA_POLICY_VIEW_AUDIT_INFORMATION;
589                 break;
590         case LSA_POLICY_INFO_DOMAIN:
591                 acc_required = LSA_POLICY_VIEW_LOCAL_INFORMATION;
592                 break;
593         case LSA_POLICY_INFO_PD:
594                 acc_required = LSA_POLICY_GET_PRIVATE_INFORMATION;
595                 break;
596         case LSA_POLICY_INFO_ACCOUNT_DOMAIN:
597                 acc_required = LSA_POLICY_VIEW_LOCAL_INFORMATION;
598                 break;
599         case LSA_POLICY_INFO_ROLE:
600         case LSA_POLICY_INFO_REPLICA:
601                 acc_required = LSA_POLICY_VIEW_LOCAL_INFORMATION;
602                 break;
603         case LSA_POLICY_INFO_QUOTA:
604                 acc_required = LSA_POLICY_VIEW_LOCAL_INFORMATION;
605                 break;
606         case LSA_POLICY_INFO_MOD:
607         case LSA_POLICY_INFO_AUDIT_FULL_SET:
608                 /* according to MS-LSAD 3.1.4.4.3 */
609                 return NT_STATUS_INVALID_PARAMETER;
610         case LSA_POLICY_INFO_AUDIT_FULL_QUERY:
611                 acc_required = LSA_POLICY_VIEW_AUDIT_INFORMATION;
612                 break;
613         case LSA_POLICY_INFO_DNS:
614         case LSA_POLICY_INFO_DNS_INT:
615         case LSA_POLICY_INFO_L_ACCOUNT_DOMAIN:
616                 acc_required = LSA_POLICY_VIEW_LOCAL_INFORMATION;
617                 break;
618         default:
619                 break;
620         }
621
622         if (!(handle->access & acc_required)) {
623                 /* return NT_STATUS_ACCESS_DENIED; */
624         }
625
626         info = TALLOC_ZERO_P(p->mem_ctx, union lsa_PolicyInformation);
627         if (!info) {
628                 return NT_STATUS_NO_MEMORY;
629         }
630
631         switch (r->in.level) {
632         /* according to MS-LSAD 3.1.4.4.3 */
633         case LSA_POLICY_INFO_MOD:
634         case LSA_POLICY_INFO_AUDIT_FULL_SET:
635         case LSA_POLICY_INFO_AUDIT_FULL_QUERY:
636                 return NT_STATUS_INVALID_PARAMETER;
637         case LSA_POLICY_INFO_AUDIT_LOG:
638                 info->audit_log.percent_full            = 0;
639                 info->audit_log.maximum_log_size        = 0;
640                 info->audit_log.retention_time          = 0;
641                 info->audit_log.shutdown_in_progress    = 0;
642                 info->audit_log.time_to_shutdown        = 0;
643                 info->audit_log.next_audit_record       = 0;
644                 status = NT_STATUS_OK;
645                 break;
646         case LSA_POLICY_INFO_PD:
647                 info->pd.name.string                    = NULL;
648                 status = NT_STATUS_OK;
649                 break;
650         case LSA_POLICY_INFO_REPLICA:
651                 info->replica.source.string             = NULL;
652                 info->replica.account.string            = NULL;
653                 status = NT_STATUS_OK;
654                 break;
655         case LSA_POLICY_INFO_QUOTA:
656                 info->quota.paged_pool                  = 0;
657                 info->quota.non_paged_pool              = 0;
658                 info->quota.min_wss                     = 0;
659                 info->quota.max_wss                     = 0;
660                 info->quota.pagefile                    = 0;
661                 info->quota.unknown                     = 0;
662                 status = NT_STATUS_OK;
663                 break;
664         case LSA_POLICY_INFO_AUDIT_EVENTS:
665                 {
666
667                 uint32 policy_def = LSA_AUDIT_POLICY_ALL;
668
669                 /* check if the user has enough rights */
670                 if (!(handle->access & LSA_POLICY_VIEW_AUDIT_INFORMATION)) {
671                         DEBUG(10,("_lsa_QueryInfoPolicy: insufficient access rights\n"));
672                         return NT_STATUS_ACCESS_DENIED;
673                 }
674
675                 /* fake info: We audit everything. ;) */
676
677                 info->audit_events.auditing_mode = true;
678                 info->audit_events.count = LSA_AUDIT_NUM_CATEGORIES;
679                 info->audit_events.settings = TALLOC_ZERO_ARRAY(p->mem_ctx,
680                                                                 enum lsa_PolicyAuditPolicy,
681                                                                 info->audit_events.count);
682                 if (!info->audit_events.settings) {
683                         return NT_STATUS_NO_MEMORY;
684                 }
685
686                 info->audit_events.settings[LSA_AUDIT_CATEGORY_ACCOUNT_MANAGEMENT] = policy_def;
687                 info->audit_events.settings[LSA_AUDIT_CATEGORY_FILE_AND_OBJECT_ACCESS] = policy_def;
688                 info->audit_events.settings[LSA_AUDIT_CATEGORY_LOGON] = policy_def;
689                 info->audit_events.settings[LSA_AUDIT_CATEGORY_PROCCESS_TRACKING] = policy_def;
690                 info->audit_events.settings[LSA_AUDIT_CATEGORY_SECURITY_POLICY_CHANGES] = policy_def;
691                 info->audit_events.settings[LSA_AUDIT_CATEGORY_SYSTEM] = policy_def;
692                 info->audit_events.settings[LSA_AUDIT_CATEGORY_USE_OF_USER_RIGHTS] = policy_def;
693
694                 break;
695                 }
696         case LSA_POLICY_INFO_DOMAIN:
697                 /* check if the user has enough rights */
698                 if (!(handle->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
699                         return NT_STATUS_ACCESS_DENIED;
700
701                 /* Request PolicyPrimaryDomainInformation. */
702                 switch (lp_server_role()) {
703                         case ROLE_DOMAIN_PDC:
704                         case ROLE_DOMAIN_BDC:
705                                 name = get_global_sam_name();
706                                 sid = dom_sid_dup(p->mem_ctx, get_global_sam_sid());
707                                 if (!sid) {
708                                         return NT_STATUS_NO_MEMORY;
709                                 }
710                                 break;
711                         case ROLE_DOMAIN_MEMBER:
712                                 name = lp_workgroup();
713                                 /* We need to return the Domain SID here. */
714                                 if (secrets_fetch_domain_sid(lp_workgroup(), &domain_sid)) {
715                                         sid = dom_sid_dup(p->mem_ctx, &domain_sid);
716                                         if (!sid) {
717                                                 return NT_STATUS_NO_MEMORY;
718                                         }
719                                 } else {
720                                         return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
721                                 }
722                                 break;
723                         case ROLE_STANDALONE:
724                                 name = lp_workgroup();
725                                 sid = NULL;
726                                 break;
727                         default:
728                                 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
729                 }
730                 init_dom_query_3(&info->domain, name, sid);
731                 break;
732         case LSA_POLICY_INFO_ACCOUNT_DOMAIN:
733                 /* check if the user has enough rights */
734                 if (!(handle->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
735                         return NT_STATUS_ACCESS_DENIED;
736
737                 /* Request PolicyAccountDomainInformation. */
738                 name = get_global_sam_name();
739                 sid = get_global_sam_sid();
740
741                 init_dom_query_5(&info->account_domain, name, sid);
742                 break;
743         case LSA_POLICY_INFO_ROLE:
744                 /* check if the user has enough rights */
745                 if (!(handle->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
746                         return NT_STATUS_ACCESS_DENIED;
747
748                 switch (lp_server_role()) {
749                         case ROLE_DOMAIN_BDC:
750                                 /*
751                                  * only a BDC is a backup controller
752                                  * of the domain, it controls.
753                                  */
754                                 info->role.role = LSA_ROLE_BACKUP;
755                                 break;
756                         default:
757                                 /*
758                                  * any other role is a primary
759                                  * of the domain, it controls.
760                                  */
761                                 info->role.role = LSA_ROLE_PRIMARY;
762                                 break;
763                 }
764                 break;
765         case LSA_POLICY_INFO_DNS:
766         case LSA_POLICY_INFO_DNS_INT: {
767                 struct pdb_domain_info *dominfo;
768
769                 if ((pdb_capabilities() & PDB_CAP_ADS) == 0) {
770                         DEBUG(10, ("Not replying to LSA_POLICY_INFO_DNS "
771                                    "without ADS passdb backend\n"));
772                         status = NT_STATUS_INVALID_INFO_CLASS;
773                         break;
774                 }
775
776                 dominfo = pdb_get_domain_info(info);
777                 if (dominfo == NULL) {
778                         status = NT_STATUS_NO_MEMORY;
779                         break;
780                 }
781
782                 init_lsa_StringLarge(&info->dns.name,
783                                      dominfo->name);
784                 init_lsa_StringLarge(&info->dns.dns_domain,
785                                      dominfo->dns_domain);
786                 init_lsa_StringLarge(&info->dns.dns_forest,
787                                      dominfo->dns_forest);
788                 info->dns.domain_guid = dominfo->guid;
789                 info->dns.sid = &dominfo->sid;
790                 break;
791         }
792         default:
793                 DEBUG(0,("_lsa_QueryInfoPolicy: unknown info level in Lsa Query: %d\n",
794                         r->in.level));
795                 status = NT_STATUS_INVALID_INFO_CLASS;
796                 break;
797         }
798
799         *r->out.info = info;
800
801         return status;
802 }
803
804 /***************************************************************************
805  _lsa_QueryInfoPolicy2
806  ***************************************************************************/
807
808 NTSTATUS _lsa_QueryInfoPolicy2(struct pipes_struct *p,
809                                struct lsa_QueryInfoPolicy2 *r2)
810 {
811         struct lsa_QueryInfoPolicy r;
812
813         if ((pdb_capabilities() & PDB_CAP_ADS) == 0) {
814                 p->rng_fault_state = True;
815                 return NT_STATUS_NOT_IMPLEMENTED;
816         }
817
818         ZERO_STRUCT(r);
819         r.in.handle = r2->in.handle;
820         r.in.level = r2->in.level;
821         r.out.info = r2->out.info;
822
823         return _lsa_QueryInfoPolicy(p, &r);
824 }
825
826 /***************************************************************************
827  _lsa_lookup_sids_internal
828  ***************************************************************************/
829
830 static NTSTATUS _lsa_lookup_sids_internal(struct pipes_struct *p,
831                                           TALLOC_CTX *mem_ctx,
832                                           uint16_t level,                       /* input */
833                                           int num_sids,                         /* input */
834                                           struct lsa_SidPtr *sid,               /* input */
835                                           struct lsa_RefDomainList **pp_ref,    /* input/output */
836                                           struct lsa_TranslatedName2 **pp_names,/* input/output */
837                                           uint32_t *pp_mapped_count)            /* input/output */
838 {
839         NTSTATUS status;
840         int i;
841         const struct dom_sid **sids = NULL;
842         struct lsa_RefDomainList *ref = NULL;
843         uint32 mapped_count = 0;
844         struct lsa_dom_info *dom_infos = NULL;
845         struct lsa_name_info *name_infos = NULL;
846         struct lsa_TranslatedName2 *names = NULL;
847
848         *pp_mapped_count = 0;
849         *pp_names = NULL;
850         *pp_ref = NULL;
851
852         if (num_sids == 0) {
853                 return NT_STATUS_OK;
854         }
855
856         sids = TALLOC_ARRAY(p->mem_ctx, const struct dom_sid *, num_sids);
857         ref = TALLOC_ZERO_P(p->mem_ctx, struct lsa_RefDomainList);
858
859         if (sids == NULL || ref == NULL) {
860                 return NT_STATUS_NO_MEMORY;
861         }
862
863         for (i=0; i<num_sids; i++) {
864                 sids[i] = sid[i].sid;
865         }
866
867         status = lookup_sids(p->mem_ctx, num_sids, sids, level,
868                                   &dom_infos, &name_infos);
869
870         if (!NT_STATUS_IS_OK(status)) {
871                 return status;
872         }
873
874         names = TALLOC_ARRAY(p->mem_ctx, struct lsa_TranslatedName2, num_sids);
875         if (names == NULL) {
876                 return NT_STATUS_NO_MEMORY;
877         }
878
879         for (i=0; i<LSA_REF_DOMAIN_LIST_MULTIPLIER; i++) {
880
881                 if (!dom_infos[i].valid) {
882                         break;
883                 }
884
885                 if (init_lsa_ref_domain_list(mem_ctx, ref,
886                                              dom_infos[i].name,
887                                              &dom_infos[i].sid) != i) {
888                         DEBUG(0, ("Domain %s mentioned twice??\n",
889                                   dom_infos[i].name));
890                         return NT_STATUS_INTERNAL_ERROR;
891                 }
892         }
893
894         for (i=0; i<num_sids; i++) {
895                 struct lsa_name_info *name = &name_infos[i];
896
897                 if (name->type == SID_NAME_UNKNOWN) {
898                         fstring tmp;
899                         name->dom_idx = -1;
900                         /* Unknown sids should return the string
901                          * representation of the SID. Windows 2003 behaves
902                          * rather erratic here, in many cases it returns the
903                          * RID as 8 bytes hex, in others it returns the full
904                          * SID. We (Jerry/VL) could not figure out which the
905                          * hard cases are, so leave it with the SID.  */
906                         name->name = talloc_asprintf(p->mem_ctx, "%s",
907                                                      sid_to_fstring(tmp,
908                                                                     sids[i]));
909                         if (name->name == NULL) {
910                                 return NT_STATUS_NO_MEMORY;
911                         }
912                 } else {
913                         mapped_count += 1;
914                 }
915
916                 names[i].sid_type       = name->type;
917                 names[i].name.string    = name->name;
918                 names[i].sid_index      = name->dom_idx;
919                 names[i].unknown        = 0;
920         }
921
922         status = NT_STATUS_NONE_MAPPED;
923         if (mapped_count > 0) {
924                 status = (mapped_count < num_sids) ?
925                         STATUS_SOME_UNMAPPED : NT_STATUS_OK;
926         }
927
928         DEBUG(10, ("num_sids %d, mapped_count %d, status %s\n",
929                    num_sids, mapped_count, nt_errstr(status)));
930
931         *pp_mapped_count = mapped_count;
932         *pp_names = names;
933         *pp_ref = ref;
934
935         return status;
936 }
937
938 /***************************************************************************
939  _lsa_LookupSids
940  ***************************************************************************/
941
942 NTSTATUS _lsa_LookupSids(struct pipes_struct *p,
943                          struct lsa_LookupSids *r)
944 {
945         NTSTATUS status;
946         struct lsa_info *handle;
947         int num_sids = r->in.sids->num_sids;
948         uint32 mapped_count = 0;
949         struct lsa_RefDomainList *domains = NULL;
950         struct lsa_TranslatedName *names_out = NULL;
951         struct lsa_TranslatedName2 *names = NULL;
952         int i;
953
954         if ((r->in.level < 1) || (r->in.level > 6)) {
955                 return NT_STATUS_INVALID_PARAMETER;
956         }
957
958         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle)) {
959                 return NT_STATUS_INVALID_HANDLE;
960         }
961
962         if (handle->type != LSA_HANDLE_POLICY_TYPE) {
963                 return NT_STATUS_INVALID_HANDLE;
964         }
965
966         /* check if the user has enough rights */
967         if (!(handle->access & LSA_POLICY_LOOKUP_NAMES)) {
968                 return NT_STATUS_ACCESS_DENIED;
969         }
970
971         if (num_sids >  MAX_LOOKUP_SIDS) {
972                 DEBUG(5,("_lsa_LookupSids: limit of %d exceeded, requested %d\n",
973                          MAX_LOOKUP_SIDS, num_sids));
974                 return NT_STATUS_NONE_MAPPED;
975         }
976
977         status = _lsa_lookup_sids_internal(p,
978                                            p->mem_ctx,
979                                            r->in.level,
980                                            num_sids,
981                                            r->in.sids->sids,
982                                            &domains,
983                                            &names,
984                                            &mapped_count);
985
986         /* Only return here when there is a real error.
987            NT_STATUS_NONE_MAPPED is a special case as it indicates that none of
988            the requested sids could be resolved. Older versions of XP (pre SP3)
989            rely that we return with the string representations of those SIDs in
990            that case. If we don't, XP crashes - Guenther
991            */
992
993         if (NT_STATUS_IS_ERR(status) &&
994             !NT_STATUS_EQUAL(status, NT_STATUS_NONE_MAPPED)) {
995                 return status;
996         }
997
998         /* Convert from lsa_TranslatedName2 to lsa_TranslatedName */
999         names_out = TALLOC_ARRAY(p->mem_ctx, struct lsa_TranslatedName,
1000                                  num_sids);
1001         if (!names_out) {
1002                 return NT_STATUS_NO_MEMORY;
1003         }
1004
1005         for (i=0; i<num_sids; i++) {
1006                 names_out[i].sid_type = names[i].sid_type;
1007                 names_out[i].name = names[i].name;
1008                 names_out[i].sid_index = names[i].sid_index;
1009         }
1010
1011         *r->out.domains = domains;
1012         r->out.names->count = num_sids;
1013         r->out.names->names = names_out;
1014         *r->out.count = mapped_count;
1015
1016         return status;
1017 }
1018
1019 /***************************************************************************
1020  _lsa_LookupSids2
1021  ***************************************************************************/
1022
1023 NTSTATUS _lsa_LookupSids2(struct pipes_struct *p,
1024                           struct lsa_LookupSids2 *r)
1025 {
1026         NTSTATUS status;
1027         struct lsa_info *handle;
1028         int num_sids = r->in.sids->num_sids;
1029         uint32 mapped_count = 0;
1030         struct lsa_RefDomainList *domains = NULL;
1031         struct lsa_TranslatedName2 *names = NULL;
1032         bool check_policy = true;
1033
1034         switch (p->opnum) {
1035                 case NDR_LSA_LOOKUPSIDS3:
1036                         check_policy = false;
1037                         break;
1038                 case NDR_LSA_LOOKUPSIDS2:
1039                 default:
1040                         check_policy = true;
1041         }
1042
1043         if ((r->in.level < 1) || (r->in.level > 6)) {
1044                 return NT_STATUS_INVALID_PARAMETER;
1045         }
1046
1047         if (check_policy) {
1048                 if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle)) {
1049                         return NT_STATUS_INVALID_HANDLE;
1050                 }
1051
1052                 if (handle->type != LSA_HANDLE_POLICY_TYPE) {
1053                         return NT_STATUS_INVALID_HANDLE;
1054                 }
1055
1056                 /* check if the user has enough rights */
1057                 if (!(handle->access & LSA_POLICY_LOOKUP_NAMES)) {
1058                         return NT_STATUS_ACCESS_DENIED;
1059                 }
1060         }
1061
1062         if (num_sids >  MAX_LOOKUP_SIDS) {
1063                 DEBUG(5,("_lsa_LookupSids2: limit of %d exceeded, requested %d\n",
1064                          MAX_LOOKUP_SIDS, num_sids));
1065                 return NT_STATUS_NONE_MAPPED;
1066         }
1067
1068         status = _lsa_lookup_sids_internal(p,
1069                                            p->mem_ctx,
1070                                            r->in.level,
1071                                            num_sids,
1072                                            r->in.sids->sids,
1073                                            &domains,
1074                                            &names,
1075                                            &mapped_count);
1076
1077         *r->out.domains = domains;
1078         r->out.names->count = num_sids;
1079         r->out.names->names = names;
1080         *r->out.count = mapped_count;
1081
1082         return status;
1083 }
1084
1085 /***************************************************************************
1086  _lsa_LookupSids3
1087  ***************************************************************************/
1088
1089 NTSTATUS _lsa_LookupSids3(struct pipes_struct *p,
1090                           struct lsa_LookupSids3 *r)
1091 {
1092         struct lsa_LookupSids2 q;
1093
1094         /* No policy handle on this call. Restrict to crypto connections. */
1095         if (p->auth.auth_type != DCERPC_AUTH_TYPE_SCHANNEL) {
1096                 DEBUG(0,("_lsa_LookupSids3: client %s not using schannel for netlogon\n",
1097                         get_remote_machine_name() ));
1098                 return NT_STATUS_INVALID_PARAMETER;
1099         }
1100
1101         q.in.handle             = NULL;
1102         q.in.sids               = r->in.sids;
1103         q.in.level              = r->in.level;
1104         q.in.lookup_options     = r->in.lookup_options;
1105         q.in.client_revision    = r->in.client_revision;
1106         q.in.names              = r->in.names;
1107         q.in.count              = r->in.count;
1108
1109         q.out.domains           = r->out.domains;
1110         q.out.names             = r->out.names;
1111         q.out.count             = r->out.count;
1112
1113         return _lsa_LookupSids2(p, &q);
1114 }
1115
1116 /***************************************************************************
1117  ***************************************************************************/
1118
1119 static int lsa_lookup_level_to_flags(enum lsa_LookupNamesLevel level)
1120 {
1121         int flags;
1122
1123         switch (level) {
1124                 case LSA_LOOKUP_NAMES_ALL: /* 1 */
1125                         flags = LOOKUP_NAME_ALL;
1126                         break;
1127                 case LSA_LOOKUP_NAMES_DOMAINS_ONLY: /* 2 */
1128                         flags = LOOKUP_NAME_DOMAIN|LOOKUP_NAME_REMOTE|LOOKUP_NAME_ISOLATED;
1129                         break;
1130                 case LSA_LOOKUP_NAMES_PRIMARY_DOMAIN_ONLY: /* 3 */
1131                         flags = LOOKUP_NAME_DOMAIN|LOOKUP_NAME_ISOLATED;
1132                         break;
1133                 case LSA_LOOKUP_NAMES_UPLEVEL_TRUSTS_ONLY: /* 4 */
1134                 case LSA_LOOKUP_NAMES_FOREST_TRUSTS_ONLY: /* 5 */
1135                 case LSA_LOOKUP_NAMES_UPLEVEL_TRUSTS_ONLY2: /* 6 */
1136                 case LSA_LOOKUP_NAMES_RODC_REFERRAL_TO_FULL_DC: /* 7 */
1137                 default:
1138                         flags = LOOKUP_NAME_NONE;
1139                         break;
1140         }
1141
1142         return flags;
1143 }
1144
1145 /***************************************************************************
1146  _lsa_LookupNames
1147  ***************************************************************************/
1148
1149 NTSTATUS _lsa_LookupNames(struct pipes_struct *p,
1150                           struct lsa_LookupNames *r)
1151 {
1152         NTSTATUS status = NT_STATUS_NONE_MAPPED;
1153         struct lsa_info *handle;
1154         struct lsa_String *names = r->in.names;
1155         uint32 num_entries = r->in.num_names;
1156         struct lsa_RefDomainList *domains = NULL;
1157         struct lsa_TranslatedSid *rids = NULL;
1158         uint32 mapped_count = 0;
1159         int flags = 0;
1160
1161         if (num_entries >  MAX_LOOKUP_SIDS) {
1162                 num_entries = MAX_LOOKUP_SIDS;
1163                 DEBUG(5,("_lsa_LookupNames: truncating name lookup list to %d\n",
1164                         num_entries));
1165         }
1166
1167         flags = lsa_lookup_level_to_flags(r->in.level);
1168
1169         domains = TALLOC_ZERO_P(p->mem_ctx, struct lsa_RefDomainList);
1170         if (!domains) {
1171                 return NT_STATUS_NO_MEMORY;
1172         }
1173
1174         if (num_entries) {
1175                 rids = TALLOC_ZERO_ARRAY(p->mem_ctx, struct lsa_TranslatedSid,
1176                                          num_entries);
1177                 if (!rids) {
1178                         return NT_STATUS_NO_MEMORY;
1179                 }
1180         } else {
1181                 rids = NULL;
1182         }
1183
1184         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle)) {
1185                 status = NT_STATUS_INVALID_HANDLE;
1186                 goto done;
1187         }
1188
1189         if (handle->type != LSA_HANDLE_POLICY_TYPE) {
1190                 return NT_STATUS_INVALID_HANDLE;
1191         }
1192
1193         /* check if the user has enough rights */
1194         if (!(handle->access & LSA_POLICY_LOOKUP_NAMES)) {
1195                 status = NT_STATUS_ACCESS_DENIED;
1196                 goto done;
1197         }
1198
1199         /* set up the LSA Lookup RIDs response */
1200         become_root(); /* lookup_name can require root privs */
1201         status = lookup_lsa_rids(p->mem_ctx, domains, rids, num_entries,
1202                                  names, flags, &mapped_count);
1203         unbecome_root();
1204
1205 done:
1206
1207         if (NT_STATUS_IS_OK(status) && (num_entries != 0) ) {
1208                 if (mapped_count == 0) {
1209                         status = NT_STATUS_NONE_MAPPED;
1210                 } else if (mapped_count != num_entries) {
1211                         status = STATUS_SOME_UNMAPPED;
1212                 }
1213         }
1214
1215         *r->out.count = mapped_count;
1216         *r->out.domains = domains;
1217         r->out.sids->sids = rids;
1218         r->out.sids->count = num_entries;
1219
1220         return status;
1221 }
1222
1223 /***************************************************************************
1224  _lsa_LookupNames2
1225  ***************************************************************************/
1226
1227 NTSTATUS _lsa_LookupNames2(struct pipes_struct *p,
1228                            struct lsa_LookupNames2 *r)
1229 {
1230         NTSTATUS status;
1231         struct lsa_LookupNames q;
1232         struct lsa_TransSidArray2 *sid_array2 = r->in.sids;
1233         struct lsa_TransSidArray *sid_array = NULL;
1234         uint32_t i;
1235
1236         sid_array = TALLOC_ZERO_P(p->mem_ctx, struct lsa_TransSidArray);
1237         if (!sid_array) {
1238                 return NT_STATUS_NO_MEMORY;
1239         }
1240
1241         q.in.handle             = r->in.handle;
1242         q.in.num_names          = r->in.num_names;
1243         q.in.names              = r->in.names;
1244         q.in.level              = r->in.level;
1245         q.in.sids               = sid_array;
1246         q.in.count              = r->in.count;
1247         /* we do not know what this is for */
1248         /*                      = r->in.unknown1; */
1249         /*                      = r->in.unknown2; */
1250
1251         q.out.domains           = r->out.domains;
1252         q.out.sids              = sid_array;
1253         q.out.count             = r->out.count;
1254
1255         status = _lsa_LookupNames(p, &q);
1256
1257         sid_array2->count = sid_array->count;
1258         sid_array2->sids = TALLOC_ARRAY(p->mem_ctx, struct lsa_TranslatedSid2, sid_array->count);
1259         if (!sid_array2->sids) {
1260                 return NT_STATUS_NO_MEMORY;
1261         }
1262
1263         for (i=0; i<sid_array->count; i++) {
1264                 sid_array2->sids[i].sid_type  = sid_array->sids[i].sid_type;
1265                 sid_array2->sids[i].rid       = sid_array->sids[i].rid;
1266                 sid_array2->sids[i].sid_index = sid_array->sids[i].sid_index;
1267                 sid_array2->sids[i].unknown   = 0;
1268         }
1269
1270         r->out.sids = sid_array2;
1271
1272         return status;
1273 }
1274
1275 /***************************************************************************
1276  _lsa_LookupNames3
1277  ***************************************************************************/
1278
1279 NTSTATUS _lsa_LookupNames3(struct pipes_struct *p,
1280                            struct lsa_LookupNames3 *r)
1281 {
1282         NTSTATUS status;
1283         struct lsa_info *handle;
1284         struct lsa_String *names = r->in.names;
1285         uint32 num_entries = r->in.num_names;
1286         struct lsa_RefDomainList *domains = NULL;
1287         struct lsa_TranslatedSid3 *trans_sids = NULL;
1288         uint32 mapped_count = 0;
1289         int flags = 0;
1290         bool check_policy = true;
1291
1292         switch (p->opnum) {
1293                 case NDR_LSA_LOOKUPNAMES4:
1294                         check_policy = false;
1295                         break;
1296                 case NDR_LSA_LOOKUPNAMES3:
1297                 default:
1298                         check_policy = true;
1299         }
1300
1301         if (num_entries >  MAX_LOOKUP_SIDS) {
1302                 num_entries = MAX_LOOKUP_SIDS;
1303                 DEBUG(5,("_lsa_LookupNames3: truncating name lookup list to %d\n", num_entries));
1304         }
1305
1306         /* Probably the lookup_level is some sort of bitmask. */
1307         if (r->in.level == 1) {
1308                 flags = LOOKUP_NAME_ALL;
1309         }
1310
1311         domains = TALLOC_ZERO_P(p->mem_ctx, struct lsa_RefDomainList);
1312         if (!domains) {
1313                 return NT_STATUS_NO_MEMORY;
1314         }
1315
1316         if (num_entries) {
1317                 trans_sids = TALLOC_ZERO_ARRAY(p->mem_ctx, struct lsa_TranslatedSid3,
1318                                                num_entries);
1319                 if (!trans_sids) {
1320                         return NT_STATUS_NO_MEMORY;
1321                 }
1322         } else {
1323                 trans_sids = NULL;
1324         }
1325
1326         if (check_policy) {
1327
1328                 if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle)) {
1329                         status = NT_STATUS_INVALID_HANDLE;
1330                         goto done;
1331                 }
1332
1333                 if (handle->type != LSA_HANDLE_POLICY_TYPE) {
1334                         return NT_STATUS_INVALID_HANDLE;
1335                 }
1336
1337                 /* check if the user has enough rights */
1338                 if (!(handle->access & LSA_POLICY_LOOKUP_NAMES)) {
1339                         status = NT_STATUS_ACCESS_DENIED;
1340                         goto done;
1341                 }
1342         }
1343
1344         /* set up the LSA Lookup SIDs response */
1345         become_root(); /* lookup_name can require root privs */
1346         status = lookup_lsa_sids(p->mem_ctx, domains, trans_sids, num_entries,
1347                                  names, flags, &mapped_count);
1348         unbecome_root();
1349
1350 done:
1351
1352         if (NT_STATUS_IS_OK(status)) {
1353                 if (mapped_count == 0) {
1354                         status = NT_STATUS_NONE_MAPPED;
1355                 } else if (mapped_count != num_entries) {
1356                         status = STATUS_SOME_UNMAPPED;
1357                 }
1358         }
1359
1360         *r->out.count = mapped_count;
1361         *r->out.domains = domains;
1362         r->out.sids->sids = trans_sids;
1363         r->out.sids->count = num_entries;
1364
1365         return status;
1366 }
1367
1368 /***************************************************************************
1369  _lsa_LookupNames4
1370  ***************************************************************************/
1371
1372 NTSTATUS _lsa_LookupNames4(struct pipes_struct *p,
1373                            struct lsa_LookupNames4 *r)
1374 {
1375         struct lsa_LookupNames3 q;
1376
1377         /* No policy handle on this call. Restrict to crypto connections. */
1378         if (p->auth.auth_type != DCERPC_AUTH_TYPE_SCHANNEL) {
1379                 DEBUG(0,("_lsa_lookup_names4: client %s not using schannel for netlogon\n",
1380                         get_remote_machine_name() ));
1381                 return NT_STATUS_INVALID_PARAMETER;
1382         }
1383
1384         q.in.handle             = NULL;
1385         q.in.num_names          = r->in.num_names;
1386         q.in.names              = r->in.names;
1387         q.in.level              = r->in.level;
1388         q.in.lookup_options     = r->in.lookup_options;
1389         q.in.client_revision    = r->in.client_revision;
1390         q.in.sids               = r->in.sids;
1391         q.in.count              = r->in.count;
1392
1393         q.out.domains           = r->out.domains;
1394         q.out.sids              = r->out.sids;
1395         q.out.count             = r->out.count;
1396
1397         return _lsa_LookupNames3(p, &q);
1398 }
1399
1400 /***************************************************************************
1401  _lsa_close. Also weird - needs to check if lsa handle is correct. JRA.
1402  ***************************************************************************/
1403
1404 NTSTATUS _lsa_Close(struct pipes_struct *p, struct lsa_Close *r)
1405 {
1406         if (!find_policy_by_hnd(p, r->in.handle, NULL)) {
1407                 return NT_STATUS_INVALID_HANDLE;
1408         }
1409
1410         close_policy_hnd(p, r->in.handle);
1411         ZERO_STRUCTP(r->out.handle);
1412         return NT_STATUS_OK;
1413 }
1414
1415 /***************************************************************************
1416  ***************************************************************************/
1417
1418 static NTSTATUS lsa_lookup_trusted_domain_by_sid(TALLOC_CTX *mem_ctx,
1419                                                  const struct dom_sid *sid,
1420                                                  struct trustdom_info **info)
1421 {
1422         NTSTATUS status;
1423         uint32_t num_domains = 0;
1424         struct trustdom_info **domains = NULL;
1425         int i;
1426
1427         status = pdb_enum_trusteddoms(mem_ctx, &num_domains, &domains);
1428         if (!NT_STATUS_IS_OK(status)) {
1429                 return status;
1430         }
1431
1432         for (i=0; i < num_domains; i++) {
1433                 if (dom_sid_equal(&domains[i]->sid, sid)) {
1434                         break;
1435                 }
1436         }
1437
1438         if (i == num_domains) {
1439                 return NT_STATUS_INVALID_PARAMETER;
1440         }
1441
1442         *info = domains[i];
1443
1444         return NT_STATUS_OK;
1445 }
1446
1447 /***************************************************************************
1448  ***************************************************************************/
1449
1450 static NTSTATUS lsa_lookup_trusted_domain_by_name(TALLOC_CTX *mem_ctx,
1451                                                   const char *netbios_domain_name,
1452                                                   struct trustdom_info **info_p)
1453 {
1454         NTSTATUS status;
1455         struct trustdom_info *info;
1456         struct pdb_trusted_domain *td;
1457
1458         status = pdb_get_trusted_domain(mem_ctx, netbios_domain_name, &td);
1459         if (!NT_STATUS_IS_OK(status)) {
1460                 return status;
1461         }
1462
1463         info = talloc(mem_ctx, struct trustdom_info);
1464         if (!info) {
1465                 return NT_STATUS_NO_MEMORY;
1466         }
1467
1468         info->name      = talloc_strdup(info, netbios_domain_name);
1469         NT_STATUS_HAVE_NO_MEMORY(info->name);
1470
1471         sid_copy(&info->sid, &td->security_identifier);
1472
1473         *info_p = info;
1474
1475         return NT_STATUS_OK;
1476 }
1477
1478 /***************************************************************************
1479  ***************************************************************************/
1480
1481 NTSTATUS _lsa_OpenSecret(struct pipes_struct *p, struct lsa_OpenSecret *r)
1482 {
1483         return NT_STATUS_OBJECT_NAME_NOT_FOUND;
1484 }
1485
1486 /***************************************************************************
1487  _lsa_OpenTrustedDomain_base
1488  ***************************************************************************/
1489
1490 static NTSTATUS _lsa_OpenTrustedDomain_base(struct pipes_struct *p,
1491                                             uint32_t access_mask,
1492                                             struct trustdom_info *info,
1493                                             struct policy_handle *handle)
1494 {
1495         struct security_descriptor *psd = NULL;
1496         size_t sd_size;
1497         uint32_t acc_granted;
1498         NTSTATUS status;
1499
1500         /* des_access is for the account here, not the policy
1501          * handle - so don't check against policy handle. */
1502
1503         /* Work out max allowed. */
1504         map_max_allowed_access(p->server_info->security_token,
1505                                &p->server_info->utok,
1506                                &access_mask);
1507
1508         /* map the generic bits to the lsa account ones */
1509         se_map_generic(&access_mask, &lsa_account_mapping);
1510
1511         /* get the generic lsa account SD until we store it */
1512         status = make_lsa_object_sd(p->mem_ctx, &psd, &sd_size,
1513                                     &lsa_trusted_domain_mapping,
1514                                     NULL, 0);
1515         if (!NT_STATUS_IS_OK(status)) {
1516                 return status;
1517         }
1518
1519         status = access_check_object(psd, p->server_info->security_token,
1520                                      SEC_PRIV_INVALID, SEC_PRIV_INVALID, 0,
1521                                      access_mask, &acc_granted,
1522                                      "_lsa_OpenTrustedDomain");
1523         if (!NT_STATUS_IS_OK(status)) {
1524                 return status;
1525         }
1526
1527         status = create_lsa_policy_handle(p->mem_ctx, p,
1528                                           LSA_HANDLE_TRUST_TYPE,
1529                                           acc_granted,
1530                                           &info->sid,
1531                                           info->name,
1532                                           psd,
1533                                           handle);
1534         if (!NT_STATUS_IS_OK(status)) {
1535                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
1536         }
1537
1538         return NT_STATUS_OK;
1539 }
1540
1541 /***************************************************************************
1542  _lsa_OpenTrustedDomain
1543  ***************************************************************************/
1544
1545 NTSTATUS _lsa_OpenTrustedDomain(struct pipes_struct *p,
1546                                 struct lsa_OpenTrustedDomain *r)
1547 {
1548         struct lsa_info *handle = NULL;
1549         struct trustdom_info *info;
1550         NTSTATUS status;
1551
1552         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle)) {
1553                 return NT_STATUS_INVALID_HANDLE;
1554         }
1555
1556         if (handle->type != LSA_HANDLE_POLICY_TYPE) {
1557                 return NT_STATUS_INVALID_HANDLE;
1558         }
1559
1560         status = lsa_lookup_trusted_domain_by_sid(p->mem_ctx,
1561                                                   r->in.sid,
1562                                                   &info);
1563         if (!NT_STATUS_IS_OK(status)) {
1564                 return status;
1565         }
1566
1567         return _lsa_OpenTrustedDomain_base(p, r->in.access_mask, info,
1568                                            r->out.trustdom_handle);
1569 }
1570
1571 /***************************************************************************
1572  _lsa_OpenTrustedDomainByName
1573  ***************************************************************************/
1574
1575 NTSTATUS _lsa_OpenTrustedDomainByName(struct pipes_struct *p,
1576                                       struct lsa_OpenTrustedDomainByName *r)
1577 {
1578         struct lsa_info *handle = NULL;
1579         struct trustdom_info *info;
1580         NTSTATUS status;
1581
1582         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle)) {
1583                 return NT_STATUS_INVALID_HANDLE;
1584         }
1585
1586         if (handle->type != LSA_HANDLE_POLICY_TYPE) {
1587                 return NT_STATUS_INVALID_HANDLE;
1588         }
1589
1590         status = lsa_lookup_trusted_domain_by_name(p->mem_ctx,
1591                                                    r->in.name.string,
1592                                                    &info);
1593         if (!NT_STATUS_IS_OK(status)) {
1594                 return status;
1595         }
1596
1597         return _lsa_OpenTrustedDomain_base(p, r->in.access_mask, info,
1598                                            r->out.trustdom_handle);
1599 }
1600
1601 /***************************************************************************
1602  _lsa_CreateTrustedDomainEx2
1603  ***************************************************************************/
1604
1605 NTSTATUS _lsa_CreateTrustedDomainEx2(struct pipes_struct *p,
1606                                      struct lsa_CreateTrustedDomainEx2 *r)
1607 {
1608         struct lsa_info *policy;
1609         NTSTATUS status;
1610         uint32_t acc_granted;
1611         struct security_descriptor *psd;
1612         size_t sd_size;
1613         struct pdb_trusted_domain td;
1614         struct trustDomainPasswords auth_struct;
1615         enum ndr_err_code ndr_err;
1616         DATA_BLOB auth_blob;
1617
1618         if (!IS_DC) {
1619                 return NT_STATUS_NOT_SUPPORTED;
1620         }
1621
1622         if (!find_policy_by_hnd(p, r->in.policy_handle, (void **)(void *)&policy)) {
1623                 return NT_STATUS_INVALID_HANDLE;
1624         }
1625
1626         if (!(policy->access & LSA_POLICY_TRUST_ADMIN)) {
1627                 return NT_STATUS_ACCESS_DENIED;
1628         }
1629
1630         if (p->server_info->utok.uid != sec_initial_uid() &&
1631             !nt_token_check_domain_rid(p->server_info->security_token, DOMAIN_RID_ADMINS)) {
1632                 return NT_STATUS_ACCESS_DENIED;
1633         }
1634
1635         /* Work out max allowed. */
1636         map_max_allowed_access(p->server_info->security_token,
1637                                &p->server_info->utok,
1638                                &r->in.access_mask);
1639
1640         /* map the generic bits to the lsa policy ones */
1641         se_map_generic(&r->in.access_mask, &lsa_account_mapping);
1642
1643         status = make_lsa_object_sd(p->mem_ctx, &psd, &sd_size,
1644                                     &lsa_trusted_domain_mapping,
1645                                     NULL, 0);
1646         if (!NT_STATUS_IS_OK(status)) {
1647                 return status;
1648         }
1649
1650         status = access_check_object(psd, p->server_info->security_token,
1651                                      SEC_PRIV_INVALID, SEC_PRIV_INVALID, 0,
1652                                      r->in.access_mask, &acc_granted,
1653                                      "_lsa_CreateTrustedDomainEx2");
1654         if (!NT_STATUS_IS_OK(status)) {
1655                 return status;
1656         }
1657
1658         ZERO_STRUCT(td);
1659
1660         td.domain_name = talloc_strdup(p->mem_ctx,
1661                                        r->in.info->domain_name.string);
1662         if (td.domain_name == NULL) {
1663                 return NT_STATUS_NO_MEMORY;
1664         }
1665         td.netbios_name = talloc_strdup(p->mem_ctx,
1666                                         r->in.info->netbios_name.string);
1667         if (td.netbios_name == NULL) {
1668                 return NT_STATUS_NO_MEMORY;
1669         }
1670         sid_copy(&td.security_identifier, r->in.info->sid);
1671         td.trust_direction = r->in.info->trust_direction;
1672         td.trust_type = r->in.info->trust_type;
1673         td.trust_attributes = r->in.info->trust_attributes;
1674
1675         if (r->in.auth_info->auth_blob.size != 0) {
1676                 auth_blob.length = r->in.auth_info->auth_blob.size;
1677                 auth_blob.data = r->in.auth_info->auth_blob.data;
1678
1679                 arcfour_crypt_blob(auth_blob.data, auth_blob.length,
1680                                    &p->server_info->user_session_key);
1681
1682                 ndr_err = ndr_pull_struct_blob(&auth_blob, p->mem_ctx,
1683                                                &auth_struct,
1684                                                (ndr_pull_flags_fn_t) ndr_pull_trustDomainPasswords);
1685                 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
1686                         return NT_STATUS_UNSUCCESSFUL;
1687                 }
1688
1689                 ndr_err = ndr_push_struct_blob(&td.trust_auth_incoming, p->mem_ctx,
1690                                                &auth_struct.incoming,
1691                                                (ndr_push_flags_fn_t) ndr_push_trustAuthInOutBlob);
1692                 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
1693                         return NT_STATUS_UNSUCCESSFUL;
1694                 }
1695
1696                 ndr_err = ndr_push_struct_blob(&td.trust_auth_outgoing, p->mem_ctx,
1697                                                &auth_struct.outgoing,
1698                                                (ndr_push_flags_fn_t) ndr_push_trustAuthInOutBlob);
1699                 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
1700                         return NT_STATUS_UNSUCCESSFUL;
1701                 }
1702         } else {
1703                 td.trust_auth_incoming.data = NULL;
1704                 td.trust_auth_incoming.length = 0;
1705                 td.trust_auth_outgoing.data = NULL;
1706                 td.trust_auth_outgoing.length = 0;
1707         }
1708
1709         status = pdb_set_trusted_domain(r->in.info->domain_name.string, &td);
1710         if (!NT_STATUS_IS_OK(status)) {
1711                 return status;
1712         }
1713
1714         status = create_lsa_policy_handle(p->mem_ctx, p,
1715                                           LSA_HANDLE_TRUST_TYPE,
1716                                           acc_granted,
1717                                           r->in.info->sid,
1718                                           r->in.info->netbios_name.string,
1719                                           psd,
1720                                           r->out.trustdom_handle);
1721         if (!NT_STATUS_IS_OK(status)) {
1722                 pdb_del_trusteddom_pw(r->in.info->netbios_name.string);
1723                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
1724         }
1725
1726         return NT_STATUS_OK;
1727 }
1728
1729 /***************************************************************************
1730  _lsa_CreateTrustedDomainEx
1731  ***************************************************************************/
1732
1733 NTSTATUS _lsa_CreateTrustedDomainEx(struct pipes_struct *p,
1734                                     struct lsa_CreateTrustedDomainEx *r)
1735 {
1736         struct lsa_CreateTrustedDomainEx2 q;
1737
1738         q.in.policy_handle      = r->in.policy_handle;
1739         q.in.info               = r->in.info;
1740         q.in.auth_info          = r->in.auth_info;
1741         q.in.access_mask        = r->in.access_mask;
1742         q.out.trustdom_handle   = r->out.trustdom_handle;
1743
1744         return _lsa_CreateTrustedDomainEx2(p, &q);
1745 }
1746
1747 /***************************************************************************
1748  _lsa_CreateTrustedDomain
1749  ***************************************************************************/
1750
1751 NTSTATUS _lsa_CreateTrustedDomain(struct pipes_struct *p,
1752                                   struct lsa_CreateTrustedDomain *r)
1753 {
1754         struct lsa_CreateTrustedDomainEx2 c;
1755         struct lsa_TrustDomainInfoInfoEx info;
1756         struct lsa_TrustDomainInfoAuthInfoInternal auth_info;
1757
1758         ZERO_STRUCT(auth_info);
1759
1760         info.domain_name        = r->in.info->name;
1761         info.netbios_name       = r->in.info->name;
1762         info.sid                = r->in.info->sid;
1763         info.trust_direction    = LSA_TRUST_DIRECTION_OUTBOUND;
1764         info.trust_type         = LSA_TRUST_TYPE_DOWNLEVEL;
1765         info.trust_attributes   = 0;
1766
1767         c.in.policy_handle      = r->in.policy_handle;
1768         c.in.info               = &info;
1769         c.in.auth_info          = &auth_info;
1770         c.in.access_mask        = r->in.access_mask;
1771         c.out.trustdom_handle   = r->out.trustdom_handle;
1772
1773         return _lsa_CreateTrustedDomainEx2(p, &c);
1774 }
1775
1776 /***************************************************************************
1777  _lsa_DeleteTrustedDomain
1778  ***************************************************************************/
1779
1780 NTSTATUS _lsa_DeleteTrustedDomain(struct pipes_struct *p,
1781                                   struct lsa_DeleteTrustedDomain *r)
1782 {
1783         NTSTATUS status;
1784         struct lsa_info *handle;
1785         struct trustdom_info *info;
1786
1787         /* find the connection policy handle. */
1788         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle)) {
1789                 return NT_STATUS_INVALID_HANDLE;
1790         }
1791
1792         if (handle->type != LSA_HANDLE_POLICY_TYPE) {
1793                 return NT_STATUS_INVALID_HANDLE;
1794         }
1795
1796         if (!(handle->access & LSA_POLICY_TRUST_ADMIN)) {
1797                 return NT_STATUS_ACCESS_DENIED;
1798         }
1799
1800         status = lsa_lookup_trusted_domain_by_sid(p->mem_ctx,
1801                                                   r->in.dom_sid,
1802                                                   &info);
1803         if (!NT_STATUS_IS_OK(status)) {
1804                 return status;
1805         }
1806
1807         status = pdb_del_trusted_domain(info->name);
1808         if (!NT_STATUS_IS_OK(status)) {
1809                 return status;
1810         }
1811
1812         return NT_STATUS_OK;
1813 }
1814
1815 /***************************************************************************
1816  _lsa_CloseTrustedDomainEx
1817  ***************************************************************************/
1818
1819 NTSTATUS _lsa_CloseTrustedDomainEx(struct pipes_struct *p,
1820                                    struct lsa_CloseTrustedDomainEx *r)
1821 {
1822         return NT_STATUS_NOT_IMPLEMENTED;
1823 }
1824
1825 /***************************************************************************
1826  _lsa_QueryTrustedDomainInfo
1827  ***************************************************************************/
1828
1829 NTSTATUS _lsa_QueryTrustedDomainInfo(struct pipes_struct *p,
1830                                      struct lsa_QueryTrustedDomainInfo *r)
1831 {
1832         NTSTATUS status;
1833         struct lsa_info *handle;
1834         union lsa_TrustedDomainInfo *info;
1835         struct pdb_trusted_domain *td;
1836         uint32_t acc_required;
1837
1838         /* find the connection policy handle. */
1839         if (!find_policy_by_hnd(p, r->in.trustdom_handle, (void **)(void *)&handle)) {
1840                 return NT_STATUS_INVALID_HANDLE;
1841         }
1842
1843         if (handle->type != LSA_HANDLE_TRUST_TYPE) {
1844                 return NT_STATUS_INVALID_HANDLE;
1845         }
1846
1847         switch (r->in.level) {
1848         case LSA_TRUSTED_DOMAIN_INFO_NAME:
1849                 acc_required = LSA_TRUSTED_QUERY_DOMAIN_NAME;
1850                 break;
1851         case LSA_TRUSTED_DOMAIN_INFO_CONTROLLERS:
1852                 acc_required = LSA_TRUSTED_QUERY_CONTROLLERS;
1853                 break;
1854         case LSA_TRUSTED_DOMAIN_INFO_POSIX_OFFSET:
1855                 acc_required = LSA_TRUSTED_QUERY_POSIX;
1856                 break;
1857         case LSA_TRUSTED_DOMAIN_INFO_PASSWORD:
1858                 acc_required = LSA_TRUSTED_QUERY_AUTH;
1859                 break;
1860         case LSA_TRUSTED_DOMAIN_INFO_BASIC:
1861                 acc_required = LSA_TRUSTED_QUERY_DOMAIN_NAME;
1862                 break;
1863         case LSA_TRUSTED_DOMAIN_INFO_INFO_EX:
1864                 acc_required = LSA_TRUSTED_QUERY_DOMAIN_NAME;
1865                 break;
1866         case LSA_TRUSTED_DOMAIN_INFO_AUTH_INFO:
1867                 acc_required = LSA_TRUSTED_QUERY_AUTH;
1868                 break;
1869         case LSA_TRUSTED_DOMAIN_INFO_FULL_INFO:
1870                 acc_required = LSA_TRUSTED_QUERY_DOMAIN_NAME |
1871                                LSA_TRUSTED_QUERY_POSIX |
1872                                LSA_TRUSTED_QUERY_AUTH;
1873                 break;
1874         case LSA_TRUSTED_DOMAIN_INFO_AUTH_INFO_INTERNAL:
1875                 acc_required = LSA_TRUSTED_QUERY_AUTH;
1876                 break;
1877         case LSA_TRUSTED_DOMAIN_INFO_FULL_INFO_INTERNAL:
1878                 acc_required = LSA_TRUSTED_QUERY_DOMAIN_NAME |
1879                                LSA_TRUSTED_QUERY_POSIX |
1880                                LSA_TRUSTED_QUERY_AUTH;
1881                 break;
1882         case LSA_TRUSTED_DOMAIN_INFO_INFO_EX2_INTERNAL:
1883                 acc_required = LSA_TRUSTED_QUERY_DOMAIN_NAME;
1884                 break;
1885         case LSA_TRUSTED_DOMAIN_INFO_FULL_INFO_2_INTERNAL:
1886                 acc_required = LSA_TRUSTED_QUERY_DOMAIN_NAME |
1887                                LSA_TRUSTED_QUERY_POSIX |
1888                                LSA_TRUSTED_QUERY_AUTH;
1889                 break;
1890         case LSA_TRUSTED_DOMAIN_SUPPORTED_ENCRYPTION_TYPES:
1891                 acc_required = LSA_TRUSTED_QUERY_POSIX;
1892                 break;
1893         default:
1894                 return NT_STATUS_INVALID_PARAMETER;
1895         }
1896
1897         if (!(handle->access & acc_required)) {
1898                 return NT_STATUS_ACCESS_DENIED;
1899         }
1900
1901         status = pdb_get_trusted_domain_by_sid(p->mem_ctx, &handle->sid, &td);
1902         if (!NT_STATUS_IS_OK(status)) {
1903                 return status;
1904         }
1905
1906         info = TALLOC_ZERO_P(p->mem_ctx, union lsa_TrustedDomainInfo);
1907         if (!info) {
1908                 return NT_STATUS_NO_MEMORY;
1909         }
1910
1911         switch (r->in.level) {
1912         case LSA_TRUSTED_DOMAIN_INFO_NAME:
1913                 init_lsa_StringLarge(&info->name.netbios_name, td->netbios_name);
1914                 break;
1915         case LSA_TRUSTED_DOMAIN_INFO_CONTROLLERS:
1916                 return NT_STATUS_INVALID_PARAMETER;
1917         case LSA_TRUSTED_DOMAIN_INFO_POSIX_OFFSET:
1918                 break;
1919         case LSA_TRUSTED_DOMAIN_INFO_PASSWORD:
1920                 return NT_STATUS_INVALID_INFO_CLASS;
1921         case LSA_TRUSTED_DOMAIN_INFO_BASIC:
1922                 return NT_STATUS_INVALID_PARAMETER;
1923         case LSA_TRUSTED_DOMAIN_INFO_INFO_EX:
1924                 init_lsa_StringLarge(&info->info_ex.domain_name, td->domain_name);
1925                 init_lsa_StringLarge(&info->info_ex.netbios_name, td->netbios_name);
1926                 info->info_ex.sid = dom_sid_dup(info, &td->security_identifier);
1927                 if (!info->info_ex.sid) {
1928                         return NT_STATUS_NO_MEMORY;
1929                 }
1930                 info->info_ex.trust_direction = td->trust_direction;
1931                 info->info_ex.trust_type = td->trust_type;
1932                 info->info_ex.trust_attributes = td->trust_attributes;
1933                 break;
1934         case LSA_TRUSTED_DOMAIN_INFO_AUTH_INFO:
1935                 return NT_STATUS_INVALID_INFO_CLASS;
1936         case LSA_TRUSTED_DOMAIN_INFO_FULL_INFO:
1937                 break;
1938         case LSA_TRUSTED_DOMAIN_INFO_AUTH_INFO_INTERNAL:
1939                 return NT_STATUS_INVALID_INFO_CLASS;
1940         case LSA_TRUSTED_DOMAIN_INFO_FULL_INFO_INTERNAL:
1941                 return NT_STATUS_INVALID_INFO_CLASS;
1942         case LSA_TRUSTED_DOMAIN_INFO_INFO_EX2_INTERNAL:
1943                 return NT_STATUS_INVALID_PARAMETER;
1944         case LSA_TRUSTED_DOMAIN_INFO_FULL_INFO_2_INTERNAL:
1945                 break;
1946         case LSA_TRUSTED_DOMAIN_SUPPORTED_ENCRYPTION_TYPES:
1947                 break;
1948         default:
1949                 return NT_STATUS_INVALID_PARAMETER;
1950         }
1951
1952         *r->out.info = info;
1953
1954         return NT_STATUS_OK;
1955 }
1956
1957 /***************************************************************************
1958  _lsa_QueryTrustedDomainInfoBySid
1959  ***************************************************************************/
1960
1961 NTSTATUS _lsa_QueryTrustedDomainInfoBySid(struct pipes_struct *p,
1962                                           struct lsa_QueryTrustedDomainInfoBySid *r)
1963 {
1964         NTSTATUS status;
1965         struct policy_handle trustdom_handle;
1966         struct lsa_OpenTrustedDomain o;
1967         struct lsa_QueryTrustedDomainInfo q;
1968         struct lsa_Close c;
1969
1970         o.in.handle             = r->in.handle;
1971         o.in.sid                = r->in.dom_sid;
1972         o.in.access_mask        = SEC_FLAG_MAXIMUM_ALLOWED;
1973         o.out.trustdom_handle   = &trustdom_handle;
1974
1975         status = _lsa_OpenTrustedDomain(p, &o);
1976         if (!NT_STATUS_IS_OK(status)) {
1977                 return status;
1978         }
1979
1980         q.in.trustdom_handle    = &trustdom_handle;
1981         q.in.level              = r->in.level;
1982         q.out.info              = r->out.info;
1983
1984         status = _lsa_QueryTrustedDomainInfo(p, &q);
1985         if (!NT_STATUS_IS_OK(status)) {
1986                 return status;
1987         }
1988
1989         c.in.handle             = &trustdom_handle;
1990         c.out.handle            = &trustdom_handle;
1991
1992         return _lsa_Close(p, &c);
1993 }
1994
1995 /***************************************************************************
1996  _lsa_QueryTrustedDomainInfoByName
1997  ***************************************************************************/
1998
1999 NTSTATUS _lsa_QueryTrustedDomainInfoByName(struct pipes_struct *p,
2000                                            struct lsa_QueryTrustedDomainInfoByName *r)
2001 {
2002         NTSTATUS status;
2003         struct policy_handle trustdom_handle;
2004         struct lsa_OpenTrustedDomainByName o;
2005         struct lsa_QueryTrustedDomainInfo q;
2006         struct lsa_Close c;
2007
2008         o.in.handle             = r->in.handle;
2009         o.in.name.string        = r->in.trusted_domain->string;
2010         o.in.access_mask        = SEC_FLAG_MAXIMUM_ALLOWED;
2011         o.out.trustdom_handle   = &trustdom_handle;
2012
2013         status = _lsa_OpenTrustedDomainByName(p, &o);
2014         if (!NT_STATUS_IS_OK(status)) {
2015                 if (NT_STATUS_EQUAL(status, NT_STATUS_NO_SUCH_DOMAIN)) {
2016                         return NT_STATUS_OBJECT_NAME_NOT_FOUND;
2017                 }
2018                 return status;
2019         }
2020
2021         q.in.trustdom_handle    = &trustdom_handle;
2022         q.in.level              = r->in.level;
2023         q.out.info              = r->out.info;
2024
2025         status = _lsa_QueryTrustedDomainInfo(p, &q);
2026         if (!NT_STATUS_IS_OK(status)) {
2027                 return status;
2028         }
2029
2030         c.in.handle             = &trustdom_handle;
2031         c.out.handle            = &trustdom_handle;
2032
2033         return _lsa_Close(p, &c);
2034 }
2035
2036 /***************************************************************************
2037  ***************************************************************************/
2038
2039 NTSTATUS _lsa_CreateSecret(struct pipes_struct *p, struct lsa_CreateSecret *r)
2040 {
2041         return NT_STATUS_ACCESS_DENIED;
2042 }
2043
2044 /***************************************************************************
2045  ***************************************************************************/
2046
2047 NTSTATUS _lsa_SetSecret(struct pipes_struct *p, struct lsa_SetSecret *r)
2048 {
2049         return NT_STATUS_ACCESS_DENIED;
2050 }
2051
2052 /***************************************************************************
2053  _lsa_DeleteObject
2054  ***************************************************************************/
2055
2056 NTSTATUS _lsa_DeleteObject(struct pipes_struct *p,
2057                            struct lsa_DeleteObject *r)
2058 {
2059         NTSTATUS status;
2060         struct lsa_info *info = NULL;
2061
2062         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info)) {
2063                 return NT_STATUS_INVALID_HANDLE;
2064         }
2065
2066         if (!(info->access & SEC_STD_DELETE)) {
2067                 return NT_STATUS_ACCESS_DENIED;
2068         }
2069
2070         switch (info->type) {
2071         case LSA_HANDLE_ACCOUNT_TYPE:
2072                 status = privilege_delete_account(&info->sid);
2073                 if (!NT_STATUS_IS_OK(status)) {
2074                         DEBUG(10,("_lsa_DeleteObject: privilege_delete_account gave: %s\n",
2075                                 nt_errstr(status)));
2076                         return status;
2077                 }
2078                 break;
2079         default:
2080                 return NT_STATUS_INVALID_HANDLE;
2081         }
2082
2083         close_policy_hnd(p, r->in.handle);
2084         ZERO_STRUCTP(r->out.handle);
2085
2086         return status;
2087 }
2088
2089 /***************************************************************************
2090  _lsa_EnumPrivs
2091  ***************************************************************************/
2092
2093 NTSTATUS _lsa_EnumPrivs(struct pipes_struct *p,
2094                         struct lsa_EnumPrivs *r)
2095 {
2096         struct lsa_info *handle;
2097         uint32 i;
2098         uint32 enum_context = *r->in.resume_handle;
2099         int num_privs = num_privileges_in_short_list();
2100         struct lsa_PrivEntry *entries = NULL;
2101
2102         /* remember that the enum_context starts at 0 and not 1 */
2103
2104         if ( enum_context >= num_privs )
2105                 return NT_STATUS_NO_MORE_ENTRIES;
2106
2107         DEBUG(10,("_lsa_EnumPrivs: enum_context:%d total entries:%d\n",
2108                 enum_context, num_privs));
2109
2110         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle))
2111                 return NT_STATUS_INVALID_HANDLE;
2112
2113         if (handle->type != LSA_HANDLE_POLICY_TYPE) {
2114                 return NT_STATUS_INVALID_HANDLE;
2115         }
2116
2117         /* check if the user has enough rights
2118            I don't know if it's the right one. not documented.  */
2119
2120         if (!(handle->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
2121                 return NT_STATUS_ACCESS_DENIED;
2122
2123         if (num_privs) {
2124                 entries = TALLOC_ZERO_ARRAY(p->mem_ctx, struct lsa_PrivEntry, num_privs);
2125                 if (!entries) {
2126                         return NT_STATUS_NO_MEMORY;
2127                 }
2128         } else {
2129                 entries = NULL;
2130         }
2131
2132         for (i = 0; i < num_privs; i++) {
2133                 if( i < enum_context) {
2134
2135                         init_lsa_StringLarge(&entries[i].name, NULL);
2136
2137                         entries[i].luid.low = 0;
2138                         entries[i].luid.high = 0;
2139                 } else {
2140
2141                         init_lsa_StringLarge(&entries[i].name, sec_privilege_name_from_index(i));
2142
2143                         entries[i].luid.low = sec_privilege_from_index(i);
2144                         entries[i].luid.high = 0;
2145                 }
2146         }
2147
2148         enum_context = num_privs;
2149
2150         *r->out.resume_handle = enum_context;
2151         r->out.privs->count = num_privs;
2152         r->out.privs->privs = entries;
2153
2154         return NT_STATUS_OK;
2155 }
2156
2157 /***************************************************************************
2158  _lsa_LookupPrivDisplayName
2159  ***************************************************************************/
2160
2161 NTSTATUS _lsa_LookupPrivDisplayName(struct pipes_struct *p,
2162                                     struct lsa_LookupPrivDisplayName *r)
2163 {
2164         struct lsa_info *handle;
2165         const char *description;
2166         struct lsa_StringLarge *lsa_name;
2167
2168         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle))
2169                 return NT_STATUS_INVALID_HANDLE;
2170
2171         if (handle->type != LSA_HANDLE_POLICY_TYPE) {
2172                 return NT_STATUS_INVALID_HANDLE;
2173         }
2174
2175         /* check if the user has enough rights */
2176
2177         /*
2178          * I don't know if it's the right one. not documented.
2179          */
2180         if (!(handle->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
2181                 return NT_STATUS_ACCESS_DENIED;
2182
2183         DEBUG(10,("_lsa_LookupPrivDisplayName: name = %s\n", r->in.name->string));
2184
2185         description = get_privilege_dispname(r->in.name->string);
2186         if (!description) {
2187                 DEBUG(10,("_lsa_LookupPrivDisplayName: doesn't exist\n"));
2188                 return NT_STATUS_NO_SUCH_PRIVILEGE;
2189         }
2190
2191         DEBUG(10,("_lsa_LookupPrivDisplayName: display name = %s\n", description));
2192
2193         lsa_name = TALLOC_ZERO_P(p->mem_ctx, struct lsa_StringLarge);
2194         if (!lsa_name) {
2195                 return NT_STATUS_NO_MEMORY;
2196         }
2197
2198         init_lsa_StringLarge(lsa_name, description);
2199
2200         *r->out.returned_language_id = r->in.language_id;
2201         *r->out.disp_name = lsa_name;
2202
2203         return NT_STATUS_OK;
2204 }
2205
2206 /***************************************************************************
2207  _lsa_EnumAccounts
2208  ***************************************************************************/
2209
2210 NTSTATUS _lsa_EnumAccounts(struct pipes_struct *p,
2211                            struct lsa_EnumAccounts *r)
2212 {
2213         struct lsa_info *handle;
2214         struct dom_sid *sid_list;
2215         int i, j, num_entries;
2216         NTSTATUS status;
2217         struct lsa_SidPtr *sids = NULL;
2218
2219         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle))
2220                 return NT_STATUS_INVALID_HANDLE;
2221
2222         if (handle->type != LSA_HANDLE_POLICY_TYPE) {
2223                 return NT_STATUS_INVALID_HANDLE;
2224         }
2225
2226         if (!(handle->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
2227                 return NT_STATUS_ACCESS_DENIED;
2228
2229         sid_list = NULL;
2230         num_entries = 0;
2231
2232         /* The only way we can currently find out all the SIDs that have been
2233            privileged is to scan all privileges */
2234
2235         status = privilege_enumerate_accounts(&sid_list, &num_entries);
2236         if (!NT_STATUS_IS_OK(status)) {
2237                 return status;
2238         }
2239
2240         if (*r->in.resume_handle >= num_entries) {
2241                 return NT_STATUS_NO_MORE_ENTRIES;
2242         }
2243
2244         if (num_entries - *r->in.resume_handle) {
2245                 sids = TALLOC_ZERO_ARRAY(p->mem_ctx, struct lsa_SidPtr,
2246                                          num_entries - *r->in.resume_handle);
2247                 if (!sids) {
2248                         talloc_free(sid_list);
2249                         return NT_STATUS_NO_MEMORY;
2250                 }
2251
2252                 for (i = *r->in.resume_handle, j = 0; i < num_entries; i++, j++) {
2253                         sids[j].sid = dom_sid_dup(p->mem_ctx, &sid_list[i]);
2254                         if (!sids[j].sid) {
2255                                 talloc_free(sid_list);
2256                                 return NT_STATUS_NO_MEMORY;
2257                         }
2258                 }
2259         }
2260
2261         talloc_free(sid_list);
2262
2263         *r->out.resume_handle = num_entries;
2264         r->out.sids->num_sids = num_entries;
2265         r->out.sids->sids = sids;
2266
2267         return NT_STATUS_OK;
2268 }
2269
2270 /***************************************************************************
2271  _lsa_GetUserName
2272  ***************************************************************************/
2273
2274 NTSTATUS _lsa_GetUserName(struct pipes_struct *p,
2275                           struct lsa_GetUserName *r)
2276 {
2277         const char *username, *domname;
2278         struct lsa_String *account_name = NULL;
2279         struct lsa_String *authority_name = NULL;
2280
2281         if (r->in.account_name &&
2282            *r->in.account_name) {
2283                 return NT_STATUS_INVALID_PARAMETER;
2284         }
2285
2286         if (r->in.authority_name &&
2287            *r->in.authority_name) {
2288                 return NT_STATUS_INVALID_PARAMETER;
2289         }
2290
2291         if (p->server_info->guest) {
2292                 /*
2293                  * I'm 99% sure this is not the right place to do this,
2294                  * global_sid_Anonymous should probably be put into the token
2295                  * instead of the guest id -- vl
2296                  */
2297                 if (!lookup_sid(p->mem_ctx, &global_sid_Anonymous,
2298                                 &domname, &username, NULL)) {
2299                         return NT_STATUS_NO_MEMORY;
2300                 }
2301         } else {
2302                 username = p->server_info->sanitized_username;
2303                 domname = p->server_info->info3->base.domain.string;
2304         }
2305
2306         account_name = TALLOC_P(p->mem_ctx, struct lsa_String);
2307         if (!account_name) {
2308                 return NT_STATUS_NO_MEMORY;
2309         }
2310         init_lsa_String(account_name, username);
2311
2312         if (r->out.authority_name) {
2313                 authority_name = TALLOC_P(p->mem_ctx, struct lsa_String);
2314                 if (!authority_name) {
2315                         return NT_STATUS_NO_MEMORY;
2316                 }
2317                 init_lsa_String(authority_name, domname);
2318         }
2319
2320         *r->out.account_name = account_name;
2321         if (r->out.authority_name) {
2322                 *r->out.authority_name = authority_name;
2323         }
2324
2325         return NT_STATUS_OK;
2326 }
2327
2328 /***************************************************************************
2329  _lsa_CreateAccount
2330  ***************************************************************************/
2331
2332 NTSTATUS _lsa_CreateAccount(struct pipes_struct *p,
2333                             struct lsa_CreateAccount *r)
2334 {
2335         NTSTATUS status;
2336         struct lsa_info *handle;
2337         uint32_t acc_granted;
2338         struct security_descriptor *psd;
2339         size_t sd_size;
2340
2341         /* find the connection policy handle. */
2342         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle))
2343                 return NT_STATUS_INVALID_HANDLE;
2344
2345         if (handle->type != LSA_HANDLE_POLICY_TYPE) {
2346                 return NT_STATUS_INVALID_HANDLE;
2347         }
2348
2349         /* check if the user has enough rights */
2350
2351         if (!(handle->access & LSA_POLICY_CREATE_ACCOUNT)) {
2352                 return NT_STATUS_ACCESS_DENIED;
2353         }
2354
2355         /* Work out max allowed. */
2356         map_max_allowed_access(p->server_info->security_token,
2357                                &p->server_info->utok,
2358                                &r->in.access_mask);
2359
2360         /* map the generic bits to the lsa policy ones */
2361         se_map_generic(&r->in.access_mask, &lsa_account_mapping);
2362
2363         status = make_lsa_object_sd(p->mem_ctx, &psd, &sd_size,
2364                                     &lsa_account_mapping,
2365                                     r->in.sid, LSA_POLICY_ALL_ACCESS);
2366         if (!NT_STATUS_IS_OK(status)) {
2367                 return status;
2368         }
2369
2370         status = access_check_object(psd, p->server_info->security_token,
2371                                      SEC_PRIV_INVALID, SEC_PRIV_INVALID, 0, r->in.access_mask,
2372                                      &acc_granted, "_lsa_CreateAccount");
2373         if (!NT_STATUS_IS_OK(status)) {
2374                 return status;
2375         }
2376
2377         if ( is_privileged_sid( r->in.sid ) )
2378                 return NT_STATUS_OBJECT_NAME_COLLISION;
2379
2380         status = create_lsa_policy_handle(p->mem_ctx, p,
2381                                           LSA_HANDLE_ACCOUNT_TYPE,
2382                                           acc_granted,
2383                                           r->in.sid,
2384                                           NULL,
2385                                           psd,
2386                                           r->out.acct_handle);
2387         if (!NT_STATUS_IS_OK(status)) {
2388                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
2389         }
2390
2391         return privilege_create_account(r->in.sid);
2392 }
2393
2394 /***************************************************************************
2395  _lsa_OpenAccount
2396  ***************************************************************************/
2397
2398 NTSTATUS _lsa_OpenAccount(struct pipes_struct *p,
2399                           struct lsa_OpenAccount *r)
2400 {
2401         struct lsa_info *handle;
2402         struct security_descriptor *psd = NULL;
2403         size_t sd_size;
2404         uint32_t des_access = r->in.access_mask;
2405         uint32_t acc_granted;
2406         NTSTATUS status;
2407
2408         /* find the connection policy handle. */
2409         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle))
2410                 return NT_STATUS_INVALID_HANDLE;
2411
2412         if (handle->type != LSA_HANDLE_POLICY_TYPE) {
2413                 return NT_STATUS_INVALID_HANDLE;
2414         }
2415
2416         /* des_access is for the account here, not the policy
2417          * handle - so don't check against policy handle. */
2418
2419         /* Work out max allowed. */
2420         map_max_allowed_access(p->server_info->security_token,
2421                                &p->server_info->utok,
2422                                &des_access);
2423
2424         /* map the generic bits to the lsa account ones */
2425         se_map_generic(&des_access, &lsa_account_mapping);
2426
2427         /* get the generic lsa account SD until we store it */
2428         status = make_lsa_object_sd(p->mem_ctx, &psd, &sd_size,
2429                                 &lsa_account_mapping,
2430                                 r->in.sid, LSA_ACCOUNT_ALL_ACCESS);
2431         if (!NT_STATUS_IS_OK(status)) {
2432                 return status;
2433         }
2434
2435         status = access_check_object(psd, p->server_info->security_token,
2436                                      SEC_PRIV_INVALID, SEC_PRIV_INVALID, 0, des_access,
2437                                      &acc_granted, "_lsa_OpenAccount" );
2438         if (!NT_STATUS_IS_OK(status)) {
2439                 return status;
2440         }
2441
2442         /* TODO: Fis the parsing routine before reenabling this check! */
2443         #if 0
2444         if (!lookup_sid(&handle->sid, dom_name, name, &type))
2445                 return NT_STATUS_ACCESS_DENIED;
2446         #endif
2447
2448         status = create_lsa_policy_handle(p->mem_ctx, p,
2449                                           LSA_HANDLE_ACCOUNT_TYPE,
2450                                           acc_granted,
2451                                           r->in.sid,
2452                                           NULL,
2453                                           psd,
2454                                           r->out.acct_handle);
2455         if (!NT_STATUS_IS_OK(status)) {
2456                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
2457         }
2458
2459         return NT_STATUS_OK;
2460 }
2461
2462 /***************************************************************************
2463  _lsa_EnumPrivsAccount
2464  For a given SID, enumerate all the privilege this account has.
2465  ***************************************************************************/
2466
2467 NTSTATUS _lsa_EnumPrivsAccount(struct pipes_struct *p,
2468                                struct lsa_EnumPrivsAccount *r)
2469 {
2470         NTSTATUS status = NT_STATUS_OK;
2471         struct lsa_info *info=NULL;
2472         PRIVILEGE_SET *privileges;
2473         struct lsa_PrivilegeSet *priv_set = NULL;
2474
2475         /* find the connection policy handle. */
2476         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
2477                 return NT_STATUS_INVALID_HANDLE;
2478
2479         if (info->type != LSA_HANDLE_ACCOUNT_TYPE) {
2480                 return NT_STATUS_INVALID_HANDLE;
2481         }
2482
2483         if (!(info->access & LSA_ACCOUNT_VIEW))
2484                 return NT_STATUS_ACCESS_DENIED;
2485
2486         status = get_privileges_for_sid_as_set(p->mem_ctx, &privileges, &info->sid);
2487         if (!NT_STATUS_IS_OK(status)) {
2488                 return status;
2489         }
2490
2491         *r->out.privs = priv_set = TALLOC_ZERO_P(p->mem_ctx, struct lsa_PrivilegeSet);
2492         if (!priv_set) {
2493                 return NT_STATUS_NO_MEMORY;
2494         }
2495
2496         DEBUG(10,("_lsa_EnumPrivsAccount: %s has %d privileges\n",
2497                   sid_string_dbg(&info->sid),
2498                   privileges->count));
2499
2500         priv_set->count = privileges->count;
2501         priv_set->unknown = 0;
2502         priv_set->set = talloc_move(priv_set, &privileges->set);
2503
2504         return status;
2505 }
2506
2507 /***************************************************************************
2508  _lsa_GetSystemAccessAccount
2509  ***************************************************************************/
2510
2511 NTSTATUS _lsa_GetSystemAccessAccount(struct pipes_struct *p,
2512                                      struct lsa_GetSystemAccessAccount *r)
2513 {
2514         NTSTATUS status;
2515         struct lsa_info *info = NULL;
2516         struct lsa_EnumPrivsAccount e;
2517         struct lsa_PrivilegeSet *privset;
2518
2519         /* find the connection policy handle. */
2520
2521         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
2522                 return NT_STATUS_INVALID_HANDLE;
2523
2524         if (info->type != LSA_HANDLE_ACCOUNT_TYPE) {
2525                 return NT_STATUS_INVALID_HANDLE;
2526         }
2527
2528         if (!(info->access & LSA_ACCOUNT_VIEW))
2529                 return NT_STATUS_ACCESS_DENIED;
2530
2531         privset = talloc_zero(p->mem_ctx, struct lsa_PrivilegeSet);
2532         if (!privset) {
2533                 return NT_STATUS_NO_MEMORY;
2534         }
2535
2536         e.in.handle = r->in.handle;
2537         e.out.privs = &privset;
2538
2539         status = _lsa_EnumPrivsAccount(p, &e);
2540         if (!NT_STATUS_IS_OK(status)) {
2541                 DEBUG(10,("_lsa_GetSystemAccessAccount: "
2542                         "failed to call _lsa_EnumPrivsAccount(): %s\n",
2543                         nt_errstr(status)));
2544                 return status;
2545         }
2546
2547         /* Samba4 would iterate over the privset to merge the policy mode bits,
2548          * not sure samba3 can do the same here, so just return what we did in
2549          * the past - gd */
2550
2551         /*
2552           0x01 -> Log on locally
2553           0x02 -> Access this computer from network
2554           0x04 -> Log on as a batch job
2555           0x10 -> Log on as a service
2556
2557           they can be ORed together
2558         */
2559
2560         *r->out.access_mask = LSA_POLICY_MODE_INTERACTIVE |
2561                               LSA_POLICY_MODE_NETWORK;
2562
2563         return NT_STATUS_OK;
2564 }
2565
2566 /***************************************************************************
2567   update the systemaccount information
2568  ***************************************************************************/
2569
2570 NTSTATUS _lsa_SetSystemAccessAccount(struct pipes_struct *p,
2571                                      struct lsa_SetSystemAccessAccount *r)
2572 {
2573         struct lsa_info *info=NULL;
2574         GROUP_MAP map;
2575
2576         /* find the connection policy handle. */
2577         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
2578                 return NT_STATUS_INVALID_HANDLE;
2579
2580         if (info->type != LSA_HANDLE_ACCOUNT_TYPE) {
2581                 return NT_STATUS_INVALID_HANDLE;
2582         }
2583
2584         if (!(info->access & LSA_ACCOUNT_ADJUST_SYSTEM_ACCESS)) {
2585                 return NT_STATUS_ACCESS_DENIED;
2586         }
2587
2588         if (!pdb_getgrsid(&map, info->sid))
2589                 return NT_STATUS_NO_SUCH_GROUP;
2590
2591         return pdb_update_group_mapping_entry(&map);
2592 }
2593
2594 /***************************************************************************
2595  _lsa_AddPrivilegesToAccount
2596  For a given SID, add some privileges.
2597  ***************************************************************************/
2598
2599 NTSTATUS _lsa_AddPrivilegesToAccount(struct pipes_struct *p,
2600                                      struct lsa_AddPrivilegesToAccount *r)
2601 {
2602         struct lsa_info *info = NULL;
2603         struct lsa_PrivilegeSet *set = NULL;
2604
2605         /* find the connection policy handle. */
2606         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
2607                 return NT_STATUS_INVALID_HANDLE;
2608
2609         if (info->type != LSA_HANDLE_ACCOUNT_TYPE) {
2610                 return NT_STATUS_INVALID_HANDLE;
2611         }
2612
2613         if (!(info->access & LSA_ACCOUNT_ADJUST_PRIVILEGES)) {
2614                 return NT_STATUS_ACCESS_DENIED;
2615         }
2616
2617         set = r->in.privs;
2618
2619         if ( !grant_privilege_set( &info->sid, set ) ) {
2620                 DEBUG(3,("_lsa_AddPrivilegesToAccount: grant_privilege_set(%s) failed!\n",
2621                          sid_string_dbg(&info->sid) ));
2622                 return NT_STATUS_NO_SUCH_PRIVILEGE;
2623         }
2624
2625         return NT_STATUS_OK;
2626 }
2627
2628 /***************************************************************************
2629  _lsa_RemovePrivilegesFromAccount
2630  For a given SID, remove some privileges.
2631  ***************************************************************************/
2632
2633 NTSTATUS _lsa_RemovePrivilegesFromAccount(struct pipes_struct *p,
2634                                           struct lsa_RemovePrivilegesFromAccount *r)
2635 {
2636         struct lsa_info *info = NULL;
2637         struct lsa_PrivilegeSet *set = NULL;
2638
2639         /* find the connection policy handle. */
2640         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
2641                 return NT_STATUS_INVALID_HANDLE;
2642
2643         if (info->type != LSA_HANDLE_ACCOUNT_TYPE) {
2644                 return NT_STATUS_INVALID_HANDLE;
2645         }
2646
2647         if (!(info->access & LSA_ACCOUNT_ADJUST_PRIVILEGES)) {
2648                 return NT_STATUS_ACCESS_DENIED;
2649         }
2650
2651         set = r->in.privs;
2652
2653         if ( !revoke_privilege_set( &info->sid, set) ) {
2654                 DEBUG(3,("_lsa_RemovePrivilegesFromAccount: revoke_privilege(%s) failed!\n",
2655                          sid_string_dbg(&info->sid) ));
2656                 return NT_STATUS_NO_SUCH_PRIVILEGE;
2657         }
2658
2659         return NT_STATUS_OK;
2660 }
2661
2662 /***************************************************************************
2663  _lsa_LookupPrivName
2664  ***************************************************************************/
2665
2666 NTSTATUS _lsa_LookupPrivName(struct pipes_struct *p,
2667                              struct lsa_LookupPrivName *r)
2668 {
2669         struct lsa_info *info = NULL;
2670         const char *name;
2671         struct lsa_StringLarge *lsa_name;
2672
2673         /* find the connection policy handle. */
2674         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info)) {
2675                 return NT_STATUS_INVALID_HANDLE;
2676         }
2677
2678         if (info->type != LSA_HANDLE_POLICY_TYPE) {
2679                 return NT_STATUS_INVALID_HANDLE;
2680         }
2681
2682         if (!(info->access & LSA_POLICY_VIEW_LOCAL_INFORMATION)) {
2683                 return NT_STATUS_ACCESS_DENIED;
2684         }
2685
2686         if (r->in.luid->high != 0) {
2687                 return NT_STATUS_NO_SUCH_PRIVILEGE;
2688         }
2689
2690         name = sec_privilege_name(r->in.luid->low);
2691         if (!name) {
2692                 return NT_STATUS_NO_SUCH_PRIVILEGE;
2693         }
2694
2695         lsa_name = TALLOC_ZERO_P(p->mem_ctx, struct lsa_StringLarge);
2696         if (!lsa_name) {
2697                 return NT_STATUS_NO_MEMORY;
2698         }
2699
2700         lsa_name->string = talloc_strdup(lsa_name, name);
2701         if (!lsa_name->string) {
2702                 TALLOC_FREE(lsa_name);
2703                 return NT_STATUS_NO_MEMORY;
2704         }
2705
2706         *r->out.name = lsa_name;
2707
2708         return NT_STATUS_OK;
2709 }
2710
2711 /***************************************************************************
2712  _lsa_QuerySecurity
2713  ***************************************************************************/
2714
2715 NTSTATUS _lsa_QuerySecurity(struct pipes_struct *p,
2716                             struct lsa_QuerySecurity *r)
2717 {
2718         struct lsa_info *handle=NULL;
2719         struct security_descriptor *psd = NULL;
2720         size_t sd_size;
2721         NTSTATUS status;
2722
2723         /* find the connection policy handle. */
2724         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle))
2725                 return NT_STATUS_INVALID_HANDLE;
2726
2727         switch (handle->type) {
2728         case LSA_HANDLE_POLICY_TYPE:
2729                 status = make_lsa_object_sd(p->mem_ctx, &psd, &sd_size,
2730                                 &lsa_policy_mapping, NULL, 0);
2731                 break;
2732         case LSA_HANDLE_ACCOUNT_TYPE:
2733                 status = make_lsa_object_sd(p->mem_ctx, &psd, &sd_size,
2734                                 &lsa_account_mapping,
2735                                 &handle->sid, LSA_ACCOUNT_ALL_ACCESS);
2736                 break;
2737         default:
2738                 status = NT_STATUS_INVALID_HANDLE;
2739                 break;
2740         }
2741
2742         if (!NT_STATUS_IS_OK(status)) {
2743                 return status;
2744         }
2745
2746         *r->out.sdbuf = make_sec_desc_buf(p->mem_ctx, sd_size, psd);
2747         if (!*r->out.sdbuf) {
2748                 return NT_STATUS_NO_MEMORY;
2749         }
2750
2751         return status;
2752 }
2753
2754 /***************************************************************************
2755  _lsa_AddAccountRights
2756  ***************************************************************************/
2757
2758 NTSTATUS _lsa_AddAccountRights(struct pipes_struct *p,
2759                                struct lsa_AddAccountRights *r)
2760 {
2761         struct lsa_info *info = NULL;
2762         int i = 0;
2763         uint32_t acc_granted = 0;
2764         struct security_descriptor *psd = NULL;
2765         size_t sd_size;
2766         struct dom_sid sid;
2767         NTSTATUS status;
2768
2769         /* find the connection policy handle. */
2770         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
2771                 return NT_STATUS_INVALID_HANDLE;
2772
2773         if (info->type != LSA_HANDLE_POLICY_TYPE) {
2774                 return NT_STATUS_INVALID_HANDLE;
2775         }
2776
2777         /* get the generic lsa account SD for this SID until we store it */
2778         status = make_lsa_object_sd(p->mem_ctx, &psd, &sd_size,
2779                                 &lsa_account_mapping,
2780                                 r->in.sid, LSA_ACCOUNT_ALL_ACCESS);
2781         if (!NT_STATUS_IS_OK(status)) {
2782                 return status;
2783         }
2784
2785         /*
2786          * From the MS DOCs. If the sid doesn't exist, ask for LSA_POLICY_CREATE_ACCOUNT
2787          * on the policy handle. If it does, ask for
2788          * LSA_ACCOUNT_ADJUST_PRIVILEGES|LSA_ACCOUNT_ADJUST_SYSTEM_ACCESS|LSA_ACCOUNT_VIEW,
2789          * on the account sid. We don't check here so just use the latter. JRA.
2790          */
2791
2792         status = access_check_object(psd, p->server_info->security_token,
2793                                      SEC_PRIV_INVALID, SEC_PRIV_INVALID, 0,
2794                                      LSA_ACCOUNT_ADJUST_PRIVILEGES|LSA_ACCOUNT_ADJUST_SYSTEM_ACCESS|LSA_ACCOUNT_VIEW,
2795                                      &acc_granted, "_lsa_AddAccountRights" );
2796         if (!NT_STATUS_IS_OK(status)) {
2797                 return status;
2798         }
2799
2800         /* according to an NT4 PDC, you can add privileges to SIDs even without
2801            call_lsa_create_account() first.  And you can use any arbitrary SID. */
2802
2803         sid_copy( &sid, r->in.sid );
2804
2805         for ( i=0; i < r->in.rights->count; i++ ) {
2806
2807                 const char *privname = r->in.rights->names[i].string;
2808
2809                 /* only try to add non-null strings */
2810
2811                 if ( !privname )
2812                         continue;
2813
2814                 if ( !grant_privilege_by_name( &sid, privname ) ) {
2815                         DEBUG(2,("_lsa_AddAccountRights: Failed to add privilege [%s]\n",
2816                                 privname ));
2817                         return NT_STATUS_NO_SUCH_PRIVILEGE;
2818                 }
2819         }
2820
2821         return NT_STATUS_OK;
2822 }
2823
2824 /***************************************************************************
2825  _lsa_RemoveAccountRights
2826  ***************************************************************************/
2827
2828 NTSTATUS _lsa_RemoveAccountRights(struct pipes_struct *p,
2829                                   struct lsa_RemoveAccountRights *r)
2830 {
2831         struct lsa_info *info = NULL;
2832         int i = 0;
2833         struct security_descriptor *psd = NULL;
2834         size_t sd_size;
2835         struct dom_sid sid;
2836         const char *privname = NULL;
2837         uint32_t acc_granted = 0;
2838         NTSTATUS status;
2839
2840         /* find the connection policy handle. */
2841         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
2842                 return NT_STATUS_INVALID_HANDLE;
2843
2844         if (info->type != LSA_HANDLE_POLICY_TYPE) {
2845                 return NT_STATUS_INVALID_HANDLE;
2846         }
2847
2848         /* get the generic lsa account SD for this SID until we store it */
2849         status = make_lsa_object_sd(p->mem_ctx, &psd, &sd_size,
2850                                 &lsa_account_mapping,
2851                                 r->in.sid, LSA_ACCOUNT_ALL_ACCESS);
2852         if (!NT_STATUS_IS_OK(status)) {
2853                 return status;
2854         }
2855
2856         /*
2857          * From the MS DOCs. We need
2858          * LSA_ACCOUNT_ADJUST_PRIVILEGES|LSA_ACCOUNT_ADJUST_SYSTEM_ACCESS|LSA_ACCOUNT_VIEW
2859          * and DELETE on the account sid.
2860          */
2861
2862         status = access_check_object(psd, p->server_info->security_token,
2863                                      SEC_PRIV_INVALID, SEC_PRIV_INVALID, 0,
2864                                      LSA_ACCOUNT_ADJUST_PRIVILEGES|LSA_ACCOUNT_ADJUST_SYSTEM_ACCESS|
2865                                      LSA_ACCOUNT_VIEW|SEC_STD_DELETE,
2866                                      &acc_granted, "_lsa_RemoveAccountRights");
2867         if (!NT_STATUS_IS_OK(status)) {
2868                 return status;
2869         }
2870
2871         sid_copy( &sid, r->in.sid );
2872
2873         if ( r->in.remove_all ) {
2874                 if ( !revoke_all_privileges( &sid ) )
2875                         return NT_STATUS_ACCESS_DENIED;
2876
2877                 return NT_STATUS_OK;
2878         }
2879
2880         for ( i=0; i < r->in.rights->count; i++ ) {
2881
2882                 privname = r->in.rights->names[i].string;
2883
2884                 /* only try to add non-null strings */
2885
2886                 if ( !privname )
2887                         continue;
2888
2889                 if ( !revoke_privilege_by_name( &sid, privname ) ) {
2890                         DEBUG(2,("_lsa_RemoveAccountRights: Failed to revoke privilege [%s]\n",
2891                                 privname ));
2892                         return NT_STATUS_NO_SUCH_PRIVILEGE;
2893                 }
2894         }
2895
2896         return NT_STATUS_OK;
2897 }
2898
2899 /*******************************************************************
2900 ********************************************************************/
2901
2902 static NTSTATUS init_lsa_right_set(TALLOC_CTX *mem_ctx,
2903                                    struct lsa_RightSet *r,
2904                                    PRIVILEGE_SET *privileges)
2905 {
2906         uint32 i;
2907         const char *privname;
2908         const char **privname_array = NULL;
2909         int num_priv = 0;
2910
2911         for (i=0; i<privileges->count; i++) {
2912                 if (privileges->set[i].luid.high) {
2913                         continue;
2914                 }
2915                 privname = sec_privilege_name(privileges->set[i].luid.low);
2916                 if (privname) {
2917                         if (!add_string_to_array(mem_ctx, privname,
2918                                                  &privname_array, &num_priv)) {
2919                                 return NT_STATUS_NO_MEMORY;
2920                         }
2921                 }
2922         }
2923
2924         if (num_priv) {
2925
2926                 r->names = TALLOC_ZERO_ARRAY(mem_ctx, struct lsa_StringLarge,
2927                                              num_priv);
2928                 if (!r->names) {
2929                         return NT_STATUS_NO_MEMORY;
2930                 }
2931
2932                 for (i=0; i<num_priv; i++) {
2933                         init_lsa_StringLarge(&r->names[i], privname_array[i]);
2934                 }
2935
2936                 r->count = num_priv;
2937         }
2938
2939         return NT_STATUS_OK;
2940 }
2941
2942 /***************************************************************************
2943  _lsa_EnumAccountRights
2944  ***************************************************************************/
2945
2946 NTSTATUS _lsa_EnumAccountRights(struct pipes_struct *p,
2947                                 struct lsa_EnumAccountRights *r)
2948 {
2949         NTSTATUS status;
2950         struct lsa_info *info = NULL;
2951         PRIVILEGE_SET *privileges;
2952
2953         /* find the connection policy handle. */
2954
2955         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
2956                 return NT_STATUS_INVALID_HANDLE;
2957
2958         if (info->type != LSA_HANDLE_POLICY_TYPE) {
2959                 return NT_STATUS_INVALID_HANDLE;
2960         }
2961
2962         if (!(info->access & LSA_ACCOUNT_VIEW)) {
2963                 return NT_STATUS_ACCESS_DENIED;
2964         }
2965
2966         /* according to an NT4 PDC, you can add privileges to SIDs even without
2967            call_lsa_create_account() first.  And you can use any arbitrary SID. */
2968
2969         /* according to MS-LSAD 3.1.4.5.10 it is required to return
2970          * NT_STATUS_OBJECT_NAME_NOT_FOUND if the account sid was not found in
2971          * the lsa database */
2972
2973         status = get_privileges_for_sid_as_set(p->mem_ctx, &privileges, r->in.sid);
2974         if (!NT_STATUS_IS_OK(status)) {
2975                 return status;
2976         }
2977
2978         DEBUG(10,("_lsa_EnumAccountRights: %s has %d privileges\n",
2979                   sid_string_dbg(r->in.sid), privileges->count));
2980
2981         status = init_lsa_right_set(p->mem_ctx, r->out.rights, privileges);
2982
2983         return status;
2984 }
2985
2986 /***************************************************************************
2987  _lsa_LookupPrivValue
2988  ***************************************************************************/
2989
2990 NTSTATUS _lsa_LookupPrivValue(struct pipes_struct *p,
2991                               struct lsa_LookupPrivValue *r)
2992 {
2993         struct lsa_info *info = NULL;
2994         const char *name = NULL;
2995
2996         /* find the connection policy handle. */
2997
2998         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
2999                 return NT_STATUS_INVALID_HANDLE;
3000
3001         if (info->type != LSA_HANDLE_POLICY_TYPE) {
3002                 return NT_STATUS_INVALID_HANDLE;
3003         }
3004
3005         if (!(info->access & LSA_POLICY_LOOKUP_NAMES))
3006                 return NT_STATUS_ACCESS_DENIED;
3007
3008         name = r->in.name->string;
3009
3010         DEBUG(10,("_lsa_lookup_priv_value: name = %s\n", name));
3011
3012         r->out.luid->low = sec_privilege_id(name);
3013         r->out.luid->high = 0;
3014         if (r->out.luid->low == SEC_PRIV_INVALID) {
3015                 return NT_STATUS_NO_SUCH_PRIVILEGE;
3016         }
3017         return NT_STATUS_OK;
3018 }
3019
3020 /***************************************************************************
3021  _lsa_EnumAccountsWithUserRight
3022  ***************************************************************************/
3023
3024 NTSTATUS _lsa_EnumAccountsWithUserRight(struct pipes_struct *p,
3025                                         struct lsa_EnumAccountsWithUserRight *r)
3026 {
3027         NTSTATUS status;
3028         struct lsa_info *info = NULL;
3029         struct dom_sid *sids = NULL;
3030         int num_sids = 0;
3031         uint32_t i;
3032         enum sec_privilege privilege;
3033
3034         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info)) {
3035                 return NT_STATUS_INVALID_HANDLE;
3036         }
3037
3038         if (info->type != LSA_HANDLE_POLICY_TYPE) {
3039                 return NT_STATUS_INVALID_HANDLE;
3040         }
3041
3042         if (!(info->access & LSA_POLICY_LOOKUP_NAMES)) {
3043                 return NT_STATUS_ACCESS_DENIED;
3044         }
3045
3046         if (!r->in.name || !r->in.name->string) {
3047                 return NT_STATUS_NO_SUCH_PRIVILEGE;
3048         }
3049
3050         privilege = sec_privilege_id(r->in.name->string);
3051         if (privilege == SEC_PRIV_INVALID) {
3052                 return NT_STATUS_NO_SUCH_PRIVILEGE;
3053         }
3054
3055         status = privilege_enum_sids(privilege, p->mem_ctx,
3056                                      &sids, &num_sids);
3057         if (!NT_STATUS_IS_OK(status)) {
3058                 return status;
3059         }
3060
3061         r->out.sids->num_sids = num_sids;
3062         r->out.sids->sids = talloc_array(p->mem_ctx, struct lsa_SidPtr,
3063                                          r->out.sids->num_sids);
3064
3065         for (i=0; i < r->out.sids->num_sids; i++) {
3066                 r->out.sids->sids[i].sid = dom_sid_dup(r->out.sids->sids,
3067                                                           &sids[i]);
3068                 if (!r->out.sids->sids[i].sid) {
3069                         TALLOC_FREE(r->out.sids->sids);
3070                         r->out.sids->num_sids = 0;
3071                         return NT_STATUS_NO_MEMORY;
3072                 }
3073         }
3074
3075         return NT_STATUS_OK;
3076 }
3077
3078 /***************************************************************************
3079  _lsa_Delete
3080  ***************************************************************************/
3081
3082 NTSTATUS _lsa_Delete(struct pipes_struct *p,
3083                      struct lsa_Delete *r)
3084 {
3085         return NT_STATUS_NOT_SUPPORTED;
3086 }
3087
3088 /*
3089  * From here on the server routines are just dummy ones to make smbd link with
3090  * librpc/gen_ndr/srv_lsa.c. These routines are actually never called, we are
3091  * pulling the server stubs across one by one.
3092  */
3093
3094 NTSTATUS _lsa_SetSecObj(struct pipes_struct *p, struct lsa_SetSecObj *r)
3095 {
3096         p->rng_fault_state = True;
3097         return NT_STATUS_NOT_IMPLEMENTED;
3098 }
3099
3100 NTSTATUS _lsa_ChangePassword(struct pipes_struct *p,
3101                              struct lsa_ChangePassword *r)
3102 {
3103         p->rng_fault_state = True;
3104         return NT_STATUS_NOT_IMPLEMENTED;
3105 }
3106
3107 NTSTATUS _lsa_SetInfoPolicy(struct pipes_struct *p, struct lsa_SetInfoPolicy *r)
3108 {
3109         p->rng_fault_state = True;
3110         return NT_STATUS_NOT_IMPLEMENTED;
3111 }
3112
3113 NTSTATUS _lsa_ClearAuditLog(struct pipes_struct *p, struct lsa_ClearAuditLog *r)
3114 {
3115         p->rng_fault_state = True;
3116         return NT_STATUS_NOT_IMPLEMENTED;
3117 }
3118
3119 NTSTATUS _lsa_GetQuotasForAccount(struct pipes_struct *p,
3120                                   struct lsa_GetQuotasForAccount *r)
3121 {
3122         p->rng_fault_state = True;
3123         return NT_STATUS_NOT_IMPLEMENTED;
3124 }
3125
3126 NTSTATUS _lsa_SetQuotasForAccount(struct pipes_struct *p,
3127                                   struct lsa_SetQuotasForAccount *r)
3128 {
3129         p->rng_fault_state = True;
3130         return NT_STATUS_NOT_IMPLEMENTED;
3131 }
3132
3133 NTSTATUS _lsa_SetInformationTrustedDomain(struct pipes_struct *p,
3134                                           struct lsa_SetInformationTrustedDomain *r)
3135 {
3136         p->rng_fault_state = True;
3137         return NT_STATUS_NOT_IMPLEMENTED;
3138 }
3139
3140 NTSTATUS _lsa_QuerySecret(struct pipes_struct *p, struct lsa_QuerySecret *r)
3141 {
3142         p->rng_fault_state = True;
3143         return NT_STATUS_NOT_IMPLEMENTED;
3144 }
3145
3146 NTSTATUS _lsa_SetTrustedDomainInfo(struct pipes_struct *p,
3147                                    struct lsa_SetTrustedDomainInfo *r)
3148 {
3149         p->rng_fault_state = True;
3150         return NT_STATUS_NOT_IMPLEMENTED;
3151 }
3152
3153 NTSTATUS _lsa_StorePrivateData(struct pipes_struct *p,
3154                                struct lsa_StorePrivateData *r)
3155 {
3156         p->rng_fault_state = True;
3157         return NT_STATUS_NOT_IMPLEMENTED;
3158 }
3159
3160 NTSTATUS _lsa_RetrievePrivateData(struct pipes_struct *p,
3161                                   struct lsa_RetrievePrivateData *r)
3162 {
3163         p->rng_fault_state = True;
3164         return NT_STATUS_NOT_IMPLEMENTED;
3165 }
3166
3167 NTSTATUS _lsa_SetInfoPolicy2(struct pipes_struct *p,
3168                              struct lsa_SetInfoPolicy2 *r)
3169 {
3170         p->rng_fault_state = True;
3171         return NT_STATUS_NOT_IMPLEMENTED;
3172 }
3173
3174 NTSTATUS _lsa_SetTrustedDomainInfoByName(struct pipes_struct *p,
3175                                          struct lsa_SetTrustedDomainInfoByName *r)
3176 {
3177         p->rng_fault_state = True;
3178         return NT_STATUS_NOT_IMPLEMENTED;
3179 }
3180
3181 NTSTATUS _lsa_EnumTrustedDomainsEx(struct pipes_struct *p,
3182                                    struct lsa_EnumTrustedDomainsEx *r)
3183 {
3184         struct lsa_info *info;
3185         uint32_t count;
3186         struct pdb_trusted_domain **domains;
3187         struct lsa_TrustDomainInfoInfoEx *entries;
3188         int i;
3189         NTSTATUS nt_status;
3190
3191         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
3192                 return NT_STATUS_INVALID_HANDLE;
3193
3194         if (info->type != LSA_HANDLE_POLICY_TYPE) {
3195                 return NT_STATUS_INVALID_HANDLE;
3196         }
3197
3198         /* check if the user has enough rights */
3199         if (!(info->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
3200                 return NT_STATUS_ACCESS_DENIED;
3201
3202         become_root();
3203         nt_status = pdb_enum_trusted_domains(p->mem_ctx, &count, &domains);
3204         unbecome_root();
3205
3206         if (!NT_STATUS_IS_OK(nt_status)) {
3207                 return nt_status;
3208         }
3209
3210         entries = TALLOC_ZERO_ARRAY(p->mem_ctx, struct lsa_TrustDomainInfoInfoEx,
3211                                     count);
3212         if (!entries) {
3213                 return NT_STATUS_NO_MEMORY;
3214         }
3215
3216         for (i=0; i<count; i++) {
3217                 init_lsa_StringLarge(&entries[i].netbios_name,
3218                                      domains[i]->netbios_name);
3219                 entries[i].sid = &domains[i]->security_identifier;
3220         }
3221
3222         if (*r->in.resume_handle >= count) {
3223                 *r->out.resume_handle = -1;
3224                 TALLOC_FREE(entries);
3225                 return NT_STATUS_NO_MORE_ENTRIES;
3226         }
3227
3228         /* return the rest, limit by max_size. Note that we
3229            use the w2k3 element size value of 60 */
3230         r->out.domains->count = count - *r->in.resume_handle;
3231         r->out.domains->count = MIN(r->out.domains->count,
3232                                     (r->in.max_size/LSA_ENUM_TRUST_DOMAIN_EX_MULTIPLIER));
3233
3234         r->out.domains->domains = entries + *r->in.resume_handle;
3235
3236         if (r->out.domains->count < count - *r->in.resume_handle) {
3237                 *r->out.resume_handle = *r->in.resume_handle + r->out.domains->count;
3238                 return STATUS_MORE_ENTRIES;
3239         }
3240
3241         /* according to MS-LSAD 3.1.4.7.8 output resume handle MUST
3242          * always be larger than the previous input resume handle, in
3243          * particular when hitting the last query it is vital to set the
3244          * resume handle correctly to avoid infinite client loops, as
3245          * seen e.g. with Windows XP SP3 when resume handle is 0 and
3246          * status is NT_STATUS_OK - gd */
3247
3248         *r->out.resume_handle = (uint32_t)-1;
3249
3250         return NT_STATUS_OK;
3251 }
3252
3253 NTSTATUS _lsa_QueryDomainInformationPolicy(struct pipes_struct *p,
3254                                            struct lsa_QueryDomainInformationPolicy *r)
3255 {
3256         p->rng_fault_state = True;
3257         return NT_STATUS_NOT_IMPLEMENTED;
3258 }
3259
3260 NTSTATUS _lsa_SetDomainInformationPolicy(struct pipes_struct *p,
3261                                          struct lsa_SetDomainInformationPolicy *r)
3262 {
3263         p->rng_fault_state = True;
3264         return NT_STATUS_NOT_IMPLEMENTED;
3265 }
3266
3267 NTSTATUS _lsa_TestCall(struct pipes_struct *p, struct lsa_TestCall *r)
3268 {
3269         p->rng_fault_state = True;
3270         return NT_STATUS_NOT_IMPLEMENTED;
3271 }
3272
3273 NTSTATUS _lsa_CREDRWRITE(struct pipes_struct *p, struct lsa_CREDRWRITE *r)
3274 {
3275         p->rng_fault_state = True;
3276         return NT_STATUS_NOT_IMPLEMENTED;
3277 }
3278
3279 NTSTATUS _lsa_CREDRREAD(struct pipes_struct *p, struct lsa_CREDRREAD *r)
3280 {
3281         p->rng_fault_state = True;
3282         return NT_STATUS_NOT_IMPLEMENTED;
3283 }
3284
3285 NTSTATUS _lsa_CREDRENUMERATE(struct pipes_struct *p, struct lsa_CREDRENUMERATE *r)
3286 {
3287         p->rng_fault_state = True;
3288         return NT_STATUS_NOT_IMPLEMENTED;
3289 }
3290
3291 NTSTATUS _lsa_CREDRWRITEDOMAINCREDENTIALS(struct pipes_struct *p,
3292                                           struct lsa_CREDRWRITEDOMAINCREDENTIALS *r)
3293 {
3294         p->rng_fault_state = True;
3295         return NT_STATUS_NOT_IMPLEMENTED;
3296 }
3297
3298 NTSTATUS _lsa_CREDRREADDOMAINCREDENTIALS(struct pipes_struct *p,
3299                                          struct lsa_CREDRREADDOMAINCREDENTIALS *r)
3300 {
3301         p->rng_fault_state = True;
3302         return NT_STATUS_NOT_IMPLEMENTED;
3303 }
3304
3305 NTSTATUS _lsa_CREDRDELETE(struct pipes_struct *p, struct lsa_CREDRDELETE *r)
3306 {
3307         p->rng_fault_state = True;
3308         return NT_STATUS_NOT_IMPLEMENTED;
3309 }
3310
3311 NTSTATUS _lsa_CREDRGETTARGETINFO(struct pipes_struct *p,
3312                                  struct lsa_CREDRGETTARGETINFO *r)
3313 {
3314         p->rng_fault_state = True;
3315         return NT_STATUS_NOT_IMPLEMENTED;
3316 }
3317
3318 NTSTATUS _lsa_CREDRPROFILELOADED(struct pipes_struct *p,
3319                                  struct lsa_CREDRPROFILELOADED *r)
3320 {
3321         p->rng_fault_state = True;
3322         return NT_STATUS_NOT_IMPLEMENTED;
3323 }
3324
3325 NTSTATUS _lsa_CREDRGETSESSIONTYPES(struct pipes_struct *p,
3326                                    struct lsa_CREDRGETSESSIONTYPES *r)
3327 {
3328         p->rng_fault_state = True;
3329         return NT_STATUS_NOT_IMPLEMENTED;
3330 }
3331
3332 NTSTATUS _lsa_LSARREGISTERAUDITEVENT(struct pipes_struct *p,
3333                                      struct lsa_LSARREGISTERAUDITEVENT *r)
3334 {
3335         p->rng_fault_state = True;
3336         return NT_STATUS_NOT_IMPLEMENTED;
3337 }
3338
3339 NTSTATUS _lsa_LSARGENAUDITEVENT(struct pipes_struct *p,
3340                                 struct lsa_LSARGENAUDITEVENT *r)
3341 {
3342         p->rng_fault_state = True;
3343         return NT_STATUS_NOT_IMPLEMENTED;
3344 }
3345
3346 NTSTATUS _lsa_LSARUNREGISTERAUDITEVENT(struct pipes_struct *p,
3347                                        struct lsa_LSARUNREGISTERAUDITEVENT *r)
3348 {
3349         p->rng_fault_state = True;
3350         return NT_STATUS_NOT_IMPLEMENTED;
3351 }
3352
3353 NTSTATUS _lsa_lsaRQueryForestTrustInformation(struct pipes_struct *p,
3354                                               struct lsa_lsaRQueryForestTrustInformation *r)
3355 {
3356         p->rng_fault_state = True;
3357         return NT_STATUS_NOT_IMPLEMENTED;
3358 }
3359
3360 NTSTATUS _lsa_lsaRSetForestTrustInformation(struct pipes_struct *p,
3361                                             struct lsa_lsaRSetForestTrustInformation *r)
3362 {
3363         p->rng_fault_state = True;
3364         return NT_STATUS_NOT_IMPLEMENTED;
3365 }
3366
3367 NTSTATUS _lsa_CREDRRENAME(struct pipes_struct *p,
3368                           struct lsa_CREDRRENAME *r)
3369 {
3370         p->rng_fault_state = True;
3371         return NT_STATUS_NOT_IMPLEMENTED;
3372 }
3373
3374 NTSTATUS _lsa_LSAROPENPOLICYSCE(struct pipes_struct *p,
3375                                 struct lsa_LSAROPENPOLICYSCE *r)
3376 {
3377         p->rng_fault_state = True;
3378         return NT_STATUS_NOT_IMPLEMENTED;
3379 }
3380
3381 NTSTATUS _lsa_LSARADTREGISTERSECURITYEVENTSOURCE(struct pipes_struct *p,
3382                                                  struct lsa_LSARADTREGISTERSECURITYEVENTSOURCE *r)
3383 {
3384         p->rng_fault_state = True;
3385         return NT_STATUS_NOT_IMPLEMENTED;
3386 }
3387
3388 NTSTATUS _lsa_LSARADTUNREGISTERSECURITYEVENTSOURCE(struct pipes_struct *p,
3389                                                    struct lsa_LSARADTUNREGISTERSECURITYEVENTSOURCE *r)
3390 {
3391         p->rng_fault_state = True;
3392         return NT_STATUS_NOT_IMPLEMENTED;
3393 }
3394
3395 NTSTATUS _lsa_LSARADTREPORTSECURITYEVENT(struct pipes_struct *p,
3396                                          struct lsa_LSARADTREPORTSECURITYEVENT *r)
3397 {
3398         p->rng_fault_state = True;
3399         return NT_STATUS_NOT_IMPLEMENTED;
3400 }