r13316: Let the carnage begin....
[kai/samba.git] / source / rpc_client / cli_samr.c
1 /* 
2    Unix SMB/CIFS implementation.
3    RPC pipe client
4    Copyright (C) Tim Potter                        2000-2001,
5    Copyright (C) Andrew Tridgell              1992-1997,2000,
6    Copyright (C) Rafal Szczesniak                       2002.
7    Copyright (C) Jeremy Allison                         2005.
8    
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 2 of the License, or
12    (at your option) any later version.
13    
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18    
19    You should have received a copy of the GNU General Public License
20    along with this program; if not, write to the Free Software
21    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 */
23
24 #include "includes.h"
25
26 /* Connect to SAMR database */
27
28 NTSTATUS rpccli_samr_connect(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx, 
29                              uint32 access_mask, POLICY_HND *connect_pol)
30 {
31         prs_struct qbuf, rbuf;
32         SAMR_Q_CONNECT q;
33         SAMR_R_CONNECT r;
34         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
35
36         DEBUG(10,("cli_samr_connect to %s\n", cli->cli->desthost));
37
38         ZERO_STRUCT(q);
39         ZERO_STRUCT(r);
40
41         /* Marshall data and send request */
42
43         init_samr_q_connect(&q, cli->cli->desthost, access_mask);
44
45         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_CONNECT,
46                 q, r,
47                 qbuf, rbuf,
48                 samr_io_q_connect,
49                 samr_io_r_connect,
50                 NT_STATUS_UNSUCCESSFUL); 
51         /* Return output parameters */
52
53         if (NT_STATUS_IS_OK(result = r.status)) {
54                 *connect_pol = r.connect_pol;
55 #ifdef __INSURE__
56                 connect_pol->marker = malloc(1);
57 #endif
58         }
59
60         return result;
61 }
62
63 /* Connect to SAMR database */
64
65 NTSTATUS rpccli_samr_connect4(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx, 
66                            uint32 access_mask, POLICY_HND *connect_pol)
67 {
68         prs_struct qbuf, rbuf;
69         SAMR_Q_CONNECT4 q;
70         SAMR_R_CONNECT4 r;
71         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
72
73         ZERO_STRUCT(q);
74         ZERO_STRUCT(r);
75
76         /* Marshall data and send request */
77
78         init_samr_q_connect4(&q, cli->cli->desthost, access_mask);
79
80         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_CONNECT4,
81                 q, r,
82                 qbuf, rbuf,
83                 samr_io_q_connect4,
84                 samr_io_r_connect4,
85                 NT_STATUS_UNSUCCESSFUL); 
86
87         /* Return output parameters */
88
89         if (NT_STATUS_IS_OK(result = r.status)) {
90                 *connect_pol = r.connect_pol;
91 #ifdef __INSURE__
92                 connect_pol->marker = malloc(1);
93 #endif
94         }
95
96         return result;
97 }
98
99 /* Close SAMR handle */
100
101 NTSTATUS rpccli_samr_close(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx,
102                            POLICY_HND *connect_pol)
103 {
104         prs_struct qbuf, rbuf;
105         SAMR_Q_CLOSE_HND q;
106         SAMR_R_CLOSE_HND r;
107         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
108
109         DEBUG(10,("cli_samr_close\n"));
110
111         ZERO_STRUCT(q);
112         ZERO_STRUCT(r);
113
114         /* Marshall data and send request */
115
116         init_samr_q_close_hnd(&q, connect_pol);
117
118         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_CLOSE_HND,
119                 q, r,
120                 qbuf, rbuf,
121                 samr_io_q_close_hnd,
122                 samr_io_r_close_hnd,
123                 NT_STATUS_UNSUCCESSFUL); 
124
125         /* Return output parameters */
126
127         if (NT_STATUS_IS_OK(result = r.status)) {
128 #ifdef __INSURE__
129                 SAFE_FREE(connect_pol->marker);
130 #endif
131                 *connect_pol = r.pol;
132         }
133
134         return result;
135 }
136
137 /* Open handle on a domain */
138
139 NTSTATUS rpccli_samr_open_domain(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx,
140                                  POLICY_HND *connect_pol, uint32 access_mask, 
141                                  const DOM_SID *domain_sid,
142                                  POLICY_HND *domain_pol)
143 {
144         prs_struct qbuf, rbuf;
145         SAMR_Q_OPEN_DOMAIN q;
146         SAMR_R_OPEN_DOMAIN r;
147         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
148
149         DEBUG(10,("cli_samr_open_domain with sid %s\n", sid_string_static(domain_sid) ));
150
151         ZERO_STRUCT(q);
152         ZERO_STRUCT(r);
153
154         /* Marshall data and send request */
155
156         init_samr_q_open_domain(&q, connect_pol, access_mask, domain_sid);
157
158         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_OPEN_DOMAIN,
159                 q, r,
160                 qbuf, rbuf,
161                 samr_io_q_open_domain,
162                 samr_io_r_open_domain,
163                 NT_STATUS_UNSUCCESSFUL); 
164
165         /* Return output parameters */
166
167         if (NT_STATUS_IS_OK(result = r.status)) {
168                 *domain_pol = r.domain_pol;
169 #ifdef __INSURE__
170                 domain_pol->marker = malloc(1);
171 #endif
172         }
173
174         return result;
175 }
176
177 NTSTATUS rpccli_samr_open_user(struct rpc_pipe_client *cli,
178                                TALLOC_CTX *mem_ctx,
179                                POLICY_HND *domain_pol, uint32 access_mask, 
180                                uint32 user_rid, POLICY_HND *user_pol)
181 {
182         prs_struct qbuf, rbuf;
183         SAMR_Q_OPEN_USER q;
184         SAMR_R_OPEN_USER r;
185         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
186
187         DEBUG(10,("cli_samr_open_user with rid 0x%x\n", user_rid ));
188
189         ZERO_STRUCT(q);
190         ZERO_STRUCT(r);
191
192         /* Marshall data and send request */
193
194         init_samr_q_open_user(&q, domain_pol, access_mask, user_rid);
195
196         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_OPEN_USER,
197                 q, r,
198                 qbuf, rbuf,
199                 samr_io_q_open_user,
200                 samr_io_r_open_user,
201                 NT_STATUS_UNSUCCESSFUL); 
202
203         /* Return output parameters */
204
205         if (NT_STATUS_IS_OK(result = r.status)) {
206                 *user_pol = r.user_pol;
207 #ifdef __INSURE__
208                 user_pol->marker = malloc(1);
209 #endif
210         }
211
212         return result;
213 }
214
215 /* Open handle on a group */
216
217 NTSTATUS rpccli_samr_open_group(struct rpc_pipe_client *cli,
218                                 TALLOC_CTX *mem_ctx, 
219                                 POLICY_HND *domain_pol, uint32 access_mask, 
220                                 uint32 group_rid, POLICY_HND *group_pol)
221 {
222         prs_struct qbuf, rbuf;
223         SAMR_Q_OPEN_GROUP q;
224         SAMR_R_OPEN_GROUP r;
225         NTSTATUS result =  NT_STATUS_UNSUCCESSFUL;
226
227         DEBUG(10,("cli_samr_open_group with rid 0x%x\n", group_rid ));
228
229         ZERO_STRUCT(q);
230         ZERO_STRUCT(r);
231
232         /* Marshall data and send request */
233
234         init_samr_q_open_group(&q, domain_pol, access_mask, group_rid);
235
236         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_OPEN_GROUP,
237                 q, r,
238                 qbuf, rbuf,
239                 samr_io_q_open_group,
240                 samr_io_r_open_group,
241                 NT_STATUS_UNSUCCESSFUL); 
242
243         /* Return output parameters */
244
245         if (NT_STATUS_IS_OK(result = r.status)) {
246                 *group_pol = r.pol;
247 #ifdef __INSURE__
248                 group_pol->marker = malloc(1);
249 #endif
250         }
251
252         return result;
253 }
254
255 /* Create domain group */
256
257 NTSTATUS rpccli_samr_create_dom_group(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx,
258                                    POLICY_HND *domain_pol,
259                                    const char *group_name,
260                                    uint32 access_mask, POLICY_HND *group_pol)
261 {
262         prs_struct qbuf, rbuf;
263         SAMR_Q_CREATE_DOM_GROUP q;
264         SAMR_R_CREATE_DOM_GROUP r;
265         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
266
267         DEBUG(10,("cli_samr_create_dom_group\n"));
268
269         ZERO_STRUCT(q);
270         ZERO_STRUCT(r);
271
272         /* Marshall data and send request */
273
274         init_samr_q_create_dom_group(&q, domain_pol, group_name, access_mask);
275
276         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_CREATE_DOM_GROUP,
277                 q, r,
278                 qbuf, rbuf,
279                 samr_io_q_create_dom_group,
280                 samr_io_r_create_dom_group,
281                 NT_STATUS_UNSUCCESSFUL); 
282
283         /* Return output parameters */
284
285         result = r.status;
286
287         if (NT_STATUS_IS_OK(result))
288                 *group_pol = r.pol;
289
290         return result;
291 }
292
293 /* Add a domain group member */
294
295 NTSTATUS rpccli_samr_add_groupmem(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx,
296                                POLICY_HND *group_pol, uint32 rid)
297 {
298         prs_struct qbuf, rbuf;
299         SAMR_Q_ADD_GROUPMEM q;
300         SAMR_R_ADD_GROUPMEM r;
301         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
302
303         DEBUG(10,("cli_samr_add_groupmem\n"));
304
305         ZERO_STRUCT(q);
306         ZERO_STRUCT(r);
307
308         /* Marshall data and send request */
309
310         init_samr_q_add_groupmem(&q, group_pol, rid);
311
312         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_ADD_GROUPMEM,
313                 q, r,
314                 qbuf, rbuf,
315                 samr_io_q_add_groupmem,
316                 samr_io_r_add_groupmem,
317                 NT_STATUS_UNSUCCESSFUL); 
318
319         /* Return output parameters */
320
321         result = r.status;
322
323         return result;
324 }
325
326 /* Delete a domain group member */
327
328 NTSTATUS rpccli_samr_del_groupmem(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx,
329                                POLICY_HND *group_pol, uint32 rid)
330 {
331         prs_struct qbuf, rbuf;
332         SAMR_Q_DEL_GROUPMEM q;
333         SAMR_R_DEL_GROUPMEM r;
334         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
335
336         DEBUG(10,("cli_samr_del_groupmem\n"));
337
338         ZERO_STRUCT(q);
339         ZERO_STRUCT(r);
340
341         /* Marshall data and send request */
342
343         init_samr_q_del_groupmem(&q, group_pol, rid);
344
345         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_DEL_GROUPMEM,
346                 q, r,
347                 qbuf, rbuf,
348                 samr_io_q_del_groupmem,
349                 samr_io_r_del_groupmem,
350                 NT_STATUS_UNSUCCESSFUL); 
351
352         /* Return output parameters */
353
354         result = r.status;
355
356         return result;
357 }
358
359 /* Query user info */
360
361 NTSTATUS rpccli_samr_query_userinfo(struct rpc_pipe_client *cli,
362                                     TALLOC_CTX *mem_ctx,
363                                     const POLICY_HND *user_pol,
364                                     uint16 switch_value, 
365                                     SAM_USERINFO_CTR **ctr)
366 {
367         prs_struct qbuf, rbuf;
368         SAMR_Q_QUERY_USERINFO q;
369         SAMR_R_QUERY_USERINFO r;
370         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
371
372         DEBUG(10,("cli_samr_query_userinfo\n"));
373
374         ZERO_STRUCT(q);
375         ZERO_STRUCT(r);
376
377         /* Marshall data and send request */
378
379         init_samr_q_query_userinfo(&q, user_pol, switch_value);
380
381         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_QUERY_USERINFO,
382                 q, r,
383                 qbuf, rbuf,
384                 samr_io_q_query_userinfo,
385                 samr_io_r_query_userinfo,
386                 NT_STATUS_UNSUCCESSFUL); 
387
388         /* Return output parameters */
389
390         result = r.status;
391         *ctr = r.ctr;
392
393         return result;
394 }
395
396 /* Set group info */
397
398 NTSTATUS rpccli_samr_set_groupinfo(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx,
399                                 POLICY_HND *group_pol, GROUP_INFO_CTR *ctr)
400 {
401         prs_struct qbuf, rbuf;
402         SAMR_Q_SET_GROUPINFO q;
403         SAMR_R_SET_GROUPINFO r;
404         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
405
406         DEBUG(10,("cli_samr_set_groupinfo\n"));
407
408         ZERO_STRUCT(q);
409         ZERO_STRUCT(r);
410
411         /* Marshall data and send request */
412
413         init_samr_q_set_groupinfo(&q, group_pol, ctr);
414
415         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_SET_GROUPINFO,
416                 q, r,
417                 qbuf, rbuf,
418                 samr_io_q_set_groupinfo,
419                 samr_io_r_set_groupinfo,
420                 NT_STATUS_UNSUCCESSFUL); 
421
422         /* Return output parameters */
423
424         result = r.status;
425
426         return result;
427 }
428
429 /* Query group info */
430
431 NTSTATUS rpccli_samr_query_groupinfo(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx,
432                                   POLICY_HND *group_pol, uint32 info_level, 
433                                   GROUP_INFO_CTR **ctr)
434 {
435         prs_struct qbuf, rbuf;
436         SAMR_Q_QUERY_GROUPINFO q;
437         SAMR_R_QUERY_GROUPINFO r;
438         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
439
440         DEBUG(10,("cli_samr_query_groupinfo\n"));
441
442         ZERO_STRUCT(q);
443         ZERO_STRUCT(r);
444
445         /* Marshall data and send request */
446
447         init_samr_q_query_groupinfo(&q, group_pol, info_level);
448
449         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_QUERY_GROUPINFO,
450                 q, r,
451                 qbuf, rbuf,
452                 samr_io_q_query_groupinfo,
453                 samr_io_r_query_groupinfo,
454                 NT_STATUS_UNSUCCESSFUL); 
455
456         *ctr = r.ctr;
457
458         /* Return output parameters */
459
460         result = r.status;
461
462         return result;
463 }
464
465 /* Query user groups */
466
467 NTSTATUS rpccli_samr_query_usergroups(struct rpc_pipe_client *cli,
468                                       TALLOC_CTX *mem_ctx, 
469                                       POLICY_HND *user_pol,
470                                       uint32 *num_groups, 
471                                       DOM_GID **gid)
472 {
473         prs_struct qbuf, rbuf;
474         SAMR_Q_QUERY_USERGROUPS q;
475         SAMR_R_QUERY_USERGROUPS r;
476         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
477
478         DEBUG(10,("cli_samr_query_usergroups\n"));
479
480         ZERO_STRUCT(q);
481         ZERO_STRUCT(r);
482
483         /* Marshall data and send request */
484
485         init_samr_q_query_usergroups(&q, user_pol);
486
487         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_QUERY_USERGROUPS,
488                 q, r,
489                 qbuf, rbuf,
490                 samr_io_q_query_usergroups,
491                 samr_io_r_query_usergroups,
492                 NT_STATUS_UNSUCCESSFUL); 
493
494         /* Return output parameters */
495
496         if (NT_STATUS_IS_OK(result = r.status)) {
497                 *num_groups = r.num_entries;
498                 *gid = r.gid;
499         }
500
501         return result;
502 }
503
504 /* Set alias info */
505
506 NTSTATUS rpccli_samr_set_aliasinfo(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx,
507                                 POLICY_HND *alias_pol, ALIAS_INFO_CTR *ctr)
508 {
509         prs_struct qbuf, rbuf;
510         SAMR_Q_SET_ALIASINFO q;
511         SAMR_R_SET_ALIASINFO r;
512         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
513
514         DEBUG(10,("cli_samr_set_aliasinfo\n"));
515
516         ZERO_STRUCT(q);
517         ZERO_STRUCT(r);
518
519         /* Marshall data and send request */
520
521         init_samr_q_set_aliasinfo(&q, alias_pol, ctr);
522
523         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_SET_ALIASINFO,
524                 q, r,
525                 qbuf, rbuf,
526                 samr_io_q_set_aliasinfo,
527                 samr_io_r_set_aliasinfo,
528                 NT_STATUS_UNSUCCESSFUL); 
529
530         /* Return output parameters */
531
532         result = r.status;
533
534         return result;
535 }
536
537 /* Query user aliases */
538
539 NTSTATUS rpccli_samr_query_useraliases(struct rpc_pipe_client *cli,
540                                        TALLOC_CTX *mem_ctx, 
541                                        POLICY_HND *dom_pol, uint32 num_sids,
542                                        DOM_SID2 *sid,
543                                        uint32 *num_aliases, uint32 **als_rids)
544 {
545         prs_struct qbuf, rbuf;
546         SAMR_Q_QUERY_USERALIASES q;
547         SAMR_R_QUERY_USERALIASES r;
548         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
549         int i;
550         uint32 *sid_ptrs;
551         
552         DEBUG(10,("cli_samr_query_useraliases\n"));
553
554         ZERO_STRUCT(q);
555         ZERO_STRUCT(r);
556
557         sid_ptrs = TALLOC_ARRAY(mem_ctx, uint32, num_sids);
558         if (sid_ptrs == NULL)
559                 return NT_STATUS_NO_MEMORY;
560
561         for (i=0; i<num_sids; i++)
562                 sid_ptrs[i] = 1;
563
564         /* Marshall data and send request */
565
566         init_samr_q_query_useraliases(&q, dom_pol, num_sids, sid_ptrs, sid);
567
568         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_QUERY_USERALIASES,
569                 q, r,
570                 qbuf, rbuf,
571                 samr_io_q_query_useraliases,
572                 samr_io_r_query_useraliases,
573                 NT_STATUS_UNSUCCESSFUL); 
574
575         /* Return output parameters */
576
577         if (NT_STATUS_IS_OK(result = r.status)) {
578                 *num_aliases = r.num_entries;
579                 *als_rids = r.rid;
580         }
581
582         return result;
583 }
584
585 /* Query user groups */
586
587 NTSTATUS rpccli_samr_query_groupmem(struct rpc_pipe_client *cli,
588                                     TALLOC_CTX *mem_ctx,
589                                     POLICY_HND *group_pol, uint32 *num_mem, 
590                                     uint32 **rid, uint32 **attr)
591 {
592         prs_struct qbuf, rbuf;
593         SAMR_Q_QUERY_GROUPMEM q;
594         SAMR_R_QUERY_GROUPMEM r;
595         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
596
597         DEBUG(10,("cli_samr_query_groupmem\n"));
598
599         ZERO_STRUCT(q);
600         ZERO_STRUCT(r);
601
602         /* Marshall data and send request */
603
604         init_samr_q_query_groupmem(&q, group_pol);
605
606         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_QUERY_GROUPMEM,
607                 q, r,
608                 qbuf, rbuf,
609                 samr_io_q_query_groupmem,
610                 samr_io_r_query_groupmem,
611                 NT_STATUS_UNSUCCESSFUL); 
612
613         /* Return output parameters */
614
615         if (NT_STATUS_IS_OK(result = r.status)) {
616                 *num_mem = r.num_entries;
617                 *rid = r.rid;
618                 *attr = r.attr;
619         }
620
621         return result;
622 }
623
624 /**
625  * Enumerate domain users
626  *
627  * @param cli client state structure
628  * @param mem_ctx talloc context
629  * @param pol opened domain policy handle
630  * @param start_idx starting index of enumeration, returns context for
631                     next enumeration
632  * @param acb_mask account control bit mask (to enumerate some particular
633  *                 kind of accounts)
634  * @param size max acceptable size of response
635  * @param dom_users returned array of domain user names
636  * @param rids returned array of domain user RIDs
637  * @param num_dom_users numer returned entries
638  * 
639  * @return NTSTATUS returned in rpc response
640  **/
641
642 NTSTATUS rpccli_samr_enum_dom_users(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx,
643                                  POLICY_HND *pol, uint32 *start_idx, uint16 acb_mask,
644                                  uint32 size, char ***dom_users, uint32 **rids,
645                                  uint32 *num_dom_users)
646 {
647         prs_struct qbuf;
648         prs_struct rbuf;
649         SAMR_Q_ENUM_DOM_USERS q;
650         SAMR_R_ENUM_DOM_USERS r;
651         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
652         int i;
653         
654         DEBUG(10,("cli_samr_enum_dom_users starting at index %u\n", (unsigned int)*start_idx));
655
656         ZERO_STRUCT(q);
657         ZERO_STRUCT(r);
658         
659         /* always init this */
660         *num_dom_users = 0;
661         
662         /* Fill query structure with parameters */
663
664         init_samr_q_enum_dom_users(&q, pol, *start_idx, acb_mask, 0, size);
665         
666         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_ENUM_DOM_USERS,
667                 q, r,
668                 qbuf, rbuf,
669                 samr_io_q_enum_dom_users,
670                 samr_io_r_enum_dom_users,
671                 NT_STATUS_UNSUCCESSFUL); 
672
673         result = r.status;
674
675         if (!NT_STATUS_IS_OK(result) &&
676             NT_STATUS_V(result) != NT_STATUS_V(STATUS_MORE_ENTRIES))
677                 goto done;
678         
679         *start_idx = r.next_idx;
680         *num_dom_users = r.num_entries2;
681
682         if (r.num_entries2) {
683                 /* allocate memory needed to return received data */    
684                 *rids = TALLOC_ARRAY(mem_ctx, uint32, r.num_entries2);
685                 if (!*rids) {
686                         DEBUG(0, ("Error in cli_samr_enum_dom_users(): out of memory\n"));
687                         return NT_STATUS_NO_MEMORY;
688                 }
689                 
690                 *dom_users = TALLOC_ARRAY(mem_ctx, char*, r.num_entries2);
691                 if (!*dom_users) {
692                         DEBUG(0, ("Error in cli_samr_enum_dom_users(): out of memory\n"));
693                         return NT_STATUS_NO_MEMORY;
694                 }
695                 
696                 /* fill output buffers with rpc response */
697                 for (i = 0; i < r.num_entries2; i++) {
698                         fstring conv_buf;
699                         
700                         (*rids)[i] = r.sam[i].rid;
701                         unistr2_to_ascii(conv_buf, &(r.uni_acct_name[i]), sizeof(conv_buf) - 1);
702                         (*dom_users)[i] = talloc_strdup(mem_ctx, conv_buf);
703                 }
704         }
705         
706 done:
707         return result;
708 }
709
710 /* Enumerate domain groups */
711
712 NTSTATUS rpccli_samr_enum_dom_groups(struct rpc_pipe_client *cli,
713                                      TALLOC_CTX *mem_ctx, 
714                                      POLICY_HND *pol, uint32 *start_idx, 
715                                      uint32 size, struct acct_info **dom_groups,
716                                      uint32 *num_dom_groups)
717 {
718         prs_struct qbuf, rbuf;
719         SAMR_Q_ENUM_DOM_GROUPS q;
720         SAMR_R_ENUM_DOM_GROUPS r;
721         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
722         uint32 name_idx, i;
723
724         DEBUG(10,("cli_samr_enum_dom_groups starting at index %u\n", (unsigned int)*start_idx));
725
726         ZERO_STRUCT(q);
727         ZERO_STRUCT(r);
728
729         /* Marshall data and send request */
730
731         init_samr_q_enum_dom_groups(&q, pol, *start_idx, size);
732
733         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_ENUM_DOM_GROUPS,
734                 q, r,
735                 qbuf, rbuf,
736                 samr_io_q_enum_dom_groups,
737                 samr_io_r_enum_dom_groups,
738                 NT_STATUS_UNSUCCESSFUL); 
739
740         /* Return output parameters */
741
742         result = r.status;
743
744         if (!NT_STATUS_IS_OK(result) &&
745             NT_STATUS_V(result) != NT_STATUS_V(STATUS_MORE_ENTRIES))
746                 goto done;
747
748         *num_dom_groups = r.num_entries2;
749
750         if (*num_dom_groups == 0)
751                 goto done;
752
753         if (!((*dom_groups) = TALLOC_ARRAY(mem_ctx, struct acct_info, *num_dom_groups))) {
754                 result = NT_STATUS_NO_MEMORY;
755                 goto done;
756         }
757
758         memset(*dom_groups, 0, sizeof(struct acct_info) * (*num_dom_groups));
759
760         name_idx = 0;
761
762         for (i = 0; i < *num_dom_groups; i++) {
763
764                 (*dom_groups)[i].rid = r.sam[i].rid;
765
766                 if (r.sam[i].hdr_name.buffer) {
767                         unistr2_to_ascii((*dom_groups)[i].acct_name,
768                                          &r.uni_grp_name[name_idx],
769                                          sizeof(fstring) - 1);
770                         name_idx++;
771                 }
772
773                 *start_idx = r.next_idx;
774         }
775
776  done:
777         return result;
778 }
779
780 /* Enumerate domain groups */
781
782 NTSTATUS rpccli_samr_enum_als_groups(struct rpc_pipe_client *cli,
783                                      TALLOC_CTX *mem_ctx, 
784                                      POLICY_HND *pol, uint32 *start_idx, 
785                                      uint32 size, struct acct_info **dom_aliases,
786                                      uint32 *num_dom_aliases)
787 {
788         prs_struct qbuf, rbuf;
789         SAMR_Q_ENUM_DOM_ALIASES q;
790         SAMR_R_ENUM_DOM_ALIASES r;
791         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
792         uint32 name_idx, i;
793
794         DEBUG(10,("cli_samr_enum_als_groups starting at index %u\n", (unsigned int)*start_idx));
795
796         ZERO_STRUCT(q);
797         ZERO_STRUCT(r);
798
799         /* Marshall data and send request */
800
801         init_samr_q_enum_dom_aliases(&q, pol, *start_idx, size);
802
803         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_ENUM_DOM_ALIASES,
804                 q, r,
805                 qbuf, rbuf,
806                 samr_io_q_enum_dom_aliases,
807                 samr_io_r_enum_dom_aliases,
808                 NT_STATUS_UNSUCCESSFUL); 
809
810         /* Return output parameters */
811
812         result = r.status;
813
814         if (!NT_STATUS_IS_OK(result) &&
815             NT_STATUS_V(result) != NT_STATUS_V(STATUS_MORE_ENTRIES)) {
816                 goto done;
817         }
818
819         *num_dom_aliases = r.num_entries2;
820
821         if (*num_dom_aliases == 0)
822                 goto done;
823
824         if (!((*dom_aliases) = TALLOC_ARRAY(mem_ctx, struct acct_info, *num_dom_aliases))) {
825                 result = NT_STATUS_NO_MEMORY;
826                 goto done;
827         }
828
829         memset(*dom_aliases, 0, sizeof(struct acct_info) * *num_dom_aliases);
830
831         name_idx = 0;
832
833         for (i = 0; i < *num_dom_aliases; i++) {
834
835                 (*dom_aliases)[i].rid = r.sam[i].rid;
836
837                 if (r.sam[i].hdr_name.buffer) {
838                         unistr2_to_ascii((*dom_aliases)[i].acct_name,
839                                          &r.uni_grp_name[name_idx],
840                                          sizeof(fstring) - 1);
841                         name_idx++;
842                 }
843
844                 *start_idx = r.next_idx;
845         }
846
847  done:
848         return result;
849 }
850
851 /* Query alias members */
852
853 NTSTATUS rpccli_samr_query_aliasmem(struct rpc_pipe_client *cli,
854                                     TALLOC_CTX *mem_ctx,
855                                     POLICY_HND *alias_pol, uint32 *num_mem, 
856                                     DOM_SID **sids)
857 {
858         prs_struct qbuf, rbuf;
859         SAMR_Q_QUERY_ALIASMEM q;
860         SAMR_R_QUERY_ALIASMEM r;
861         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
862         uint32 i;
863
864         DEBUG(10,("cli_samr_query_aliasmem\n"));
865
866         ZERO_STRUCT(q);
867         ZERO_STRUCT(r);
868
869         /* Marshall data and send request */
870
871         init_samr_q_query_aliasmem(&q, alias_pol);
872
873         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_QUERY_ALIASMEM,
874                 q, r,
875                 qbuf, rbuf,
876                 samr_io_q_query_aliasmem,
877                 samr_io_r_query_aliasmem,
878                 NT_STATUS_UNSUCCESSFUL); 
879
880         /* Return output parameters */
881
882         if (!NT_STATUS_IS_OK(result = r.status)) {
883                 goto done;
884         }
885
886         *num_mem = r.num_sids;
887
888         if (*num_mem == 0) {
889                 *sids = NULL;
890                 result = NT_STATUS_OK;
891                 goto done;
892         }
893
894         if (!(*sids = TALLOC_ARRAY(mem_ctx, DOM_SID, *num_mem))) {
895                 result = NT_STATUS_UNSUCCESSFUL;
896                 goto done;
897         }
898
899         for (i = 0; i < *num_mem; i++) {
900                 (*sids)[i] = r.sid[i].sid;
901         }
902
903  done:
904         return result;
905 }
906
907 /* Open handle on an alias */
908
909 NTSTATUS rpccli_samr_open_alias(struct rpc_pipe_client *cli,
910                                 TALLOC_CTX *mem_ctx, 
911                                 POLICY_HND *domain_pol, uint32 access_mask, 
912                                 uint32 alias_rid, POLICY_HND *alias_pol)
913 {
914         prs_struct qbuf, rbuf;
915         SAMR_Q_OPEN_ALIAS q;
916         SAMR_R_OPEN_ALIAS r;
917         NTSTATUS result;
918
919         DEBUG(10,("cli_samr_open_alias with rid 0x%x\n", alias_rid));
920
921         ZERO_STRUCT(q);
922         ZERO_STRUCT(r);
923
924         /* Marshall data and send request */
925
926         init_samr_q_open_alias(&q, domain_pol, access_mask, alias_rid);
927
928         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_OPEN_ALIAS,
929                 q, r,
930                 qbuf, rbuf,
931                 samr_io_q_open_alias,
932                 samr_io_r_open_alias,
933                 NT_STATUS_UNSUCCESSFUL); 
934
935         /* Return output parameters */
936
937         if (NT_STATUS_IS_OK(result = r.status)) {
938                 *alias_pol = r.pol;
939 #ifdef __INSURE__
940                 alias_pol->marker = malloc(1);
941 #endif
942         }
943
944         return result;
945 }
946
947 /* Create an alias */
948
949 NTSTATUS rpccli_samr_create_dom_alias(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx, 
950                                    POLICY_HND *domain_pol, const char *name,
951                                    POLICY_HND *alias_pol)
952 {
953         prs_struct qbuf, rbuf;
954         SAMR_Q_CREATE_DOM_ALIAS q;
955         SAMR_R_CREATE_DOM_ALIAS r;
956         NTSTATUS result;
957
958         DEBUG(10,("cli_samr_create_dom_alias named %s\n", name));
959
960         ZERO_STRUCT(q);
961         ZERO_STRUCT(r);
962
963         /* Marshall data and send request */
964
965         init_samr_q_create_dom_alias(&q, domain_pol, name);
966
967         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_CREATE_DOM_ALIAS,
968                 q, r,
969                 qbuf, rbuf,
970                 samr_io_q_create_dom_alias,
971                 samr_io_r_create_dom_alias,
972                 NT_STATUS_UNSUCCESSFUL); 
973
974         /* Return output parameters */
975
976         if (NT_STATUS_IS_OK(result = r.status)) {
977                 *alias_pol = r.alias_pol;
978         }
979
980         return result;
981 }
982
983 /* Add an alias member */
984
985 NTSTATUS rpccli_samr_add_aliasmem(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx, 
986                                POLICY_HND *alias_pol, DOM_SID *member)
987 {
988         prs_struct qbuf, rbuf;
989         SAMR_Q_ADD_ALIASMEM q;
990         SAMR_R_ADD_ALIASMEM r;
991         NTSTATUS result;
992
993         DEBUG(10,("cli_samr_add_aliasmem"));
994
995         ZERO_STRUCT(q);
996         ZERO_STRUCT(r);
997
998         /* Marshall data and send request */
999
1000         init_samr_q_add_aliasmem(&q, alias_pol, member);
1001
1002         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_ADD_ALIASMEM,
1003                 q, r,
1004                 qbuf, rbuf,
1005                 samr_io_q_add_aliasmem,
1006                 samr_io_r_add_aliasmem,
1007                 NT_STATUS_UNSUCCESSFUL); 
1008
1009         result = r.status;
1010
1011         return result;
1012 }
1013
1014 /* Delete an alias member */
1015
1016 NTSTATUS rpccli_samr_del_aliasmem(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx, 
1017                                POLICY_HND *alias_pol, DOM_SID *member)
1018 {
1019         prs_struct qbuf, rbuf;
1020         SAMR_Q_DEL_ALIASMEM q;
1021         SAMR_R_DEL_ALIASMEM r;
1022         NTSTATUS result;
1023
1024         DEBUG(10,("cli_samr_del_aliasmem"));
1025
1026         ZERO_STRUCT(q);
1027         ZERO_STRUCT(r);
1028
1029         /* Marshall data and send request */
1030
1031         init_samr_q_del_aliasmem(&q, alias_pol, member);
1032
1033         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_DEL_ALIASMEM,
1034                 q, r,
1035                 qbuf, rbuf,
1036                 samr_io_q_del_aliasmem,
1037                 samr_io_r_del_aliasmem,
1038                 NT_STATUS_UNSUCCESSFUL); 
1039
1040         result = r.status;
1041
1042         return result;
1043 }
1044
1045 /* Query alias info */
1046
1047 NTSTATUS rpccli_samr_query_alias_info(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx,
1048                                    POLICY_HND *alias_pol, uint16 switch_value,
1049                                    ALIAS_INFO_CTR *ctr)
1050 {
1051         prs_struct qbuf, rbuf;
1052         SAMR_Q_QUERY_ALIASINFO q;
1053         SAMR_R_QUERY_ALIASINFO r;
1054         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1055
1056         DEBUG(10,("cli_samr_query_alias_info\n"));
1057
1058         ZERO_STRUCT(q);
1059         ZERO_STRUCT(r);
1060
1061         /* Marshall data and send request */
1062
1063         init_samr_q_query_aliasinfo(&q, alias_pol, switch_value);
1064
1065         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_QUERY_ALIASINFO,
1066                 q, r,
1067                 qbuf, rbuf,
1068                 samr_io_q_query_aliasinfo,
1069                 samr_io_r_query_aliasinfo,
1070                 NT_STATUS_UNSUCCESSFUL); 
1071
1072         /* Return output parameters */
1073
1074         if (!NT_STATUS_IS_OK(result = r.status)) {
1075                 goto done;
1076         }
1077
1078         *ctr = *r.ctr;
1079
1080   done:
1081
1082         return result;
1083 }
1084
1085 /* Query domain info */
1086
1087 NTSTATUS rpccli_samr_query_dom_info(struct rpc_pipe_client *cli,
1088                                     TALLOC_CTX *mem_ctx, 
1089                                     POLICY_HND *domain_pol,
1090                                     uint16 switch_value,
1091                                     SAM_UNK_CTR *ctr)
1092 {
1093         prs_struct qbuf, rbuf;
1094         SAMR_Q_QUERY_DOMAIN_INFO q;
1095         SAMR_R_QUERY_DOMAIN_INFO r;
1096         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1097
1098         DEBUG(10,("cli_samr_query_dom_info\n"));
1099
1100         ZERO_STRUCT(q);
1101         ZERO_STRUCT(r);
1102
1103         /* Marshall data and send request */
1104
1105         init_samr_q_query_dom_info(&q, domain_pol, switch_value);
1106
1107         r.ctr = ctr;
1108
1109         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_QUERY_DOMAIN_INFO,
1110                 q, r,
1111                 qbuf, rbuf,
1112                 samr_io_q_query_dom_info,
1113                 samr_io_r_query_dom_info,
1114                 NT_STATUS_UNSUCCESSFUL); 
1115
1116         /* Return output parameters */
1117
1118         if (!NT_STATUS_IS_OK(result = r.status)) {
1119                 goto done;
1120         }
1121
1122  done:
1123
1124         return result;
1125 }
1126
1127 /* User change password */
1128
1129 NTSTATUS rpccli_samr_chgpasswd_user(struct rpc_pipe_client *cli,
1130                                     TALLOC_CTX *mem_ctx, 
1131                                     const char *username, 
1132                                     const char *newpassword, 
1133                                     const char *oldpassword )
1134 {
1135         prs_struct qbuf, rbuf;
1136         SAMR_Q_CHGPASSWD_USER q;
1137         SAMR_R_CHGPASSWD_USER r;
1138         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1139
1140         uchar new_nt_password[516];
1141         uchar new_lm_password[516];
1142         uchar old_nt_hash[16];
1143         uchar old_lanman_hash[16];
1144         uchar old_nt_hash_enc[16];
1145         uchar old_lanman_hash_enc[16];
1146
1147         uchar new_nt_hash[16];
1148         uchar new_lanman_hash[16];
1149
1150         char *srv_name_slash = talloc_asprintf(mem_ctx, "\\\\%s", cli->cli->desthost);
1151
1152         DEBUG(10,("rpccli_samr_chgpasswd_user\n"));
1153
1154         ZERO_STRUCT(q);
1155         ZERO_STRUCT(r);
1156
1157         /* Calculate the MD4 hash (NT compatible) of the password */
1158         E_md4hash(oldpassword, old_nt_hash);
1159         E_md4hash(newpassword, new_nt_hash);
1160
1161         if (lp_client_lanman_auth() 
1162             && E_deshash(newpassword, new_lanman_hash) 
1163             && E_deshash(oldpassword, old_lanman_hash)) {
1164                 /* E_deshash returns false for 'long' passwords (> 14
1165                    DOS chars).  This allows us to match Win2k, which
1166                    does not store a LM hash for these passwords (which
1167                    would reduce the effective password length to 14) */
1168
1169                 encode_pw_buffer(new_lm_password, newpassword, STR_UNICODE);
1170
1171                 SamOEMhash( new_lm_password, old_nt_hash, 516);
1172                 E_old_pw_hash( new_nt_hash, old_lanman_hash, old_lanman_hash_enc);
1173         } else {
1174                 ZERO_STRUCT(new_lm_password);
1175                 ZERO_STRUCT(old_lanman_hash_enc);
1176         }
1177
1178         encode_pw_buffer(new_nt_password, newpassword, STR_UNICODE);
1179         
1180         SamOEMhash( new_nt_password, old_nt_hash, 516);
1181         E_old_pw_hash( new_nt_hash, old_nt_hash, old_nt_hash_enc);
1182
1183         /* Marshall data and send request */
1184
1185         init_samr_q_chgpasswd_user(&q, srv_name_slash, username, 
1186                                    new_nt_password, 
1187                                    old_nt_hash_enc, 
1188                                    new_lm_password,
1189                                    old_lanman_hash_enc);
1190
1191         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_CHGPASSWD_USER,
1192                 q, r,
1193                 qbuf, rbuf,
1194                 samr_io_q_chgpasswd_user,
1195                 samr_io_r_chgpasswd_user,
1196                 NT_STATUS_UNSUCCESSFUL); 
1197
1198         /* Return output parameters */
1199
1200         if (!NT_STATUS_IS_OK(result = r.status)) {
1201                 goto done;
1202         }
1203
1204  done:
1205
1206         return result;
1207 }
1208
1209 /* change password 3 */
1210
1211 NTSTATUS rpccli_samr_chgpasswd3(struct rpc_pipe_client *cli,
1212                                 TALLOC_CTX *mem_ctx, 
1213                                 const char *username, 
1214                                 const char *newpassword, 
1215                                 const char *oldpassword,
1216                                 SAM_UNK_INFO_1 **info,
1217                                 SAMR_CHANGE_REJECT **reject)
1218 {
1219         prs_struct qbuf, rbuf;
1220         SAMR_Q_CHGPASSWD3 q;
1221         SAMR_R_CHGPASSWD3 r;
1222         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1223
1224         uchar new_nt_password[516];
1225         uchar new_lm_password[516];
1226         uchar old_nt_hash[16];
1227         uchar old_lanman_hash[16];
1228         uchar old_nt_hash_enc[16];
1229         uchar old_lanman_hash_enc[16];
1230
1231         uchar new_nt_hash[16];
1232         uchar new_lanman_hash[16];
1233
1234         char *srv_name_slash = talloc_asprintf(mem_ctx, "\\\\%s", cli->cli->desthost);
1235
1236         DEBUG(10,("rpccli_samr_chgpasswd3\n"));
1237
1238         ZERO_STRUCT(q);
1239         ZERO_STRUCT(r);
1240
1241         *info = NULL;
1242         *reject = NULL;
1243
1244         /* Calculate the MD4 hash (NT compatible) of the password */
1245         E_md4hash(oldpassword, old_nt_hash);
1246         E_md4hash(newpassword, new_nt_hash);
1247
1248         if (lp_client_lanman_auth() 
1249             && E_deshash(newpassword, new_lanman_hash) 
1250             && E_deshash(oldpassword, old_lanman_hash)) {
1251                 /* E_deshash returns false for 'long' passwords (> 14
1252                    DOS chars).  This allows us to match Win2k, which
1253                    does not store a LM hash for these passwords (which
1254                    would reduce the effective password length to 14) */
1255
1256                 encode_pw_buffer(new_lm_password, newpassword, STR_UNICODE);
1257
1258                 SamOEMhash( new_lm_password, old_nt_hash, 516);
1259                 E_old_pw_hash( new_nt_hash, old_lanman_hash, old_lanman_hash_enc);
1260         } else {
1261                 ZERO_STRUCT(new_lm_password);
1262                 ZERO_STRUCT(old_lanman_hash_enc);
1263         }
1264
1265         encode_pw_buffer(new_nt_password, newpassword, STR_UNICODE);
1266         
1267         SamOEMhash( new_nt_password, old_nt_hash, 516);
1268         E_old_pw_hash( new_nt_hash, old_nt_hash, old_nt_hash_enc);
1269
1270         /* Marshall data and send request */
1271
1272         init_samr_q_chgpasswd3(&q, srv_name_slash, username, 
1273                                new_nt_password, 
1274                                old_nt_hash_enc, 
1275                                new_lm_password,
1276                                old_lanman_hash_enc);
1277
1278         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_CHGPASSWD3,
1279                 q, r,
1280                 qbuf, rbuf,
1281                 samr_io_q_chgpasswd3,
1282                 samr_io_r_chgpasswd3,
1283                 NT_STATUS_UNSUCCESSFUL); 
1284
1285         /* Return output parameters */
1286
1287         if (!NT_STATUS_IS_OK(result = r.status)) {
1288                 *info = &r.info;
1289                 *reject = &r.reject;
1290                 goto done;
1291         }
1292
1293  done:
1294
1295         return result;
1296 }
1297
1298 /* This function returns the bizzare set of (max_entries, max_size) required
1299    for the QueryDisplayInfo RPC to actually work against a domain controller
1300    with large (10k and higher) numbers of users.  These values were 
1301    obtained by inspection using ethereal and NT4 running User Manager. */
1302
1303 void get_query_dispinfo_params(int loop_count, uint32 *max_entries,
1304                                uint32 *max_size)
1305 {
1306         switch(loop_count) {
1307         case 0:
1308                 *max_entries = 512;
1309                 *max_size = 16383;
1310                 break;
1311         case 1:
1312                 *max_entries = 1024;
1313                 *max_size = 32766;
1314                 break;
1315         case 2:
1316                 *max_entries = 2048;
1317                 *max_size = 65532;
1318                 break;
1319         case 3:
1320                 *max_entries = 4096;
1321                 *max_size = 131064;
1322                 break;
1323         default:              /* loop_count >= 4 */
1324                 *max_entries = 4096;
1325                 *max_size = 131071;
1326                 break;
1327         }
1328 }                    
1329
1330 /* Query display info */
1331
1332 NTSTATUS rpccli_samr_query_dispinfo(struct rpc_pipe_client *cli,
1333                                     TALLOC_CTX *mem_ctx, 
1334                                     POLICY_HND *domain_pol, uint32 *start_idx,
1335                                     uint16 switch_value, uint32 *num_entries,
1336                                     uint32 max_entries, uint32 max_size,
1337                                     SAM_DISPINFO_CTR *ctr)
1338 {
1339         prs_struct qbuf, rbuf;
1340         SAMR_Q_QUERY_DISPINFO q;
1341         SAMR_R_QUERY_DISPINFO r;
1342         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1343
1344         DEBUG(10,("cli_samr_query_dispinfo for start_idx = %u\n", *start_idx));
1345
1346         ZERO_STRUCT(q);
1347         ZERO_STRUCT(r);
1348
1349         *num_entries = 0;
1350
1351         /* Marshall data and send request */
1352
1353         init_samr_q_query_dispinfo(&q, domain_pol, switch_value,
1354                                    *start_idx, max_entries, max_size);
1355
1356         r.ctr = ctr;
1357
1358         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_QUERY_DISPINFO,
1359                 q, r,
1360                 qbuf, rbuf,
1361                 samr_io_q_query_dispinfo,
1362                 samr_io_r_query_dispinfo,
1363                 NT_STATUS_UNSUCCESSFUL); 
1364
1365         /* Return output parameters */
1366
1367         result = r.status;
1368
1369         if (!NT_STATUS_IS_OK(result) &&
1370             NT_STATUS_V(result) != NT_STATUS_V(STATUS_MORE_ENTRIES)) {
1371                 goto done;
1372         }
1373
1374         *num_entries = r.num_entries;
1375         *start_idx += r.num_entries;  /* No next_idx in this structure! */
1376
1377  done:
1378         return result;
1379 }
1380
1381 /* Lookup rids.  Note that NT4 seems to crash if more than ~1000 rids are
1382    looked up in one packet. */
1383
1384 NTSTATUS rpccli_samr_lookup_rids(struct rpc_pipe_client *cli,
1385                                  TALLOC_CTX *mem_ctx, 
1386                                  POLICY_HND *domain_pol,
1387                                  uint32 num_rids, uint32 *rids, 
1388                                  uint32 *num_names, char ***names,
1389                                  uint32 **name_types)
1390 {
1391         prs_struct qbuf, rbuf;
1392         SAMR_Q_LOOKUP_RIDS q;
1393         SAMR_R_LOOKUP_RIDS r;
1394         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1395         uint32 i;
1396
1397         DEBUG(10,("cli_samr_lookup_rids\n"));
1398
1399         if (num_rids > 1000) {
1400                 DEBUG(2, ("cli_samr_lookup_rids: warning: NT4 can crash if "
1401                           "more than ~1000 rids are looked up at once.\n"));
1402         }
1403
1404         ZERO_STRUCT(q);
1405         ZERO_STRUCT(r);
1406
1407         /* Marshall data and send request */
1408
1409         init_samr_q_lookup_rids(mem_ctx, &q, domain_pol, 1000, num_rids, rids);
1410
1411         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_LOOKUP_RIDS,
1412                 q, r,
1413                 qbuf, rbuf,
1414                 samr_io_q_lookup_rids,
1415                 samr_io_r_lookup_rids,
1416                 NT_STATUS_UNSUCCESSFUL); 
1417
1418         /* Return output parameters */
1419
1420         result = r.status;
1421
1422         if (!NT_STATUS_IS_OK(result) &&
1423             !NT_STATUS_EQUAL(result, STATUS_SOME_UNMAPPED))
1424                 goto done;
1425
1426         if (r.num_names1 == 0) {
1427                 *num_names = 0;
1428                 *names = NULL;
1429                 goto done;
1430         }
1431
1432         *num_names = r.num_names1;
1433         *names = TALLOC_ARRAY(mem_ctx, char *, r.num_names1);
1434         *name_types = TALLOC_ARRAY(mem_ctx, uint32, r.num_names1);
1435
1436         for (i = 0; i < r.num_names1; i++) {
1437                 fstring tmp;
1438
1439                 unistr2_to_ascii(tmp, &r.uni_name[i], sizeof(tmp) - 1);
1440                 (*names)[i] = talloc_strdup(mem_ctx, tmp);
1441                 (*name_types)[i] = r.type[i];
1442         }
1443
1444  done:
1445
1446         return result;
1447 }
1448
1449 /* Lookup names */
1450
1451 NTSTATUS rpccli_samr_lookup_names(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx, 
1452                                POLICY_HND *domain_pol, uint32 flags,
1453                                uint32 num_names, const char **names,
1454                                uint32 *num_rids, uint32 **rids,
1455                                uint32 **rid_types)
1456 {
1457         prs_struct qbuf, rbuf;
1458         SAMR_Q_LOOKUP_NAMES q;
1459         SAMR_R_LOOKUP_NAMES r;
1460         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1461         uint32 i;
1462
1463         DEBUG(10,("cli_samr_lookup_names\n"));
1464
1465         ZERO_STRUCT(q);
1466         ZERO_STRUCT(r);
1467
1468         /* Marshall data and send request */
1469
1470         init_samr_q_lookup_names(mem_ctx, &q, domain_pol, flags,
1471                                  num_names, names);
1472
1473         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_LOOKUP_NAMES,
1474                 q, r,
1475                 qbuf, rbuf,
1476                 samr_io_q_lookup_names,
1477                 samr_io_r_lookup_names,
1478                 NT_STATUS_UNSUCCESSFUL); 
1479
1480         /* Return output parameters */
1481
1482         if (!NT_STATUS_IS_OK(result = r.status)) {
1483                 goto done;
1484         }
1485
1486         if (r.num_rids1 == 0) {
1487                 *num_rids = 0;
1488                 goto done;
1489         }
1490
1491         *num_rids = r.num_rids1;
1492         *rids = TALLOC_ARRAY(mem_ctx, uint32, r.num_rids1);
1493         *rid_types = TALLOC_ARRAY(mem_ctx, uint32, r.num_rids1);
1494
1495         for (i = 0; i < r.num_rids1; i++) {
1496                 (*rids)[i] = r.rids[i];
1497                 (*rid_types)[i] = r.types[i];
1498         }
1499
1500  done:
1501
1502         return result;
1503 }
1504
1505 /* Create a domain user */
1506
1507 NTSTATUS rpccli_samr_create_dom_user(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx, 
1508                                   POLICY_HND *domain_pol, const char *acct_name,
1509                                   uint32 acb_info, uint32 unknown, 
1510                                   POLICY_HND *user_pol, uint32 *rid)
1511 {
1512         prs_struct qbuf, rbuf;
1513         SAMR_Q_CREATE_USER q;
1514         SAMR_R_CREATE_USER r;
1515         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1516
1517         DEBUG(10,("cli_samr_create_dom_user %s\n", acct_name));
1518
1519         ZERO_STRUCT(q);
1520         ZERO_STRUCT(r);
1521
1522         /* Marshall data and send request */
1523
1524         init_samr_q_create_user(&q, domain_pol, acct_name, acb_info, unknown);
1525
1526         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_CREATE_USER,
1527                 q, r,
1528                 qbuf, rbuf,
1529                 samr_io_q_create_user,
1530                 samr_io_r_create_user,
1531                 NT_STATUS_UNSUCCESSFUL); 
1532
1533         /* Return output parameters */
1534
1535         if (!NT_STATUS_IS_OK(result = r.status)) {
1536                 goto done;
1537         }
1538
1539         if (user_pol)
1540                 *user_pol = r.user_pol;
1541
1542         if (rid)
1543                 *rid = r.user_rid;
1544
1545  done:
1546
1547         return result;
1548 }
1549
1550 /* Set userinfo */
1551
1552 NTSTATUS rpccli_samr_set_userinfo(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx, 
1553                                const POLICY_HND *user_pol, uint16 switch_value,
1554                                DATA_BLOB *sess_key, SAM_USERINFO_CTR *ctr)
1555 {
1556         prs_struct qbuf, rbuf;
1557         SAMR_Q_SET_USERINFO q;
1558         SAMR_R_SET_USERINFO r;
1559         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1560
1561         DEBUG(10,("cli_samr_set_userinfo\n"));
1562
1563         ZERO_STRUCT(q);
1564         ZERO_STRUCT(r);
1565
1566         if (!sess_key->length) {
1567                 DEBUG(1, ("No user session key\n"));
1568                 return NT_STATUS_NO_USER_SESSION_KEY;
1569         }
1570
1571         /* Initialise parse structures */
1572
1573         prs_init(&qbuf, RPC_MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
1574         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
1575
1576         /* Marshall data and send request */
1577
1578         q.ctr = ctr;
1579
1580         init_samr_q_set_userinfo(&q, user_pol, sess_key, switch_value, 
1581                                  ctr->info.id);
1582
1583         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_SET_USERINFO,
1584                 q, r,
1585                 qbuf, rbuf,
1586                 samr_io_q_set_userinfo,
1587                 samr_io_r_set_userinfo,
1588                 NT_STATUS_UNSUCCESSFUL); 
1589
1590         /* Return output parameters */
1591
1592         if (!NT_STATUS_IS_OK(result = r.status)) {
1593                 goto done;
1594         }
1595
1596  done:
1597
1598         return result;
1599 }
1600
1601 /* Set userinfo2 */
1602
1603 NTSTATUS rpccli_samr_set_userinfo2(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx, 
1604                                    const POLICY_HND *user_pol, uint16 switch_value,
1605                                 DATA_BLOB *sess_key, SAM_USERINFO_CTR *ctr)
1606 {
1607         prs_struct qbuf, rbuf;
1608         SAMR_Q_SET_USERINFO2 q;
1609         SAMR_R_SET_USERINFO2 r;
1610         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1611
1612         DEBUG(10,("cli_samr_set_userinfo2\n"));
1613
1614         if (!sess_key->length) {
1615                 DEBUG(1, ("No user session key\n"));
1616                 return NT_STATUS_NO_USER_SESSION_KEY;
1617         }
1618
1619         ZERO_STRUCT(q);
1620         ZERO_STRUCT(r);
1621
1622         /* Marshall data and send request */
1623
1624         init_samr_q_set_userinfo2(&q, user_pol, sess_key, switch_value, ctr);
1625
1626         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_SET_USERINFO2,
1627                 q, r,
1628                 qbuf, rbuf,
1629                 samr_io_q_set_userinfo2,
1630                 samr_io_r_set_userinfo2,
1631                 NT_STATUS_UNSUCCESSFUL); 
1632
1633         /* Return output parameters */
1634
1635         if (!NT_STATUS_IS_OK(result = r.status)) {
1636                 goto done;
1637         }
1638
1639  done:
1640
1641         return result;
1642 }
1643
1644 /* Delete domain group */
1645
1646 NTSTATUS rpccli_samr_delete_dom_group(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx, 
1647                                   POLICY_HND *group_pol)
1648 {
1649         prs_struct qbuf, rbuf;
1650         SAMR_Q_DELETE_DOM_GROUP q;
1651         SAMR_R_DELETE_DOM_GROUP r;
1652         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1653
1654         DEBUG(10,("cli_samr_delete_dom_group\n"));
1655
1656         ZERO_STRUCT(q);
1657         ZERO_STRUCT(r);
1658
1659         /* Marshall data and send request */
1660
1661         init_samr_q_delete_dom_group(&q, group_pol);
1662
1663         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_DELETE_DOM_GROUP,
1664                 q, r,
1665                 qbuf, rbuf,
1666                 samr_io_q_delete_dom_group,
1667                 samr_io_r_delete_dom_group,
1668                 NT_STATUS_UNSUCCESSFUL); 
1669
1670         /* Return output parameters */
1671
1672         result = r.status;
1673
1674         return result;
1675 }
1676
1677 /* Delete domain alias */
1678
1679 NTSTATUS rpccli_samr_delete_dom_alias(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx, 
1680                                   POLICY_HND *alias_pol)
1681 {
1682         prs_struct qbuf, rbuf;
1683         SAMR_Q_DELETE_DOM_ALIAS q;
1684         SAMR_R_DELETE_DOM_ALIAS r;
1685         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1686
1687         DEBUG(10,("cli_samr_delete_dom_alias\n"));
1688
1689         ZERO_STRUCT(q);
1690         ZERO_STRUCT(r);
1691
1692         /* Marshall data and send request */
1693
1694         init_samr_q_delete_dom_alias(&q, alias_pol);
1695
1696         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_DELETE_DOM_ALIAS,
1697                 q, r,
1698                 qbuf, rbuf,
1699                 samr_io_q_delete_dom_alias,
1700                 samr_io_r_delete_dom_alias,
1701                 NT_STATUS_UNSUCCESSFUL); 
1702
1703         /* Return output parameters */
1704
1705         result = r.status;
1706
1707         return result;
1708 }
1709
1710 /* Delete domain user */
1711
1712 NTSTATUS rpccli_samr_delete_dom_user(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx, 
1713                                   POLICY_HND *user_pol)
1714 {
1715         prs_struct qbuf, rbuf;
1716         SAMR_Q_DELETE_DOM_USER q;
1717         SAMR_R_DELETE_DOM_USER r;
1718         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1719
1720         DEBUG(10,("cli_samr_delete_dom_user\n"));
1721
1722         ZERO_STRUCT(q);
1723         ZERO_STRUCT(r);
1724
1725         /* Marshall data and send request */
1726
1727         init_samr_q_delete_dom_user(&q, user_pol);
1728
1729         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_DELETE_DOM_USER,
1730                 q, r,
1731                 qbuf, rbuf,
1732                 samr_io_q_delete_dom_user,
1733                 samr_io_r_delete_dom_user,
1734                 NT_STATUS_UNSUCCESSFUL); 
1735
1736         /* Return output parameters */
1737
1738         result = r.status;
1739
1740         return result;
1741 }
1742
1743 /* Remove foreign SID */
1744
1745 NTSTATUS rpccli_samr_remove_sid_foreign_domain(struct rpc_pipe_client *cli, 
1746                                             TALLOC_CTX *mem_ctx, 
1747                                             POLICY_HND *user_pol,
1748                                             DOM_SID *sid)
1749 {
1750         prs_struct qbuf, rbuf;
1751         SAMR_Q_REMOVE_SID_FOREIGN_DOMAIN q;
1752         SAMR_R_REMOVE_SID_FOREIGN_DOMAIN r;
1753         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1754
1755         DEBUG(10,("cli_samr_remove_sid_foreign_domain\n"));
1756
1757         ZERO_STRUCT(q);
1758         ZERO_STRUCT(r);
1759
1760         /* Marshall data and send request */
1761
1762         init_samr_q_remove_sid_foreign_domain(&q, user_pol, sid);
1763
1764         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_REMOVE_SID_FOREIGN_DOMAIN,
1765                 q, r,
1766                 qbuf, rbuf,
1767                 samr_io_q_remove_sid_foreign_domain,
1768                 samr_io_r_remove_sid_foreign_domain,
1769                 NT_STATUS_UNSUCCESSFUL); 
1770
1771         /* Return output parameters */
1772
1773         result = r.status;
1774
1775         return result;
1776 }
1777
1778 /* Query user security object */
1779
1780 NTSTATUS rpccli_samr_query_sec_obj(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx,
1781                                  POLICY_HND *user_pol, uint16 switch_value, 
1782                                  TALLOC_CTX *ctx, SEC_DESC_BUF **sec_desc_buf)
1783 {
1784         prs_struct qbuf, rbuf;
1785         SAMR_Q_QUERY_SEC_OBJ q;
1786         SAMR_R_QUERY_SEC_OBJ r;
1787         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1788
1789         DEBUG(10,("cli_samr_query_sec_obj\n"));
1790
1791         ZERO_STRUCT(q);
1792         ZERO_STRUCT(r);
1793
1794         /* Marshall data and send request */
1795
1796         init_samr_q_query_sec_obj(&q, user_pol, switch_value);
1797
1798         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_QUERY_SEC_OBJECT,
1799                 q, r,
1800                 qbuf, rbuf,
1801                 samr_io_q_query_sec_obj,
1802                 samr_io_r_query_sec_obj,
1803                 NT_STATUS_UNSUCCESSFUL); 
1804
1805         /* Return output parameters */
1806
1807         result = r.status;
1808         *sec_desc_buf=dup_sec_desc_buf(ctx, r.buf);
1809
1810         return result;
1811 }
1812
1813 /* Get domain password info */
1814
1815 NTSTATUS rpccli_samr_get_dom_pwinfo(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx,
1816                                  uint16 *min_pwd_length, uint32 *password_properties)
1817 {
1818         prs_struct qbuf, rbuf;
1819         SAMR_Q_GET_DOM_PWINFO q;
1820         SAMR_R_GET_DOM_PWINFO r;
1821         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1822
1823         DEBUG(10,("cli_samr_get_dom_pwinfo\n"));
1824
1825         ZERO_STRUCT(q);
1826         ZERO_STRUCT(r);
1827
1828         /* Marshall data and send request */
1829
1830         init_samr_q_get_dom_pwinfo(&q, cli->cli->desthost);
1831
1832         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_GET_DOM_PWINFO,
1833                 q, r,
1834                 qbuf, rbuf,
1835                 samr_io_q_get_dom_pwinfo,
1836                 samr_io_r_get_dom_pwinfo,
1837                 NT_STATUS_UNSUCCESSFUL); 
1838
1839         /* Return output parameters */
1840
1841         result = r.status;
1842
1843         if (NT_STATUS_IS_OK(result)) {
1844                 if (min_pwd_length)
1845                         *min_pwd_length = r.min_pwd_length;
1846                 if (password_properties)
1847                         *password_properties = r.password_properties;
1848         }
1849
1850         return result;
1851 }
1852
1853 /* Lookup Domain Name */
1854
1855 NTSTATUS rpccli_samr_lookup_domain(struct rpc_pipe_client *cli, TALLOC_CTX *mem_ctx,
1856                                 POLICY_HND *user_pol, char *domain_name, 
1857                                 DOM_SID *sid)
1858 {
1859         prs_struct qbuf, rbuf;
1860         SAMR_Q_LOOKUP_DOMAIN q;
1861         SAMR_R_LOOKUP_DOMAIN r;
1862         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
1863
1864         DEBUG(10,("cli_samr_lookup_domain\n"));
1865
1866         ZERO_STRUCT(q);
1867         ZERO_STRUCT(r);
1868
1869         /* Marshall data and send request */
1870
1871         init_samr_q_lookup_domain(&q, user_pol, domain_name);
1872
1873         CLI_DO_RPC(cli, mem_ctx, PI_SAMR, SAMR_LOOKUP_DOMAIN,
1874                 q, r,
1875                 qbuf, rbuf,
1876                 samr_io_q_lookup_domain,
1877                 samr_io_r_lookup_domain,
1878                 NT_STATUS_UNSUCCESSFUL); 
1879
1880         /* Return output parameters */
1881
1882         result = r.status;
1883
1884         if (NT_STATUS_IS_OK(result))
1885                 sid_copy(sid, &r.dom_sid.sid);
1886
1887         return result;
1888 }