source: trunk/server/source4/torture/rpc/echo.c

Last change on this file was 745, checked in by Silvan Scherrer, 13 years ago

Samba Server: updated trunk to 3.6.0
File size: 13.2 KB
Line 
1/*
2 Unix SMB/CIFS implementation.
3 test suite for echo rpc operations
4
5 Copyright (C) Andrew Tridgell 2003
6 Copyright (C) Stefan (metze) Metzmacher 2005
7 Copyright (C) Jelmer Vernooij 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 3 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, see <http://www.gnu.org/licenses/>.
21*/
22
23#include "includes.h"
24#include "torture/rpc/torture_rpc.h"
25#include "lib/events/events.h"
26#include "librpc/gen_ndr/ndr_echo_c.h"
27
28
29/*
30 test the AddOne interface
31*/
32#define TEST_ADDONE(tctx, value) do { \
33 n = i = value; \
34 r.in.in_data = n; \
35 r.out.out_data = &n; \
36 torture_assert_ntstatus_ok(tctx, dcerpc_echo_AddOne_r(b, tctx, &r), \
37 talloc_asprintf(tctx, "AddOne(%d) failed", i)); \
38 torture_assert (tctx, n == i+1, talloc_asprintf(tctx, "%d + 1 != %u (should be %u)\n", i, n, i+1)); \
39 torture_comment (tctx, "%d + 1 = %u\n", i, n); \
40} while(0)
41
42static bool test_addone(struct torture_context *tctx,
43 struct dcerpc_pipe *p)
44{
45 uint32_t i;
46 uint32_t n;
47 struct echo_AddOne r;
48 struct dcerpc_binding_handle *b = p->binding_handle;
49
50 for (i=0;i<10;i++) {
51 TEST_ADDONE(tctx, i);
52 }
53
54 TEST_ADDONE(tctx, 0x7FFFFFFE);
55 TEST_ADDONE(tctx, 0xFFFFFFFE);
56 TEST_ADDONE(tctx, 0xFFFFFFFF);
57 TEST_ADDONE(tctx, random() & 0xFFFFFFFF);
58 return true;
59}
60
61/*
62 test the EchoData interface
63*/
64static bool test_echodata(struct torture_context *tctx,
65 struct dcerpc_pipe *p)
66{
67 int i;
68 uint8_t *data_in, *data_out;
69 int len;
70 struct echo_EchoData r;
71 struct dcerpc_binding_handle *b = p->binding_handle;
72
73 if (torture_setting_bool(tctx, "quick", false) &&
74 (p->conn->flags & DCERPC_DEBUG_VALIDATE_BOTH)) {
75 len = 1 + (random() % 500);
76 } else {
77 len = 1 + (random() % 5000);
78 }
79
80 data_in = talloc_array(tctx, uint8_t, len);
81 data_out = talloc_array(tctx, uint8_t, len);
82 for (i=0;i<len;i++) {
83 data_in[i] = i;
84 }
85
86 r.in.len = len;
87 r.in.in_data = data_in;
88
89 torture_assert_ntstatus_ok(tctx, dcerpc_echo_EchoData_r(b, tctx, &r),
90 talloc_asprintf(tctx, "EchoData(%d) failed\n", len));
91
92 data_out = r.out.out_data;
93
94 for (i=0;i<len;i++) {
95 if (data_in[i] != data_out[i]) {
96 torture_comment(tctx, "Bad data returned for len %d at offset %d\n",
97 len, i);
98 torture_comment(tctx, "in:\n");
99 dump_data(0, data_in+i, MIN(len-i, 16));
100 torture_comment(tctx, "out:\n");
101 dump_data(0, data_out+i, MIN(len-1, 16));
102 return false;
103 }
104 }
105 return true;
106}
107
108/*
109 test the SourceData interface
110*/
111static bool test_sourcedata(struct torture_context *tctx,
112 struct dcerpc_pipe *p)
113{
114 int i;
115 int len;
116 struct echo_SourceData r;
117 struct dcerpc_binding_handle *b = p->binding_handle;
118
119 if (torture_setting_bool(tctx, "quick", false) &&
120 (p->conn->flags & DCERPC_DEBUG_VALIDATE_BOTH)) {
121 len = 100 + (random() % 500);
122 } else {
123 len = 200000 + (random() % 5000);
124 }
125
126 r.in.len = len;
127
128 torture_assert_ntstatus_ok(tctx, dcerpc_echo_SourceData_r(b, tctx, &r),
129 talloc_asprintf(tctx, "SourceData(%d) failed", len));
130
131 for (i=0;i<len;i++) {
132 uint8_t *v = (uint8_t *)r.out.data;
133 torture_assert(tctx, v[i] == (i & 0xFF),
134 talloc_asprintf(tctx,
135 "bad data 0x%x at %d\n", (uint8_t)r.out.data[i], i));
136 }
137 return true;
138}
139
140/*
141 test the SinkData interface
142*/
143static bool test_sinkdata(struct torture_context *tctx,
144 struct dcerpc_pipe *p)
145{
146 int i;
147 uint8_t *data_in;
148 int len;
149 struct echo_SinkData r;
150 struct dcerpc_binding_handle *b = p->binding_handle;
151
152 if (torture_setting_bool(tctx, "quick", false) &&
153 (p->conn->flags & DCERPC_DEBUG_VALIDATE_BOTH)) {
154 len = 100 + (random() % 5000);
155 } else {
156 len = 200000 + (random() % 5000);
157 }
158
159 data_in = talloc_array(tctx, uint8_t, len);
160 for (i=0;i<len;i++) {
161 data_in[i] = i+1;
162 }
163
164 r.in.len = len;
165 r.in.data = data_in;
166
167 torture_assert_ntstatus_ok(tctx, dcerpc_echo_SinkData_r(b, tctx, &r),
168 talloc_asprintf(tctx, "SinkData(%d) failed", len));
169
170 torture_comment(tctx, "sunk %d bytes\n", len);
171 return true;
172}
173
174
175/*
176 test the testcall interface
177*/
178static bool test_testcall(struct torture_context *tctx,
179 struct dcerpc_pipe *p)
180{
181 struct echo_TestCall r;
182 const char *s = NULL;
183 struct dcerpc_binding_handle *b = p->binding_handle;
184
185 r.in.s1 = "input string";
186 r.out.s2 = &s;
187
188 torture_assert_ntstatus_ok(tctx, dcerpc_echo_TestCall_r(b, tctx, &r),
189 "TestCall failed");
190
191 torture_assert_str_equal(tctx, s, "input string", "Didn't receive back same string");
192
193 return true;
194}
195
196/*
197 test the testcall interface
198*/
199static bool test_testcall2(struct torture_context *tctx,
200 struct dcerpc_pipe *p)
201{
202 struct echo_TestCall2 r;
203 int i;
204 struct dcerpc_binding_handle *b = p->binding_handle;
205
206 for (i=1;i<=7;i++) {
207 r.in.level = i;
208 r.out.info = talloc(tctx, union echo_Info);
209
210 torture_comment(tctx, "Testing TestCall2 level %d\n", i);
211 torture_assert_ntstatus_ok(tctx, dcerpc_echo_TestCall2_r(b, tctx, &r),
212 "TestCall2 failed");
213 torture_assert_ntstatus_ok(tctx, r.out.result, "TestCall2 failed");
214 }
215 return true;
216}
217
218static void test_sleep_done(struct tevent_req *subreq)
219{
220 bool *done1 = (bool *)tevent_req_callback_data_void(subreq);
221 *done1 = true;
222}
223
224/*
225 test the TestSleep interface
226*/
227static bool test_sleep(struct torture_context *tctx,
228 struct dcerpc_pipe *p)
229{
230 int i;
231#define ASYNC_COUNT 3
232 struct tevent_req *req[ASYNC_COUNT];
233 struct echo_TestSleep r[ASYNC_COUNT];
234 bool done1[ASYNC_COUNT];
235 bool done2[ASYNC_COUNT];
236 struct timeval snd[ASYNC_COUNT];
237 struct timeval rcv[ASYNC_COUNT];
238 struct timeval diff[ASYNC_COUNT];
239 struct tevent_context *ctx;
240 int total_done = 0;
241 struct dcerpc_binding_handle *b = p->binding_handle;
242
243 if (torture_setting_bool(tctx, "quick", false)) {
244 torture_skip(tctx, "TestSleep disabled - use \"torture:quick=no\" to enable\n");
245 }
246 torture_comment(tctx, "Testing TestSleep - use \"torture:quick=yes\" to disable\n");
247
248 for (i=0;i<ASYNC_COUNT;i++) {
249 done1[i] = false;
250 done2[i] = false;
251 snd[i] = timeval_current();
252 rcv[i] = timeval_zero();
253 r[i].in.seconds = ASYNC_COUNT-i;
254 req[i] = dcerpc_echo_TestSleep_r_send(tctx, tctx->ev, b, &r[i]);
255 torture_assert(tctx, req[i], "Failed to send async sleep request\n");
256 tevent_req_set_callback(req[i], test_sleep_done, &done1[i]);
257 }
258
259 ctx = dcerpc_event_context(p);
260 while (total_done < ASYNC_COUNT) {
261 torture_assert(tctx, event_loop_once(ctx) == 0,
262 "Event context loop failed");
263 for (i=0;i<ASYNC_COUNT;i++) {
264 if (done2[i] == false && done1[i] == true) {
265 int rounded_tdiff;
266 total_done++;
267 done2[i] = true;
268 rcv[i] = timeval_current();
269 diff[i] = timeval_until(&snd[i], &rcv[i]);
270 rounded_tdiff = (int)(0.5 + diff[i].tv_sec + (1.0e-6*diff[i].tv_usec));
271 torture_comment(tctx, "rounded_tdiff=%d\n", rounded_tdiff);
272 torture_assert_ntstatus_ok(tctx,
273 dcerpc_echo_TestSleep_r_recv(req[i], tctx),
274 talloc_asprintf(tctx, "TestSleep(%d) failed", i));
275 torture_assert(tctx, r[i].out.result == r[i].in.seconds,
276 talloc_asprintf(tctx, "Failed - Asked to sleep for %u seconds (server replied with %u seconds and the reply takes only %u seconds)",
277 r[i].out.result, r[i].in.seconds, (unsigned int)diff[i].tv_sec));
278 torture_assert(tctx, r[i].out.result <= rounded_tdiff,
279 talloc_asprintf(tctx, "Failed - Slept for %u seconds (but reply takes only %u.%06u seconds)",
280 r[i].out.result, (unsigned int)diff[i].tv_sec, (unsigned int)diff[i].tv_usec));
281 if (r[i].out.result+1 == rounded_tdiff) {
282 torture_comment(tctx, "Slept for %u seconds (but reply takes %u.%06u seconds - busy server?)\n",
283 r[i].out.result, (unsigned int)diff[i].tv_sec, (unsigned int)diff[i].tv_usec);
284 } else if (r[i].out.result == rounded_tdiff) {
285 torture_comment(tctx, "Slept for %u seconds (reply takes %u.%06u seconds - ok)\n",
286 r[i].out.result, (unsigned int)diff[i].tv_sec, (unsigned int)diff[i].tv_usec);
287 } else {
288 torture_fail(tctx, talloc_asprintf(tctx,
289 "(Failed) - Not async - Slept for %u seconds (but reply takes %u.%06u seconds)\n",
290 r[i].out.result, (unsigned int)diff[i].tv_sec, (unsigned int)diff[i].tv_usec));
291 }
292 }
293 }
294 }
295 torture_comment(tctx, "\n");
296 return true;
297}
298
299/*
300 test enum handling
301*/
302static bool test_enum(struct torture_context *tctx,
303 struct dcerpc_pipe *p)
304{
305 struct echo_TestEnum r;
306 enum echo_Enum1 v = ECHO_ENUM1;
307 struct echo_Enum2 e2;
308 union echo_Enum3 e3;
309 struct dcerpc_binding_handle *b = p->binding_handle;
310
311 r.in.foo1 = &v;
312 r.in.foo2 = &e2;
313 r.in.foo3 = &e3;
314 r.out.foo1 = &v;
315 r.out.foo2 = &e2;
316 r.out.foo3 = &e3;
317
318 e2.e1 = 76;
319 e2.e2 = ECHO_ENUM1_32;
320 e3.e1 = ECHO_ENUM2;
321
322 torture_assert_ntstatus_ok(tctx, dcerpc_echo_TestEnum_r(b, tctx, &r),
323 "TestEnum failed");
324 return true;
325}
326
327/*
328 test surrounding conformant array handling
329*/
330static bool test_surrounding(struct torture_context *tctx,
331 struct dcerpc_pipe *p)
332{
333 struct echo_TestSurrounding r;
334 struct dcerpc_binding_handle *b = p->binding_handle;
335
336 ZERO_STRUCT(r);
337 r.in.data = talloc(tctx, struct echo_Surrounding);
338
339 r.in.data->x = 20;
340 r.in.data->surrounding = talloc_zero_array(tctx, uint16_t, r.in.data->x);
341
342 r.out.data = talloc(tctx, struct echo_Surrounding);
343
344 torture_assert_ntstatus_ok(tctx, dcerpc_echo_TestSurrounding_r(b, tctx, &r),
345 "TestSurrounding failed");
346
347 torture_assert(tctx, r.out.data->x == 2 * r.in.data->x,
348 "TestSurrounding did not make the array twice as large");
349
350 return true;
351}
352
353/*
354 test multiple levels of pointers
355*/
356static bool test_doublepointer(struct torture_context *tctx,
357 struct dcerpc_pipe *p)
358{
359 struct echo_TestDoublePointer r;
360 uint16_t value = 12;
361 uint16_t *pvalue = &value;
362 uint16_t **ppvalue = &pvalue;
363 struct dcerpc_binding_handle *b = p->binding_handle;
364
365 ZERO_STRUCT(r);
366 r.in.data = &ppvalue;
367
368 torture_assert_ntstatus_ok(tctx, dcerpc_echo_TestDoublePointer_r(b, tctx, &r),
369 "TestDoublePointer failed");
370
371 torture_assert_int_equal(tctx, value, r.out.result,
372 "TestDoublePointer did not return original value");
373 return true;
374}
375
376
377/*
378 test request timeouts
379*/
380#if 0 /* this test needs fixing to work over ncacn_np */
381static bool test_timeout(struct torture_context *tctx,
382 struct dcerpc_pipe *p)
383{
384 NTSTATUS status;
385 struct rpc_request *req;
386 struct echo_TestSleep r;
387 int timeout_saved = p->request_timeout;
388
389 if (torture_setting_bool(tctx, "quick", false)) {
390 torture_skip(tctx, "timeout testing disabled - use \"torture:quick=no\" to enable\n");
391 }
392
393 torture_comment(tctx, "testing request timeouts\n");
394 r.in.seconds = 2;
395 p->request_timeout = 1;
396
397 req = dcerpc_echo_TestSleep_send(p, tctx, &r);
398 if (!req) {
399 torture_comment(tctx, "Failed to send async sleep request\n");
400 goto failed;
401 }
402 req->ignore_timeout = true;
403
404 status = dcerpc_echo_TestSleep_recv(req);
405 torture_assert_ntstatus_equal(tctx, status, NT_STATUS_IO_TIMEOUT,
406 "request should have timed out");
407
408 torture_comment(tctx, "testing request destruction\n");
409 req = dcerpc_echo_TestSleep_send(p, tctx, &r);
410 if (!req) {
411 torture_comment(tctx, "Failed to send async sleep request\n");
412 goto failed;
413 }
414 talloc_free(req);
415
416 req = dcerpc_echo_TestSleep_send(p, tctx, &r);
417 if (!req) {
418 torture_comment(tctx, "Failed to send async sleep request\n");
419 goto failed;
420 }
421 req->ignore_timeout = true;
422 status = dcerpc_echo_TestSleep_recv(req);
423 torture_assert_ntstatus_equal(tctx, status, NT_STATUS_IO_TIMEOUT,
424 "request should have timed out");
425
426 p->request_timeout = timeout_saved;
427
428 return test_addone(tctx, p);
429
430failed:
431 p->request_timeout = timeout_saved;
432 return false;
433}
434#endif
435
436struct torture_suite *torture_rpc_echo(TALLOC_CTX *mem_ctx)
437{
438 struct torture_suite *suite = torture_suite_create(mem_ctx, "echo");
439 struct torture_rpc_tcase *tcase;
440
441 tcase = torture_suite_add_rpc_iface_tcase(suite, "echo",
442 &ndr_table_rpcecho);
443
444 torture_rpc_tcase_add_test(tcase, "addone", test_addone);
445 torture_rpc_tcase_add_test(tcase, "sinkdata", test_sinkdata);
446 torture_rpc_tcase_add_test(tcase, "echodata", test_echodata);
447 torture_rpc_tcase_add_test(tcase, "sourcedata", test_sourcedata);
448 torture_rpc_tcase_add_test(tcase, "testcall", test_testcall);
449 torture_rpc_tcase_add_test(tcase, "testcall2", test_testcall2);
450 torture_rpc_tcase_add_test(tcase, "enum", test_enum);
451 torture_rpc_tcase_add_test(tcase, "surrounding", test_surrounding);
452 torture_rpc_tcase_add_test(tcase, "doublepointer", test_doublepointer);
453 torture_rpc_tcase_add_test(tcase, "sleep", test_sleep);
454#if 0 /* this test needs fixing to work over ncacn_np */
455 torture_rpc_tcase_add_test(tcase, "timeout", test_timeout);
456#endif
457
458 return suite;
459}
Note: See TracBrowser for help on using the repository browser.