source: vendor/3.5.2/source4/torture/locktest2.c

Last change on this file was 414, checked in by Herwig Bauernfeind, 16 years ago

Samba 3.5.0: Initial import
File size: 13.7 KB
Line 
1/*
2 Unix SMB/CIFS implementation.
3 byte range lock tester - with local filesystem support
4 Copyright (C) Andrew Tridgell 1999
5
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3 of the License, or
9 (at your option) any later version.
10
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
15
16 You should have received a copy of the GNU General Public License
17 along with this program. If not, see <http://www.gnu.org/licenses/>.
18*/
19
20#include "includes.h"
21#include "system/passwd.h"
22#include "lib/events/events.h"
23
24static fstring password;
25static fstring username;
26static int got_pass;
27static int numops = 1000;
28static bool showall;
29static bool analyze;
30static bool hide_unlock_fails;
31static bool use_oplocks;
32
33#define FILENAME "\\locktest.dat"
34#define LOCKRANGE 100
35#define LOCKBASE 0
36
37/*
38#define LOCKBASE (0x40000000 - 50)
39*/
40
41#define READ_PCT 50
42#define LOCK_PCT 25
43#define UNLOCK_PCT 65
44#define RANGE_MULTIPLE 1
45
46#define NSERVERS 2
47#define NCONNECTIONS 2
48#define NUMFSTYPES 2
49#define NFILES 2
50#define LOCK_TIMEOUT 0
51
52#define FSTYPE_SMB 0
53#define FSTYPE_NFS 1
54
55struct record {
56 char r1, r2;
57 char conn, f, fstype;
58 uint_t start, len;
59 char needed;
60};
61
62static struct record *recorded;
63
64static int try_open(struct smbcli_state *c, char *nfs, int fstype, const char *fname, int flags)
65{
66 char *path;
67 int ret;
68
69 switch (fstype) {
70 case FSTYPE_SMB:
71 return smbcli_open(c, fname, flags, DENY_NONE);
72
73 case FSTYPE_NFS:
74 asprintf(&path, "%s%s", nfs, fname);
75 string_replace(path,'\\', '/');
76 ret = open(path, flags, 0666);
77 SAFE_FREE(Path);
78 return ret;
79 }
80
81 return -1;
82}
83
84static bool try_close(struct smbcli_state *c, int fstype, int fd)
85{
86 switch (fstype) {
87 case FSTYPE_SMB:
88 return smbcli_close(c, fd);
89
90 case FSTYPE_NFS:
91 return close(fd) == 0;
92 }
93
94 return false;
95}
96
97static bool try_lock(struct smbcli_state *c, int fstype,
98 int fd, uint_t start, uint_t len,
99 enum brl_type op)
100{
101 struct flock lock;
102
103 switch (fstype) {
104 case FSTYPE_SMB:
105 return smbcli_lock(c, fd, start, len, LOCK_TIMEOUT, op);
106
107 case FSTYPE_NFS:
108 lock.l_type = (op==READ_LOCK) ? F_RDLCK:F_WRLCK;
109 lock.l_whence = SEEK_SET;
110 lock.l_start = start;
111 lock.l_len = len;
112 lock.l_pid = getpid();
113 return fcntl(fd,F_SETLK,&lock) == 0;
114 }
115
116 return false;
117}
118
119static bool try_unlock(struct smbcli_state *c, int fstype,
120 int fd, uint_t start, uint_t len)
121{
122 struct flock lock;
123
124 switch (fstype) {
125 case FSTYPE_SMB:
126 return smbcli_unlock(c, fd, start, len);
127
128 case FSTYPE_NFS:
129 lock.l_type = F_UNLCK;
130 lock.l_whence = SEEK_SET;
131 lock.l_start = start;
132 lock.l_len = len;
133 lock.l_pid = getpid();
134 return fcntl(fd,F_SETLK,&lock) == 0;
135 }
136
137 return false;
138}
139
140/*****************************************************
141return a connection to a server
142*******************************************************/
143static struct smbcli_state *connect_one(TALLOC_CTX *mem_ctx,
144 char *share, const char **ports,
145 struct smb_options *options,
146 struct smb_options *session_options,
147 struct gensec_settings *gensec_settings,
148 struct tevent_context *ev)
149{
150 struct smbcli_state *c;
151 char *server_n;
152 char *server;
153 char *myname;
154 static int count;
155 NTSTATUS nt_status;
156
157 server = talloc_strdup(mem_ctx, share+2);
158 share = strchr_m(server,'\\');
159 if (!share) return NULL;
160 *share = 0;
161 share++;
162
163 server_n = server;
164
165 if (!got_pass) {
166 char *pass = getpass("Password: ");
167 if (pass) {
168 password = talloc_strdup(mem_ctx, pass);
169 }
170 }
171
172 myname = talloc_asprintf(mem_ctx, "lock-%u-%u", getpid(), count++);
173
174 nt_status = smbcli_full_connection(NULL,
175 &c, myname, server_n, ports, share, NULL,
176 username, lp_workgroup(), password, ev,
177 options, session_options, gensec_settings);
178 if (!NT_STATUS_IS_OK(nt_status)) {
179 DEBUG(0, ("smbcli_full_connection failed with error %s\n", nt_errstr(nt_status)));
180 return NULL;
181 }
182
183 c->use_oplocks = use_oplocks;
184
185 return c;
186}
187
188
189static void reconnect(TALLOC_CTX *mem_ctx,
190 struct smbcli_state *cli[NSERVERS][NCONNECTIONS],
191 char *nfs[NSERVERS],
192 int fnum[NSERVERS][NUMFSTYPES][NCONNECTIONS][NFILES],
193 const char **ports,
194 struct smbcli_options *options,
195 struct smbcli_session_options *session_options,
196 struct gensec_settings *gensec_settings,
197 struct tevent_context *ev,
198 char *share1, char *share2)
199{
200 int server, conn, f, fstype;
201 char *share[2];
202 share[0] = share1;
203 share[1] = share2;
204
205 fstype = FSTYPE_SMB;
206
207 for (server=0;server<NSERVERS;server++)
208 for (conn=0;conn<NCONNECTIONS;conn++) {
209 if (cli[server][conn]) {
210 for (f=0;f<NFILES;f++) {
211 smbcli_close(cli[server][conn], fnum[server][fstype][conn][f]);
212 }
213 smbcli_ulogoff(cli[server][conn]);
214 talloc_free(cli[server][conn]);
215 }
216 cli[server][conn] = connect_one(mem_ctx, share[server], ports, options, session_options, gensec_settings, ev);
217 if (!cli[server][conn]) {
218 DEBUG(0,("Failed to connect to %s\n", share[server]));
219 exit(1);
220 }
221 }
222}
223
224
225
226static bool test_one(struct smbcli_state *cli[NSERVERS][NCONNECTIONS],
227 char *nfs[NSERVERS],
228 int fnum[NSERVERS][NUMFSTYPES][NCONNECTIONS][NFILES],
229 struct record *rec)
230{
231 uint_t conn = rec->conn;
232 uint_t f = rec->f;
233 uint_t fstype = rec->fstype;
234 uint_t start = rec->start;
235 uint_t len = rec->len;
236 uint_t r1 = rec->r1;
237 uint_t r2 = rec->r2;
238 enum brl_type op;
239 int server;
240 bool ret[NSERVERS];
241
242 if (r1 < READ_PCT) {
243 op = READ_LOCK;
244 } else {
245 op = WRITE_LOCK;
246 }
247
248 if (r2 < LOCK_PCT) {
249 /* set a lock */
250 for (server=0;server<NSERVERS;server++) {
251 ret[server] = try_lock(cli[server][conn], fstype,
252 fnum[server][fstype][conn][f],
253 start, len, op);
254 }
255 if (showall || ret[0] != ret[1]) {
256 printf("lock conn=%u fstype=%u f=%u range=%u:%u(%u) op=%s -> %u:%u\n",
257 conn, fstype, f,
258 start, start+len-1, len,
259 op==READ_LOCK?"READ_LOCK":"WRITE_LOCK",
260 ret[0], ret[1]);
261 }
262 if (ret[0] != ret[1]) return false;
263 } else if (r2 < LOCK_PCT+UNLOCK_PCT) {
264 /* unset a lock */
265 for (server=0;server<NSERVERS;server++) {
266 ret[server] = try_unlock(cli[server][conn], fstype,
267 fnum[server][fstype][conn][f],
268 start, len);
269 }
270 if (showall || (!hide_unlock_fails && (ret[0] != ret[1]))) {
271 printf("unlock conn=%u fstype=%u f=%u range=%u:%u(%u) -> %u:%u\n",
272 conn, fstype, f,
273 start, start+len-1, len,
274 ret[0], ret[1]);
275 }
276 if (!hide_unlock_fails && ret[0] != ret[1]) return false;
277 } else {
278 /* reopen the file */
279 for (server=0;server<NSERVERS;server++) {
280 try_close(cli[server][conn], fstype, fnum[server][fstype][conn][f]);
281 fnum[server][fstype][conn][f] = try_open(cli[server][conn], nfs[server], fstype, FILENAME,
282 O_RDWR|O_CREAT);
283 if (fnum[server][fstype][conn][f] == -1) {
284 printf("failed to reopen on share1\n");
285 return false;
286 }
287 }
288 if (showall) {
289 printf("reopen conn=%u fstype=%u f=%u\n",
290 conn, fstype, f);
291 }
292 }
293 return true;
294}
295
296static void close_files(struct smbcli_state *cli[NSERVERS][NCONNECTIONS],
297 char *nfs[NSERVERS],
298 int fnum[NSERVERS][NUMFSTYPES][NCONNECTIONS][NFILES])
299{
300 int server, conn, f, fstype;
301
302 for (server=0;server<NSERVERS;server++)
303 for (fstype=0;fstype<NUMFSTYPES;fstype++)
304 for (conn=0;conn<NCONNECTIONS;conn++)
305 for (f=0;f<NFILES;f++) {
306 if (fnum[server][fstype][conn][f] != -1) {
307 try_close(cli[server][conn], fstype, fnum[server][fstype][conn][f]);
308 fnum[server][fstype][conn][f] = -1;
309 }
310 }
311 for (server=0;server<NSERVERS;server++) {
312 smbcli_unlink(cli[server][0], FILENAME);
313 }
314}
315
316static void open_files(struct smbcli_state *cli[NSERVERS][NCONNECTIONS],
317 char *nfs[NSERVERS],
318 int fnum[NSERVERS][NUMFSTYPES][NCONNECTIONS][NFILES])
319{
320 int server, fstype, conn, f;
321
322 for (server=0;server<NSERVERS;server++)
323 for (fstype=0;fstype<NUMFSTYPES;fstype++)
324 for (conn=0;conn<NCONNECTIONS;conn++)
325 for (f=0;f<NFILES;f++) {
326 fnum[server][fstype][conn][f] = try_open(cli[server][conn], nfs[server], fstype, FILENAME,
327 O_RDWR|O_CREAT);
328 if (fnum[server][fstype][conn][f] == -1) {
329 fprintf(stderr,"Failed to open fnum[%u][%u][%u][%u]\n",
330 server, fstype, conn, f);
331 exit(1);
332 }
333 }
334}
335
336
337static int retest(struct smbcli_state *cli[NSERVERS][NCONNECTIONS],
338 char *nfs[NSERVERS],
339 int fnum[NSERVERS][NUMFSTYPES][NCONNECTIONS][NFILES],
340 int n)
341{
342 int i;
343 printf("testing %u ...\n", n);
344 for (i=0; i<n; i++) {
345 if (i && i % 100 == 0) {
346 printf("%u\n", i);
347 }
348
349 if (recorded[i].needed &&
350 !test_one(cli, nfs, fnum, &recorded[i])) return i;
351 }
352 return n;
353}
354
355
356/* each server has two connections open to it. Each connection has two file
357 descriptors open on the file - 8 file descriptors in total
358
359 we then do random locking ops in tamdem on the 4 fnums from each
360 server and ensure that the results match
361 */
362static void test_locks(TALLOC_CTX *mem_ctx, char *share1, char *share2,
363 char *nfspath1, char *nfspath2,
364 const char **ports,
365 struct smbcli_options *options,
366 struct smbcli_session_options *session_options,
367 struct gensec_settings *gensec_settings,
368 struct tevent_context *ev)
369{
370 struct smbcli_state *cli[NSERVERS][NCONNECTIONS];
371 char *nfs[NSERVERS];
372 int fnum[NSERVERS][NUMFSTYPES][NCONNECTIONS][NFILES];
373 int n, i, n1;
374
375 nfs[0] = nfspath1;
376 nfs[1] = nfspath2;
377
378 ZERO_STRUCT(fnum);
379 ZERO_STRUCT(cli);
380
381 recorded = malloc_array_p(struct record, numops);
382
383 for (n=0; n<numops; n++) {
384 recorded[n].conn = random() % NCONNECTIONS;
385 recorded[n].fstype = random() % NUMFSTYPES;
386 recorded[n].f = random() % NFILES;
387 recorded[n].start = LOCKBASE + ((uint_t)random() % (LOCKRANGE-1));
388 recorded[n].len = 1 +
389 random() % (LOCKRANGE-(recorded[n].start-LOCKBASE));
390 recorded[n].start *= RANGE_MULTIPLE;
391 recorded[n].len *= RANGE_MULTIPLE;
392 recorded[n].r1 = random() % 100;
393 recorded[n].r2 = random() % 100;
394 recorded[n].needed = true;
395 }
396
397 reconnect(mem_ctx, cli, nfs, fnum, ports, options, session_options, gensec_settings, ev, share1, share2);
398 open_files(cli, nfs, fnum);
399 n = retest(cli, nfs, fnum, numops);
400
401 if (n == numops || !analyze) return;
402 n++;
403
404 while (1) {
405 n1 = n;
406
407 close_files(cli, nfs, fnum);
408 reconnect(mem_ctx, cli, nfs, fnum, ports, options, session_options, ev, share1, share2);
409 open_files(cli, nfs, fnum);
410
411 for (i=0;i<n-1;i++) {
412 int m;
413 recorded[i].needed = false;
414
415 close_files(cli, nfs, fnum);
416 open_files(cli, nfs, fnum);
417
418 m = retest(cli, nfs, fnum, n);
419 if (m == n) {
420 recorded[i].needed = true;
421 } else {
422 if (i < m) {
423 memmove(&recorded[i], &recorded[i+1],
424 (m-i)*sizeof(recorded[0]));
425 }
426 n = m;
427 i--;
428 }
429 }
430
431 if (n1 == n) break;
432 }
433
434 close_files(cli, nfs, fnum);
435 reconnect(mem_ctx, cli, nfs, fnum, ports, options, session_options, gensec_settings, ev, share1, share2);
436 open_files(cli, nfs, fnum);
437 showall = true;
438 n1 = retest(cli, nfs, fnum, n);
439 if (n1 != n-1) {
440 printf("ERROR - inconsistent result (%u %u)\n", n1, n);
441 }
442 close_files(cli, nfs, fnum);
443
444 for (i=0;i<n;i++) {
445 printf("{%u, %u, %u, %u, %u, %u, %u, %u},\n",
446 recorded[i].r1,
447 recorded[i].r2,
448 recorded[i].conn,
449 recorded[i].fstype,
450 recorded[i].f,
451 recorded[i].start,
452 recorded[i].len,
453 recorded[i].needed);
454 }
455}
456
457
458
459static void usage(void)
460{
461 printf(
462"Usage:\n\
463 locktest //server1/share1 //server2/share2 /path1 /path2 [options..]\n\
464 options:\n\
465 -U user%%pass\n\
466 -s seed\n\
467 -o numops\n\
468 -u hide unlock fails\n\
469 -a (show all ops)\n\
470 -O use oplocks\n\
471");
472}
473
474/****************************************************************************
475 main program
476****************************************************************************/
477 int main(int argc,char *argv[])
478{
479 char *share1, *share2, *nfspath1, *nfspath2;
480 extern char *optarg;
481 extern int optind;
482 struct smbcli_options options;
483 struct smbcli_session_options session_options;
484 TALLOC_CTX *mem_ctx;
485 int opt;
486 char *p;
487 int seed;
488 struct loadparm_context *lp_ctx;
489 struct tevent_context *ev;
490
491 mem_ctx = talloc_autofree_context();
492
493 setlinebuf(stdout);
494
495 dbf = x_stderr;
496
497 if (argc < 5 || argv[1][0] == '-') {
498 usage();
499 exit(1);
500 }
501
502 share1 = argv[1];
503 share2 = argv[2];
504 nfspath1 = argv[3];
505 nfspath2 = argv[4];
506
507 all_string_sub(share1,"/","\\",0);
508 all_string_sub(share2,"/","\\",0);
509
510 setup_logging(argv[0], DEBUG_STDOUT);
511
512 argc -= 4;
513 argv += 4;
514
515 lp_ctx = loadparm_init(mem_ctx);
516 lp_load(lp_ctx, dyn_CONFIGFILE);
517
518 if (getenv("USER")) {
519 username = talloc_strdup(mem_ctx, getenv("USER"));
520 }
521
522 seed = time(NULL);
523
524 while ((opt = getopt(argc, argv, "U:s:ho:aAW:O")) != EOF) {
525 switch (opt) {
526 case 'U':
527 username = talloc_strdup(mem_ctx, optarg);
528 p = strchr_m(username,'%');
529 if (p) {
530 *p = 0;
531 password = talloc_strdup(mem_ctx, p+1);
532 got_pass = 1;
533 }
534 break;
535 case 's':
536 seed = atoi(optarg);
537 break;
538 case 'u':
539 hide_unlock_fails = true;
540 break;
541 case 'o':
542 numops = atoi(optarg);
543 break;
544 case 'O':
545 use_oplocks = true;
546 break;
547 case 'a':
548 showall = true;
549 break;
550 case 'A':
551 analyze = true;
552 break;
553 case 'h':
554 usage();
555 exit(1);
556 default:
557 printf("Unknown option %c (%d)\n", (char)opt, opt);
558 exit(1);
559 }
560 }
561
562 argc -= optind;
563 argv += optind;
564
565 DEBUG(0,("seed=%u\n", seed));
566 srandom(seed);
567
568 ev = s4_event_context_init(mem_ctx);
569
570 locking_init(1);
571 lp_smbcli_options(lp_ctx, &options);
572 lp_smbcli_session_options(lp_ctx, &session_options);
573 test_locks(mem_ctx, share1, share2, nfspath1, nfspath2,
574 lp_smb_ports(lp_ctx),
575 &options, &session_options, lp_gensec_settings(lp_ctx), ev);
576
577 return(0);
578}
Note: See TracBrowser for help on using the repository browser.