Merge branch 'master' of git://git.samba.org/samba into minschema
[samba.git] / source3 / rpc_client / cli_lsarpc.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    Copyright (C) Michael Adam                           2007.
9    Copyright (C) Guenther Deschner                      2008.
10
11    This program is free software; you can redistribute it and/or modify
12    it under the terms of the GNU General Public License as published by
13    the Free Software Foundation; either version 3 of the License, or
14    (at your option) any later version.
15
16    This program is distributed in the hope that it will be useful,
17    but WITHOUT ANY WARRANTY; without even the implied warranty of
18    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19    GNU General Public License for more details.
20
21    You should have received a copy of the GNU General Public License
22    along with this program.  If not, see <http://www.gnu.org/licenses/>.
23 */
24
25 #include "includes.h"
26
27 /** @defgroup lsa LSA - Local Security Architecture
28  *  @ingroup rpc_client
29  *
30  * @{
31  **/
32
33 /**
34  * @file cli_lsarpc.c
35  *
36  * RPC client routines for the LSA RPC pipe.  LSA means "local
37  * security authority", which is half of a password database.
38  **/
39
40 /** Open a LSA policy handle
41  *
42  * @param cli Handle on an initialised SMB connection */
43
44 NTSTATUS rpccli_lsa_open_policy(struct rpc_pipe_client *cli,
45                                 TALLOC_CTX *mem_ctx,
46                                 bool sec_qos, uint32 des_access,
47                                 struct policy_handle *pol)
48 {
49         struct lsa_ObjectAttribute attr;
50         struct lsa_QosInfo qos;
51         uint16_t system_name = '\\';
52
53         ZERO_STRUCT(attr);
54
55         attr.len        = 0x18;
56
57         if (sec_qos) {
58                 qos.len                 = 0xc;
59                 qos.impersonation_level = 2;
60                 qos.context_mode        = 1;
61                 qos.effective_only      = 0;
62
63                 attr.sec_qos            = &qos;
64         }
65
66         return rpccli_lsa_OpenPolicy(cli, mem_ctx,
67                                      &system_name,
68                                      &attr,
69                                      des_access,
70                                      pol);
71 }
72
73 /** Open a LSA policy handle
74   *
75   * @param cli Handle on an initialised SMB connection
76   */
77
78 NTSTATUS rpccli_lsa_open_policy2(struct rpc_pipe_client *cli,
79                                  TALLOC_CTX *mem_ctx, bool sec_qos,
80                                  uint32 des_access, struct policy_handle *pol)
81 {
82         struct lsa_ObjectAttribute attr;
83         struct lsa_QosInfo qos;
84
85         ZERO_STRUCT(attr);
86
87         attr.len        = 0x18;
88
89         if (sec_qos) {
90                 qos.len                 = 0xc;
91                 qos.impersonation_level = 2;
92                 qos.context_mode        = 1;
93                 qos.effective_only      = 0;
94
95                 attr.sec_qos            = &qos;
96         }
97
98         return rpccli_lsa_OpenPolicy2(cli, mem_ctx,
99                                       cli->srv_name_slash,
100                                       &attr,
101                                       des_access,
102                                       pol);
103 }
104
105 /* Lookup a list of sids
106  *
107  * internal version withOUT memory allocation of the target arrays.
108  * this assumes suffciently sized arrays to store domains, names and types. */
109
110 static NTSTATUS rpccli_lsa_lookup_sids_noalloc(struct rpc_pipe_client *cli,
111                                                TALLOC_CTX *mem_ctx,
112                                                struct policy_handle *pol,
113                                                int num_sids,
114                                                const DOM_SID *sids,
115                                                char **domains,
116                                                char **names,
117                                                enum lsa_SidType *types)
118 {
119         NTSTATUS result = NT_STATUS_OK;
120         TALLOC_CTX *tmp_ctx = NULL;
121         int i;
122         struct lsa_SidArray sid_array;
123         struct lsa_RefDomainList *ref_domains = NULL;
124         struct lsa_TransNameArray lsa_names;
125         uint32_t count = 0;
126         uint16_t level = 1;
127
128         ZERO_STRUCT(lsa_names);
129
130         tmp_ctx = talloc_new(mem_ctx);
131         if (!tmp_ctx) {
132                 DEBUG(0, ("rpccli_lsa_lookup_sids_noalloc: out of memory!\n"));
133                 result = NT_STATUS_UNSUCCESSFUL;
134                 goto done;
135         }
136
137         sid_array.num_sids = num_sids;
138         sid_array.sids = TALLOC_ARRAY(mem_ctx, struct lsa_SidPtr, num_sids);
139         if (!sid_array.sids) {
140                 return NT_STATUS_NO_MEMORY;
141         }
142
143         for (i = 0; i<num_sids; i++) {
144                 sid_array.sids[i].sid = sid_dup_talloc(mem_ctx, &sids[i]);
145                 if (!sid_array.sids[i].sid) {
146                         return NT_STATUS_NO_MEMORY;
147                 }
148         }
149
150         result = rpccli_lsa_LookupSids(cli, mem_ctx,
151                                        pol,
152                                        &sid_array,
153                                        &ref_domains,
154                                        &lsa_names,
155                                        level,
156                                        &count);
157
158         DEBUG(10, ("LSA_LOOKUPSIDS returned '%s', mapped count = %d'\n",
159                    nt_errstr(result), count));
160
161         if (!NT_STATUS_IS_OK(result) &&
162             !NT_STATUS_EQUAL(result, NT_STATUS_NONE_MAPPED) &&
163             !NT_STATUS_EQUAL(result, STATUS_SOME_UNMAPPED))
164         {
165                 /* An actual error occured */
166                 goto done;
167         }
168
169         /* Return output parameters */
170
171         if (NT_STATUS_EQUAL(result, NT_STATUS_NONE_MAPPED) ||
172             (count == 0))
173         {
174                 for (i = 0; i < num_sids; i++) {
175                         (names)[i] = NULL;
176                         (domains)[i] = NULL;
177                         (types)[i] = SID_NAME_UNKNOWN;
178                 }
179                 result = NT_STATUS_NONE_MAPPED;
180                 goto done;
181         }
182
183         for (i = 0; i < num_sids; i++) {
184                 const char *name, *dom_name;
185                 uint32_t dom_idx = lsa_names.names[i].sid_index;
186
187                 /* Translate optimised name through domain index array */
188
189                 if (dom_idx != 0xffffffff) {
190
191                         dom_name = ref_domains->domains[dom_idx].name.string;
192                         name = lsa_names.names[i].name.string;
193
194                         if (name) {
195                                 (names)[i] = talloc_strdup(mem_ctx, name);
196                                 if ((names)[i] == NULL) {
197                                         DEBUG(0, ("cli_lsa_lookup_sids_noalloc(): out of memory\n"));
198                                         result = NT_STATUS_UNSUCCESSFUL;
199                                         goto done;
200                                 }
201                         } else {
202                                 (names)[i] = NULL;
203                         }
204                         (domains)[i] = talloc_strdup(mem_ctx, dom_name);
205                         (types)[i] = lsa_names.names[i].sid_type;
206                         if (((domains)[i] == NULL)) {
207                                 DEBUG(0, ("cli_lsa_lookup_sids_noalloc(): out of memory\n"));
208                                 result = NT_STATUS_UNSUCCESSFUL;
209                                 goto done;
210                         }
211
212                 } else {
213                         (names)[i] = NULL;
214                         (domains)[i] = NULL;
215                         (types)[i] = SID_NAME_UNKNOWN;
216                 }
217         }
218
219 done:
220         TALLOC_FREE(tmp_ctx);
221         return result;
222 }
223
224 /* Lookup a list of sids
225  *
226  * do it the right way: there is a limit (of 20480 for w2k3) entries
227  * returned by this call. when the sids list contains more entries,
228  * empty lists are returned. This version of lsa_lookup_sids passes
229  * the list of sids in hunks of LOOKUP_SIDS_HUNK_SIZE to the lsa call. */
230
231 /* This constant defines the limit of how many sids to look up
232  * in one call (maximum). the limit from the server side is
233  * at 20480 for win2k3, but we keep it at a save 1000 for now. */
234 #define LOOKUP_SIDS_HUNK_SIZE 1000
235
236 NTSTATUS rpccli_lsa_lookup_sids(struct rpc_pipe_client *cli,
237                                 TALLOC_CTX *mem_ctx,
238                                 struct policy_handle *pol,
239                                 int num_sids,
240                                 const DOM_SID *sids,
241                                 char ***pdomains,
242                                 char ***pnames,
243                                 enum lsa_SidType **ptypes)
244 {
245         NTSTATUS result = NT_STATUS_OK;
246         int sids_left = 0;
247         int sids_processed = 0;
248         const DOM_SID *hunk_sids = sids;
249         char **hunk_domains;
250         char **hunk_names;
251         enum lsa_SidType *hunk_types;
252         char **domains = NULL;
253         char **names = NULL;
254         enum lsa_SidType *types = NULL;
255
256         if (num_sids) {
257                 if (!(domains = TALLOC_ARRAY(mem_ctx, char *, num_sids))) {
258                         DEBUG(0, ("rpccli_lsa_lookup_sids(): out of memory\n"));
259                         result = NT_STATUS_NO_MEMORY;
260                         goto fail;
261                 }
262
263                 if (!(names = TALLOC_ARRAY(mem_ctx, char *, num_sids))) {
264                         DEBUG(0, ("rpccli_lsa_lookup_sids(): out of memory\n"));
265                         result = NT_STATUS_NO_MEMORY;
266                         goto fail;
267                 }
268
269                 if (!(types = TALLOC_ARRAY(mem_ctx, enum lsa_SidType, num_sids))) {
270                         DEBUG(0, ("rpccli_lsa_lookup_sids(): out of memory\n"));
271                         result = NT_STATUS_NO_MEMORY;
272                         goto fail;
273                 }
274         }
275
276         sids_left = num_sids;
277         hunk_domains = domains;
278         hunk_names = names;
279         hunk_types = types;
280
281         while (sids_left > 0) {
282                 int hunk_num_sids;
283                 NTSTATUS hunk_result = NT_STATUS_OK;
284
285                 hunk_num_sids = ((sids_left > LOOKUP_SIDS_HUNK_SIZE)
286                                 ? LOOKUP_SIDS_HUNK_SIZE
287                                 : sids_left);
288
289                 DEBUG(10, ("rpccli_lsa_lookup_sids: processing items "
290                            "%d -- %d of %d.\n",
291                            sids_processed,
292                            sids_processed + hunk_num_sids - 1,
293                            num_sids));
294
295                 hunk_result = rpccli_lsa_lookup_sids_noalloc(cli,
296                                                              mem_ctx,
297                                                              pol,
298                                                              hunk_num_sids,
299                                                              hunk_sids,
300                                                              hunk_domains,
301                                                              hunk_names,
302                                                              hunk_types);
303
304                 if (!NT_STATUS_IS_OK(hunk_result) &&
305                     !NT_STATUS_EQUAL(hunk_result, STATUS_SOME_UNMAPPED) &&
306                     !NT_STATUS_EQUAL(hunk_result, NT_STATUS_NONE_MAPPED))
307                 {
308                         /* An actual error occured */
309                         result = hunk_result;
310                         goto fail;
311                 }
312
313                 /* adapt overall result */
314                 if (( NT_STATUS_IS_OK(result) &&
315                      !NT_STATUS_IS_OK(hunk_result))
316                     ||
317                     ( NT_STATUS_EQUAL(result, NT_STATUS_NONE_MAPPED) &&
318                      !NT_STATUS_EQUAL(hunk_result, NT_STATUS_NONE_MAPPED)))
319                 {
320                         result = STATUS_SOME_UNMAPPED;
321                 }
322
323                 sids_left -= hunk_num_sids;
324                 sids_processed += hunk_num_sids; /* only used in DEBUG */
325                 hunk_sids += hunk_num_sids;
326                 hunk_domains += hunk_num_sids;
327                 hunk_names += hunk_num_sids;
328                 hunk_types += hunk_num_sids;
329         }
330
331         *pdomains = domains;
332         *pnames = names;
333         *ptypes = types;
334         return result;
335
336 fail:
337         TALLOC_FREE(domains);
338         TALLOC_FREE(names);
339         TALLOC_FREE(types);
340         return result;
341 }
342
343 /** Lookup a list of names */
344
345 NTSTATUS rpccli_lsa_lookup_names(struct rpc_pipe_client *cli,
346                                  TALLOC_CTX *mem_ctx,
347                                  struct policy_handle *pol, int num_names,
348                                  const char **names,
349                                  const char ***dom_names,
350                                  int level,
351                                  DOM_SID **sids,
352                                  enum lsa_SidType **types)
353 {
354         NTSTATUS result;
355         int i;
356         struct lsa_String *lsa_names = NULL;
357         struct lsa_RefDomainList *domains = NULL;
358         struct lsa_TransSidArray sid_array;
359         uint32_t count = 0;
360
361         ZERO_STRUCT(sid_array);
362
363         lsa_names = TALLOC_ARRAY(mem_ctx, struct lsa_String, num_names);
364         if (!lsa_names) {
365                 return NT_STATUS_NO_MEMORY;
366         }
367
368         for (i=0; i<num_names; i++) {
369                 init_lsa_String(&lsa_names[i], names[i]);
370         }
371
372         result = rpccli_lsa_LookupNames(cli, mem_ctx,
373                                         pol,
374                                         num_names,
375                                         lsa_names,
376                                         &domains,
377                                         &sid_array,
378                                         level,
379                                         &count);
380
381         if (!NT_STATUS_IS_OK(result) && NT_STATUS_V(result) !=
382             NT_STATUS_V(STATUS_SOME_UNMAPPED)) {
383
384                 /* An actual error occured */
385
386                 goto done;
387         }
388
389         /* Return output parameters */
390
391         if (count == 0) {
392                 result = NT_STATUS_NONE_MAPPED;
393                 goto done;
394         }
395
396         if (num_names) {
397                 if (!((*sids = TALLOC_ARRAY(mem_ctx, DOM_SID, num_names)))) {
398                         DEBUG(0, ("cli_lsa_lookup_sids(): out of memory\n"));
399                         result = NT_STATUS_NO_MEMORY;
400                         goto done;
401                 }
402
403                 if (!((*types = TALLOC_ARRAY(mem_ctx, enum lsa_SidType, num_names)))) {
404                         DEBUG(0, ("cli_lsa_lookup_sids(): out of memory\n"));
405                         result = NT_STATUS_NO_MEMORY;
406                         goto done;
407                 }
408
409                 if (dom_names != NULL) {
410                         *dom_names = TALLOC_ARRAY(mem_ctx, const char *, num_names);
411                         if (*dom_names == NULL) {
412                                 DEBUG(0, ("cli_lsa_lookup_sids(): out of memory\n"));
413                                 result = NT_STATUS_NO_MEMORY;
414                                 goto done;
415                         }
416                 }
417         } else {
418                 *sids = NULL;
419                 *types = NULL;
420                 if (dom_names != NULL) {
421                         *dom_names = NULL;
422                 }
423         }
424
425         for (i = 0; i < num_names; i++) {
426                 uint32_t dom_idx = sid_array.sids[i].sid_index;
427                 uint32_t dom_rid = sid_array.sids[i].rid;
428                 DOM_SID *sid = &(*sids)[i];
429
430                 /* Translate optimised sid through domain index array */
431
432                 if (dom_idx == 0xffffffff) {
433                         /* Nothing to do, this is unknown */
434                         ZERO_STRUCTP(sid);
435                         (*types)[i] = SID_NAME_UNKNOWN;
436                         continue;
437                 }
438
439                 sid_copy(sid, domains->domains[dom_idx].sid);
440
441                 if (dom_rid != 0xffffffff) {
442                         sid_append_rid(sid, dom_rid);
443                 }
444
445                 (*types)[i] = sid_array.sids[i].sid_type;
446
447                 if (dom_names == NULL) {
448                         continue;
449                 }
450
451                 (*dom_names)[i] = domains->domains[dom_idx].name.string;
452         }
453
454  done:
455
456         return result;
457 }