3791cfbda71b197c66935e0a4c6552397db9b70b
[samba.git] / source4 / torture / libnet / userinfo.c
1 /* 
2    Unix SMB/CIFS implementation.
3    Test suite for libnet calls.
4
5    Copyright (C) Rafal Szczesniak 2005
6    
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 2 of the License, or
10    (at your option) any later version.
11    
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16    
17    You should have received a copy of the GNU General Public License
18    along with this program; if not, write to the Free Software
19    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20 */
21
22 #include "includes.h"
23 #include "libnet/libnet.h"
24 #include "libnet/composite.h"
25 #include "libnet/userinfo.h"
26
27 #define TEST_USERNAME  "libnetuserinfotest"
28
29 static BOOL test_opendomain(struct dcerpc_pipe *p, TALLOC_CTX *mem_ctx,
30                             struct policy_handle *handle, struct lsa_String *domname,
31                             struct dom_sid2 *sid)
32 {
33         NTSTATUS status;
34         struct policy_handle h, domain_handle;
35         struct samr_Connect r1;
36         struct samr_LookupDomain r2;
37         struct samr_OpenDomain r3;
38         
39         printf("connecting\n");
40         
41         r1.in.system_name = 0;
42         r1.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
43         r1.out.connect_handle = &h;
44         
45         status = dcerpc_samr_Connect(p, mem_ctx, &r1);
46         if (!NT_STATUS_IS_OK(status)) {
47                 printf("Connect failed - %s\n", nt_errstr(status));
48                 return False;
49         }
50         
51         r2.in.connect_handle = &h;
52         r2.in.domain_name = domname;
53
54         printf("domain lookup on %s\n", domname->string);
55
56         status = dcerpc_samr_LookupDomain(p, mem_ctx, &r2);
57         if (!NT_STATUS_IS_OK(status)) {
58                 printf("LookupDomain failed - %s\n", nt_errstr(status));
59                 return False;
60         }
61
62         r3.in.connect_handle = &h;
63         r3.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
64         r3.in.sid = r2.out.sid;
65         r3.out.domain_handle = &domain_handle;
66
67         printf("opening domain\n");
68
69         status = dcerpc_samr_OpenDomain(p, mem_ctx, &r3);
70         if (!NT_STATUS_IS_OK(status)) {
71                 printf("OpenDomain failed - %s\n", nt_errstr(status));
72                 return False;
73         } else {
74                 *handle = domain_handle;
75         }
76
77         *sid = *r2.out.sid;
78         return True;
79 }
80
81
82 static BOOL test_cleanup(struct dcerpc_pipe *p, TALLOC_CTX *mem_ctx,
83                          struct policy_handle *domain_handle, const char *username)
84 {
85         NTSTATUS status;
86         struct samr_LookupNames r1;
87         struct samr_OpenUser r2;
88         struct samr_DeleteUser r3;
89         struct lsa_String names[2];
90         uint32_t rid;
91         struct policy_handle user_handle;
92
93         names[0].string = username;
94
95         r1.in.domain_handle  = domain_handle;
96         r1.in.num_names      = 1;
97         r1.in.names          = names;
98         
99         printf("user account lookup '%s'\n", username);
100
101         status = dcerpc_samr_LookupNames(p, mem_ctx, &r1);
102         if (!NT_STATUS_IS_OK(status)) {
103                 printf("LookupNames failed - %s\n", nt_errstr(status));
104                 return False;
105         }
106
107         rid = r1.out.rids.ids[0];
108         
109         r2.in.domain_handle  = domain_handle;
110         r2.in.access_mask    = SEC_FLAG_MAXIMUM_ALLOWED;
111         r2.in.rid            = rid;
112         r2.out.user_handle   = &user_handle;
113
114         printf("opening user account\n");
115
116         status = dcerpc_samr_OpenUser(p, mem_ctx, &r2);
117         if (!NT_STATUS_IS_OK(status)) {
118                 printf("OpenUser failed - %s\n", nt_errstr(status));
119                 return False;
120         }
121
122         r3.in.user_handle  = &user_handle;
123         r3.out.user_handle = &user_handle;
124
125         printf("deleting user account\n");
126         
127         status = dcerpc_samr_DeleteUser(p, mem_ctx, &r3);
128         if (!NT_STATUS_IS_OK(status)) {
129                 printf("DeleteUser failed - %s\n", nt_errstr(status));
130                 return False;
131         }
132         
133         return True;
134 }
135
136
137 static BOOL test_create(struct dcerpc_pipe *p, TALLOC_CTX *mem_ctx,
138                         struct policy_handle *handle, const char *name, uint32_t *rid)
139 {
140         NTSTATUS status;
141         struct lsa_String username;
142         struct samr_CreateUser r;
143         struct policy_handle user_handle;
144         
145         username.string = name;
146         
147         r.in.domain_handle = handle;
148         r.in.account_name  = &username;
149         r.in.access_mask   = SEC_FLAG_MAXIMUM_ALLOWED;
150         r.out.user_handle  = &user_handle;
151         r.out.rid          = rid;
152
153         printf("creating user account %s\n", name);
154
155         status = dcerpc_samr_CreateUser(p, mem_ctx, &r);
156         if (!NT_STATUS_IS_OK(status)) {
157                 printf("CreateUser failed - %s\n", nt_errstr(status));
158
159                 if (NT_STATUS_EQUAL(status, NT_STATUS_USER_EXISTS)) {
160                         printf("User (%s) already exists - attempting to delete and recreate account again\n", name);
161                         if (!test_cleanup(p, mem_ctx, handle, TEST_USERNAME)) {
162                                 return False;
163                         }
164
165                         printf("creating user account\n");
166                         
167                         status = dcerpc_samr_CreateUser(p, mem_ctx, &r);
168                         if (!NT_STATUS_IS_OK(status)) {
169                                 printf("CreateUser failed - %s\n", nt_errstr(status));
170                                 return False;
171                         }
172                         return True;
173                 }
174                 return False;
175         }
176
177         return True;
178 }
179
180
181 static BOOL test_userinfo(struct dcerpc_pipe *p, TALLOC_CTX *mem_ctx,
182                           struct policy_handle *domain_handle,
183                           struct dom_sid2 *domain_sid, const char* user_name,
184                           uint32_t *rid)
185 {
186         NTSTATUS status;
187         struct libnet_rpc_userinfo user;
188         struct dom_sid *user_sid;
189         
190         user_sid = dom_sid_add_rid(mem_ctx, domain_sid, *rid);
191         
192         user.in.domain_handle = *domain_handle;
193         user.in.sid           = dom_sid_string(mem_ctx, user_sid);
194         user.in.level         = 5;       /* this should be extended */
195
196         printf("Testing sync libnet_rpc_userinfo\n");
197         status = libnet_rpc_userinfo(p, mem_ctx, &user);
198         if (!NT_STATUS_IS_OK(status)) {
199                 printf("Failed to call sync libnet_rpc_userinfo - %s\n", nt_errstr(status));
200                 return False;
201         }
202
203         return True;
204 }
205
206
207 static void msg_handler(struct monitor_msg *m)
208 {
209         struct msg_rpc_open_user *msg_open;
210         struct msg_rpc_query_user *msg_query;
211         struct msg_rpc_close_user *msg_close;
212
213         switch (m->type) {
214         case rpc_open_user:
215                 msg_open = (struct msg_rpc_open_user*)m->data;
216                 printf("monitor_msg: user opened (rid=%d, access_mask=0x%08x)\n",
217                        msg_open->rid, msg_open->access_mask);
218                 break;
219         case rpc_query_user:
220                 msg_query = (struct msg_rpc_query_user*)m->data;
221                 printf("monitor_msg: user queried (level=%d)\n", msg_query->level);
222                 break;
223         case rpc_close_user:
224                 msg_close = (struct msg_rpc_close_user*)m->data;
225                 printf("monitor_msg: user closed (rid=%d)\n", msg_close->rid);
226                 break;
227         }
228 }
229
230
231 static BOOL test_userinfo_async(struct dcerpc_pipe *p, TALLOC_CTX *mem_ctx,
232                                 struct policy_handle *domain_handle,
233                                 struct dom_sid2 *domain_sid, const char* user_name,
234                                 uint32_t *rid)
235 {
236         NTSTATUS status;
237         struct composite_context *c;
238         struct libnet_rpc_userinfo user;
239         struct dom_sid *user_sid;
240
241         user_sid = dom_sid_add_rid(mem_ctx, domain_sid, *rid);
242
243         user.in.domain_handle = *domain_handle;
244         user.in.sid           = dom_sid_string(mem_ctx, user_sid);
245         user.in.level         = 10;       /* this should be extended */
246
247         printf("Testing async libnet_rpc_userinfo\n");
248
249         c = libnet_rpc_userinfo_send(p, &user, msg_handler);
250         if (!c) {
251                 printf("Failed to call sync libnet_rpc_userinfo_send\n");
252                 return False;
253         }
254
255         status = libnet_rpc_userinfo_recv(c, mem_ctx, &user);
256         if (!NT_STATUS_IS_OK(status)) {
257                 printf("Calling async libnet_rpc_userinfo failed - %s\n", nt_errstr(status));
258                 return False;
259         }
260
261         return True;
262 }
263
264
265 BOOL torture_userinfo(void)
266 {
267         NTSTATUS status;
268         const char *binding;
269         struct dcerpc_pipe *p;
270         TALLOC_CTX *mem_ctx;
271         BOOL ret = True;
272         struct policy_handle h;
273         struct lsa_String name;
274         struct dom_sid2 sid;
275         uint32_t rid;
276
277         mem_ctx = talloc_init("test_userinfo");
278         binding = lp_parm_string(-1, "torture", "binding");
279
280         status = torture_rpc_connection(mem_ctx, 
281                                         &p,
282                                         &dcerpc_table_samr);
283         
284         if (!NT_STATUS_IS_OK(status)) {
285                 return False;
286         }
287
288         name.string = lp_workgroup();
289
290         /*
291          * Testing synchronous version
292          */
293         if (!test_opendomain(p, mem_ctx, &h, &name, &sid)) {
294                 ret = False;
295                 goto done;
296         }
297
298         if (!test_create(p, mem_ctx, &h, TEST_USERNAME, &rid)) {
299                 ret = False;
300                 goto done;
301         }
302
303         if (!test_userinfo(p, mem_ctx, &h, &sid, TEST_USERNAME, &rid)) {
304                 ret = False;
305                 goto done;
306         }
307
308         if (!test_cleanup(p, mem_ctx, &h, TEST_USERNAME)) {
309                 ret = False;
310                 goto done;
311         }
312
313         /*
314          * Testing asynchronous version and monitor messages
315          */
316         if (!test_opendomain(p, mem_ctx, &h, &name, &sid)) {
317                 ret = False;
318                 goto done;
319         }
320
321         if (!test_create(p, mem_ctx, &h, TEST_USERNAME, &rid)) {
322                 ret = False;
323                 goto done;
324         }
325
326         if (!test_userinfo_async(p, mem_ctx, &h, &sid, TEST_USERNAME, &rid)) {
327                 ret = False;
328                 goto done;
329         }
330
331         if (!test_cleanup(p, mem_ctx, &h, TEST_USERNAME)) {
332                 ret = False;
333                 goto done;
334         }
335
336 done:
337         talloc_free(mem_ctx);
338
339         return ret;
340 }