s3:torture: call fault_setup() to get usage backtraces
[Samba/gebeck_regimport.git] / source3 / torture / torture.c
blobdb18825ddcc51711db2cb3e5de07d1079f30936e
1 /*
2 Unix SMB/CIFS implementation.
3 SMB torture tester
4 Copyright (C) Andrew Tridgell 1997-1998
5 Copyright (C) Jeremy Allison 2009
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 3 of the License, or
10 (at your option) any later version.
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.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>.
21 #include "includes.h"
22 #include "system/shmem.h"
23 #include "wbc_async.h"
24 #include "torture/proto.h"
25 #include "libcli/security/security.h"
26 #include "tldap.h"
27 #include "tldap_util.h"
28 #include "../librpc/gen_ndr/svcctl.h"
29 #include "memcache.h"
30 #include "nsswitch/winbind_client.h"
31 #include "dbwrap/dbwrap.h"
32 #include "dbwrap/dbwrap_open.h"
33 #include "dbwrap/dbwrap_rbt.h"
34 #include "talloc_dict.h"
35 #include "async_smb.h"
36 #include "libsmb/libsmb.h"
37 #include "libsmb/clirap.h"
38 #include "trans2.h"
39 #include "libsmb/nmblib.h"
40 #include "../lib/util/tevent_ntstatus.h"
41 #include "util_tdb.h"
42 #include "../libcli/smb/read_smb.h"
43 #include "../libcli/smb/smbXcli_base.h"
45 extern char *optarg;
46 extern int optind;
48 fstring host, workgroup, share, password, username, myname;
49 static int max_protocol = PROTOCOL_NT1;
50 static const char *sockops="TCP_NODELAY";
51 int torture_nprocs=1;
52 static int port_to_use=0;
53 int torture_numops=100;
54 int torture_blocksize=1024*1024;
55 static int procnum; /* records process count number when forking */
56 static struct cli_state *current_cli;
57 static fstring randomfname;
58 static bool use_oplocks;
59 static bool use_level_II_oplocks;
60 static const char *client_txt = "client_oplocks.txt";
61 static bool disable_spnego;
62 static bool use_kerberos;
63 static bool force_dos_errors;
64 static fstring multishare_conn_fname;
65 static bool use_multishare_conn = False;
66 static bool do_encrypt;
67 static const char *local_path = NULL;
68 static int signing_state = SMB_SIGNING_DEFAULT;
69 char *test_filename;
71 bool torture_showall = False;
73 static double create_procs(bool (*fn)(int), bool *result);
75 /********************************************************************
76 Ensure a connection is encrypted.
77 ********************************************************************/
79 static bool force_cli_encryption(struct cli_state *c,
80 const char *sharename)
82 uint16 major, minor;
83 uint32 caplow, caphigh;
84 NTSTATUS status;
86 if (!SERVER_HAS_UNIX_CIFS(c)) {
87 d_printf("Encryption required and "
88 "server that doesn't support "
89 "UNIX extensions - failing connect\n");
90 return false;
93 status = cli_unix_extensions_version(c, &major, &minor, &caplow,
94 &caphigh);
95 if (!NT_STATUS_IS_OK(status)) {
96 d_printf("Encryption required and "
97 "can't get UNIX CIFS extensions "
98 "version from server: %s\n", nt_errstr(status));
99 return false;
102 if (!(caplow & CIFS_UNIX_TRANSPORT_ENCRYPTION_CAP)) {
103 d_printf("Encryption required and "
104 "share %s doesn't support "
105 "encryption.\n", sharename);
106 return false;
109 if (c->use_kerberos) {
110 status = cli_gss_smb_encryption_start(c);
111 } else {
112 status = cli_raw_ntlm_smb_encryption_start(c,
113 username,
114 password,
115 workgroup);
118 if (!NT_STATUS_IS_OK(status)) {
119 d_printf("Encryption required and "
120 "setup failed with error %s.\n",
121 nt_errstr(status));
122 return false;
125 return true;
129 static struct cli_state *open_nbt_connection(void)
131 struct cli_state *c;
132 NTSTATUS status;
133 int flags = 0;
135 if (disable_spnego) {
136 flags |= CLI_FULL_CONNECTION_DONT_SPNEGO;
139 if (use_oplocks) {
140 flags |= CLI_FULL_CONNECTION_OPLOCKS;
143 if (use_level_II_oplocks) {
144 flags |= CLI_FULL_CONNECTION_LEVEL_II_OPLOCKS;
147 if (use_kerberos) {
148 flags |= CLI_FULL_CONNECTION_USE_KERBEROS;
151 if (force_dos_errors) {
152 flags |= CLI_FULL_CONNECTION_FORCE_DOS_ERRORS;
155 status = cli_connect_nb(host, NULL, port_to_use, 0x20, myname,
156 signing_state, flags, &c);
157 if (!NT_STATUS_IS_OK(status)) {
158 printf("Failed to connect with %s. Error %s\n", host, nt_errstr(status) );
159 return NULL;
162 cli_set_timeout(c, 120000); /* set a really long timeout (2 minutes) */
164 return c;
167 /****************************************************************************
168 Send a corrupt session request. See rfc1002.txt 4.3 and 4.3.2.
169 ****************************************************************************/
171 static bool cli_bad_session_request(int fd,
172 struct nmb_name *calling, struct nmb_name *called)
174 TALLOC_CTX *frame;
175 uint8_t len_buf[4];
176 struct iovec iov[3];
177 ssize_t len;
178 uint8_t *inbuf;
179 int err;
180 bool ret = false;
181 uint8_t message_type;
182 uint8_t error;
183 struct tevent_context *ev;
184 struct tevent_req *req;
186 frame = talloc_stackframe();
188 iov[0].iov_base = len_buf;
189 iov[0].iov_len = sizeof(len_buf);
191 /* put in the destination name */
193 iov[1].iov_base = name_mangle(talloc_tos(), called->name,
194 called->name_type);
195 if (iov[1].iov_base == NULL) {
196 goto fail;
198 iov[1].iov_len = name_len((unsigned char *)iov[1].iov_base,
199 talloc_get_size(iov[1].iov_base));
201 /* and my name */
203 iov[2].iov_base = name_mangle(talloc_tos(), calling->name,
204 calling->name_type);
205 if (iov[2].iov_base == NULL) {
206 goto fail;
208 iov[2].iov_len = name_len((unsigned char *)iov[2].iov_base,
209 talloc_get_size(iov[2].iov_base));
211 /* Deliberately corrupt the name len (first byte) */
212 *((uint8_t *)iov[2].iov_base) = 100;
214 /* send a session request (RFC 1002) */
215 /* setup the packet length
216 * Remove four bytes from the length count, since the length
217 * field in the NBT Session Service header counts the number
218 * of bytes which follow. The cli_send_smb() function knows
219 * about this and accounts for those four bytes.
220 * CRH.
223 _smb_setlen(len_buf, iov[1].iov_len + iov[2].iov_len);
224 SCVAL(len_buf,0,0x81);
226 len = write_data_iov(fd, iov, 3);
227 if (len == -1) {
228 goto fail;
231 ev = samba_tevent_context_init(frame);
232 if (ev == NULL) {
233 goto fail;
235 req = read_smb_send(frame, ev, fd);
236 if (req == NULL) {
237 goto fail;
239 if (!tevent_req_poll(req, ev)) {
240 goto fail;
242 len = read_smb_recv(req, talloc_tos(), &inbuf, &err);
243 if (len == -1) {
244 errno = err;
245 goto fail;
247 TALLOC_FREE(ev);
249 message_type = CVAL(inbuf, 0);
250 if (message_type != 0x83) {
251 d_fprintf(stderr, "Expected msg type 0x83, got 0x%2.2x\n",
252 message_type);
253 goto fail;
256 if (smb_len(inbuf) != 1) {
257 d_fprintf(stderr, "Expected smb_len 1, got %d\n",
258 (int)smb_len(inbuf));
259 goto fail;
262 error = CVAL(inbuf, 4);
263 if (error != 0x82) {
264 d_fprintf(stderr, "Expected error 0x82, got %d\n",
265 (int)error);
266 goto fail;
269 ret = true;
270 fail:
271 TALLOC_FREE(frame);
272 return ret;
275 /* Insert a NULL at the first separator of the given path and return a pointer
276 * to the remainder of the string.
278 static char *
279 terminate_path_at_separator(char * path)
281 char * p;
283 if (!path) {
284 return NULL;
287 if ((p = strchr_m(path, '/'))) {
288 *p = '\0';
289 return p + 1;
292 if ((p = strchr_m(path, '\\'))) {
293 *p = '\0';
294 return p + 1;
297 /* No separator. */
298 return NULL;
302 parse a //server/share type UNC name
304 bool smbcli_parse_unc(const char *unc_name, TALLOC_CTX *mem_ctx,
305 char **hostname, char **sharename)
307 char *p;
309 *hostname = *sharename = NULL;
311 if (strncmp(unc_name, "\\\\", 2) &&
312 strncmp(unc_name, "//", 2)) {
313 return False;
316 *hostname = talloc_strdup(mem_ctx, &unc_name[2]);
317 p = terminate_path_at_separator(*hostname);
319 if (p && *p) {
320 *sharename = talloc_strdup(mem_ctx, p);
321 terminate_path_at_separator(*sharename);
324 if (*hostname && *sharename) {
325 return True;
328 TALLOC_FREE(*hostname);
329 TALLOC_FREE(*sharename);
330 return False;
333 static bool torture_open_connection_share(struct cli_state **c,
334 const char *hostname,
335 const char *sharename)
337 int flags = 0;
338 NTSTATUS status;
340 if (use_kerberos)
341 flags |= CLI_FULL_CONNECTION_USE_KERBEROS;
342 if (use_oplocks)
343 flags |= CLI_FULL_CONNECTION_OPLOCKS;
344 if (use_level_II_oplocks)
345 flags |= CLI_FULL_CONNECTION_LEVEL_II_OPLOCKS;
347 status = cli_full_connection(c, myname,
348 hostname, NULL, port_to_use,
349 sharename, "?????",
350 username, workgroup,
351 password, flags, signing_state);
352 if (!NT_STATUS_IS_OK(status)) {
353 printf("failed to open share connection: //%s/%s port:%d - %s\n",
354 hostname, sharename, port_to_use, nt_errstr(status));
355 return False;
358 cli_set_timeout(*c, 120000); /* set a really long timeout (2 minutes) */
360 if (do_encrypt) {
361 return force_cli_encryption(*c,
362 sharename);
364 return True;
367 bool torture_open_connection(struct cli_state **c, int conn_index)
369 char **unc_list = NULL;
370 int num_unc_names = 0;
371 bool result;
373 if (use_multishare_conn==True) {
374 char *h, *s;
375 unc_list = file_lines_load(multishare_conn_fname, &num_unc_names, 0, NULL);
376 if (!unc_list || num_unc_names <= 0) {
377 printf("Failed to load unc names list from '%s'\n", multishare_conn_fname);
378 exit(1);
381 if (!smbcli_parse_unc(unc_list[conn_index % num_unc_names],
382 NULL, &h, &s)) {
383 printf("Failed to parse UNC name %s\n",
384 unc_list[conn_index % num_unc_names]);
385 TALLOC_FREE(unc_list);
386 exit(1);
389 result = torture_open_connection_share(c, h, s);
391 /* h, s were copied earlier */
392 TALLOC_FREE(unc_list);
393 return result;
396 return torture_open_connection_share(c, host, share);
399 bool torture_init_connection(struct cli_state **pcli)
401 struct cli_state *cli;
403 cli = open_nbt_connection();
404 if (cli == NULL) {
405 return false;
408 *pcli = cli;
409 return true;
412 bool torture_cli_session_setup2(struct cli_state *cli, uint16 *new_vuid)
414 uint16_t old_vuid = cli_state_get_uid(cli);
415 fstring old_user_name;
416 size_t passlen = strlen(password);
417 NTSTATUS status;
418 bool ret;
420 fstrcpy(old_user_name, cli->user_name);
421 cli_state_set_uid(cli, 0);
422 ret = NT_STATUS_IS_OK(cli_session_setup(cli, username,
423 password, passlen,
424 password, passlen,
425 workgroup));
426 *new_vuid = cli_state_get_uid(cli);
427 cli_state_set_uid(cli, old_vuid);
428 status = cli_set_username(cli, old_user_name);
429 if (!NT_STATUS_IS_OK(status)) {
430 return false;
432 return ret;
436 bool torture_close_connection(struct cli_state *c)
438 bool ret = True;
439 NTSTATUS status;
441 status = cli_tdis(c);
442 if (!NT_STATUS_IS_OK(status)) {
443 printf("tdis failed (%s)\n", nt_errstr(status));
444 ret = False;
447 cli_shutdown(c);
449 return ret;
453 /* check if the server produced the expected dos or nt error code */
454 static bool check_both_error(int line, NTSTATUS status,
455 uint8 eclass, uint32 ecode, NTSTATUS nterr)
457 if (NT_STATUS_IS_DOS(status)) {
458 uint8 cclass;
459 uint32 num;
461 /* Check DOS error */
462 cclass = NT_STATUS_DOS_CLASS(status);
463 num = NT_STATUS_DOS_CODE(status);
465 if (eclass != cclass || ecode != num) {
466 printf("unexpected error code class=%d code=%d\n",
467 (int)cclass, (int)num);
468 printf(" expected %d/%d %s (line=%d)\n",
469 (int)eclass, (int)ecode, nt_errstr(nterr), line);
470 return false;
472 } else {
473 /* Check NT error */
474 if (!NT_STATUS_EQUAL(nterr, status)) {
475 printf("unexpected error code %s\n",
476 nt_errstr(status));
477 printf(" expected %s (line=%d)\n",
478 nt_errstr(nterr), line);
479 return false;
483 return true;
487 /* check if the server produced the expected error code */
488 static bool check_error(int line, NTSTATUS status,
489 uint8 eclass, uint32 ecode, NTSTATUS nterr)
491 if (NT_STATUS_IS_DOS(status)) {
492 uint8 cclass;
493 uint32 num;
495 /* Check DOS error */
497 cclass = NT_STATUS_DOS_CLASS(status);
498 num = NT_STATUS_DOS_CODE(status);
500 if (eclass != cclass || ecode != num) {
501 printf("unexpected error code class=%d code=%d\n",
502 (int)cclass, (int)num);
503 printf(" expected %d/%d %s (line=%d)\n",
504 (int)eclass, (int)ecode, nt_errstr(nterr),
505 line);
506 return False;
509 } else {
510 /* Check NT error */
512 if (NT_STATUS_V(nterr) != NT_STATUS_V(status)) {
513 printf("unexpected error code %s\n",
514 nt_errstr(status));
515 printf(" expected %s (line=%d)\n", nt_errstr(nterr),
516 line);
517 return False;
521 return True;
525 static bool wait_lock(struct cli_state *c, int fnum, uint32 offset, uint32 len)
527 NTSTATUS status;
529 status = cli_lock32(c, fnum, offset, len, -1, WRITE_LOCK);
531 while (!NT_STATUS_IS_OK(status)) {
532 if (!check_both_error(__LINE__, status, ERRDOS,
533 ERRlock, NT_STATUS_LOCK_NOT_GRANTED)) {
534 return false;
537 status = cli_lock32(c, fnum, offset, len, -1, WRITE_LOCK);
540 return true;
544 static bool rw_torture(struct cli_state *c)
546 const char *lockfname = "\\torture.lck";
547 fstring fname;
548 uint16_t fnum;
549 uint16_t fnum2;
550 pid_t pid2, pid = getpid();
551 int i, j;
552 char buf[1024];
553 bool correct = True;
554 size_t nread = 0;
555 NTSTATUS status;
557 memset(buf, '\0', sizeof(buf));
559 status = cli_openx(c, lockfname, O_RDWR | O_CREAT | O_EXCL,
560 DENY_NONE, &fnum2);
561 if (!NT_STATUS_IS_OK(status)) {
562 status = cli_openx(c, lockfname, O_RDWR, DENY_NONE, &fnum2);
564 if (!NT_STATUS_IS_OK(status)) {
565 printf("open of %s failed (%s)\n",
566 lockfname, nt_errstr(status));
567 return False;
570 for (i=0;i<torture_numops;i++) {
571 unsigned n = (unsigned)sys_random()%10;
573 if (i % 10 == 0) {
574 printf("%d\r", i); fflush(stdout);
576 slprintf(fname, sizeof(fstring) - 1, "\\torture.%u", n);
578 if (!wait_lock(c, fnum2, n*sizeof(int), sizeof(int))) {
579 return False;
582 status = cli_openx(c, fname, O_RDWR | O_CREAT | O_TRUNC,
583 DENY_ALL, &fnum);
584 if (!NT_STATUS_IS_OK(status)) {
585 printf("open failed (%s)\n", nt_errstr(status));
586 correct = False;
587 break;
590 status = cli_writeall(c, fnum, 0, (uint8_t *)&pid, 0,
591 sizeof(pid), NULL);
592 if (!NT_STATUS_IS_OK(status)) {
593 printf("write failed (%s)\n", nt_errstr(status));
594 correct = False;
597 for (j=0;j<50;j++) {
598 status = cli_writeall(c, fnum, 0, (uint8_t *)buf,
599 sizeof(pid)+(j*sizeof(buf)),
600 sizeof(buf), NULL);
601 if (!NT_STATUS_IS_OK(status)) {
602 printf("write failed (%s)\n",
603 nt_errstr(status));
604 correct = False;
608 pid2 = 0;
610 status = cli_read(c, fnum, (char *)&pid2, 0, sizeof(pid),
611 &nread);
612 if (!NT_STATUS_IS_OK(status)) {
613 printf("read failed (%s)\n", nt_errstr(status));
614 correct = false;
615 } else if (nread != sizeof(pid)) {
616 printf("read/write compare failed: "
617 "recv %ld req %ld\n", (unsigned long)nread,
618 (unsigned long)sizeof(pid));
619 correct = false;
622 if (pid2 != pid) {
623 printf("data corruption!\n");
624 correct = False;
627 status = cli_close(c, fnum);
628 if (!NT_STATUS_IS_OK(status)) {
629 printf("close failed (%s)\n", nt_errstr(status));
630 correct = False;
633 status = cli_unlink(c, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
634 if (!NT_STATUS_IS_OK(status)) {
635 printf("unlink failed (%s)\n", nt_errstr(status));
636 correct = False;
639 status = cli_unlock(c, fnum2, n*sizeof(int), sizeof(int));
640 if (!NT_STATUS_IS_OK(status)) {
641 printf("unlock failed (%s)\n", nt_errstr(status));
642 correct = False;
646 cli_close(c, fnum2);
647 cli_unlink(c, lockfname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
649 printf("%d\n", i);
651 return correct;
654 static bool run_torture(int dummy)
656 struct cli_state *cli;
657 bool ret;
659 cli = current_cli;
661 smbXcli_conn_set_sockopt(cli->conn, sockops);
663 ret = rw_torture(cli);
665 if (!torture_close_connection(cli)) {
666 ret = False;
669 return ret;
672 static bool rw_torture3(struct cli_state *c, char *lockfname)
674 uint16_t fnum = (uint16_t)-1;
675 unsigned int i = 0;
676 char buf[131072];
677 char buf_rd[131072];
678 unsigned count;
679 unsigned countprev = 0;
680 size_t sent = 0;
681 bool correct = True;
682 NTSTATUS status = NT_STATUS_OK;
684 srandom(1);
685 for (i = 0; i < sizeof(buf); i += sizeof(uint32))
687 SIVAL(buf, i, sys_random());
690 if (procnum == 0)
692 status = cli_unlink(
693 c, lockfname,
694 FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
695 if (!NT_STATUS_IS_OK(status)) {
696 printf("unlink failed (%s) (normal, this file should "
697 "not exist)\n", nt_errstr(status));
700 status = cli_openx(c, lockfname, O_RDWR | O_CREAT | O_EXCL,
701 DENY_NONE, &fnum);
702 if (!NT_STATUS_IS_OK(status)) {
703 printf("first open read/write of %s failed (%s)\n",
704 lockfname, nt_errstr(status));
705 return False;
708 else
710 for (i = 0; i < 500 && fnum == (uint16_t)-1; i++)
712 status = cli_openx(c, lockfname, O_RDONLY,
713 DENY_NONE, &fnum);
714 if (!NT_STATUS_IS_OK(status)) {
715 break;
717 smb_msleep(10);
719 if (!NT_STATUS_IS_OK(status)) {
720 printf("second open read-only of %s failed (%s)\n",
721 lockfname, nt_errstr(status));
722 return False;
726 i = 0;
727 for (count = 0; count < sizeof(buf); count += sent)
729 if (count >= countprev) {
730 printf("%d %8d\r", i, count);
731 fflush(stdout);
732 i++;
733 countprev += (sizeof(buf) / 20);
736 if (procnum == 0)
738 sent = ((unsigned)sys_random()%(20))+ 1;
739 if (sent > sizeof(buf) - count)
741 sent = sizeof(buf) - count;
744 status = cli_writeall(c, fnum, 0, (uint8_t *)buf+count,
745 count, sent, NULL);
746 if (!NT_STATUS_IS_OK(status)) {
747 printf("write failed (%s)\n",
748 nt_errstr(status));
749 correct = False;
752 else
754 status = cli_read(c, fnum, buf_rd+count, count,
755 sizeof(buf)-count, &sent);
756 if(!NT_STATUS_IS_OK(status)) {
757 printf("read failed offset:%d size:%ld (%s)\n",
758 count, (unsigned long)sizeof(buf)-count,
759 nt_errstr(status));
760 correct = False;
761 sent = 0;
762 } else if (sent > 0) {
763 if (memcmp(buf_rd+count, buf+count, sent) != 0)
765 printf("read/write compare failed\n");
766 printf("offset: %d req %ld recvd %ld\n", count, (unsigned long)sizeof(buf)-count, (unsigned long)sent);
767 correct = False;
768 break;
775 status = cli_close(c, fnum);
776 if (!NT_STATUS_IS_OK(status)) {
777 printf("close failed (%s)\n", nt_errstr(status));
778 correct = False;
781 return correct;
784 static bool rw_torture2(struct cli_state *c1, struct cli_state *c2)
786 const char *lockfname = "\\torture2.lck";
787 uint16_t fnum1;
788 uint16_t fnum2;
789 int i;
790 char buf[131072];
791 char buf_rd[131072];
792 bool correct = True;
793 size_t bytes_read;
794 NTSTATUS status;
796 status = cli_unlink(c1, lockfname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
797 if (!NT_STATUS_IS_OK(status)) {
798 printf("unlink failed (%s) (normal, this file should not exist)\n", nt_errstr(status));
801 status = cli_openx(c1, lockfname, O_RDWR | O_CREAT | O_EXCL,
802 DENY_NONE, &fnum1);
803 if (!NT_STATUS_IS_OK(status)) {
804 printf("first open read/write of %s failed (%s)\n",
805 lockfname, nt_errstr(status));
806 return False;
809 status = cli_openx(c2, lockfname, O_RDONLY, DENY_NONE, &fnum2);
810 if (!NT_STATUS_IS_OK(status)) {
811 printf("second open read-only of %s failed (%s)\n",
812 lockfname, nt_errstr(status));
813 cli_close(c1, fnum1);
814 return False;
817 for (i = 0; i < torture_numops; i++)
819 size_t buf_size = ((unsigned)sys_random()%(sizeof(buf)-1))+ 1;
820 if (i % 10 == 0) {
821 printf("%d\r", i); fflush(stdout);
824 generate_random_buffer((unsigned char *)buf, buf_size);
826 status = cli_writeall(c1, fnum1, 0, (uint8_t *)buf, 0,
827 buf_size, NULL);
828 if (!NT_STATUS_IS_OK(status)) {
829 printf("write failed (%s)\n", nt_errstr(status));
830 correct = False;
831 break;
834 status = cli_read(c2, fnum2, buf_rd, 0, buf_size, &bytes_read);
835 if(!NT_STATUS_IS_OK(status)) {
836 printf("read failed (%s)\n", nt_errstr(status));
837 correct = false;
838 break;
839 } else if (bytes_read != buf_size) {
840 printf("read failed\n");
841 printf("read %ld, expected %ld\n",
842 (unsigned long)bytes_read,
843 (unsigned long)buf_size);
844 correct = False;
845 break;
848 if (memcmp(buf_rd, buf, buf_size) != 0)
850 printf("read/write compare failed\n");
851 correct = False;
852 break;
856 status = cli_close(c2, fnum2);
857 if (!NT_STATUS_IS_OK(status)) {
858 printf("close failed (%s)\n", nt_errstr(status));
859 correct = False;
862 status = cli_close(c1, fnum1);
863 if (!NT_STATUS_IS_OK(status)) {
864 printf("close failed (%s)\n", nt_errstr(status));
865 correct = False;
868 status = cli_unlink(c1, lockfname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
869 if (!NT_STATUS_IS_OK(status)) {
870 printf("unlink failed (%s)\n", nt_errstr(status));
871 correct = False;
874 return correct;
877 static bool run_readwritetest(int dummy)
879 struct cli_state *cli1, *cli2;
880 bool test1, test2 = False;
882 if (!torture_open_connection(&cli1, 0) || !torture_open_connection(&cli2, 1)) {
883 return False;
885 smbXcli_conn_set_sockopt(cli1->conn, sockops);
886 smbXcli_conn_set_sockopt(cli2->conn, sockops);
888 printf("starting readwritetest\n");
890 test1 = rw_torture2(cli1, cli2);
891 printf("Passed readwritetest v1: %s\n", BOOLSTR(test1));
893 if (test1) {
894 test2 = rw_torture2(cli1, cli1);
895 printf("Passed readwritetest v2: %s\n", BOOLSTR(test2));
898 if (!torture_close_connection(cli1)) {
899 test1 = False;
902 if (!torture_close_connection(cli2)) {
903 test2 = False;
906 return (test1 && test2);
909 static bool run_readwritemulti(int dummy)
911 struct cli_state *cli;
912 bool test;
914 cli = current_cli;
916 smbXcli_conn_set_sockopt(cli->conn, sockops);
918 printf("run_readwritemulti: fname %s\n", randomfname);
919 test = rw_torture3(cli, randomfname);
921 if (!torture_close_connection(cli)) {
922 test = False;
925 return test;
928 static bool run_readwritelarge_internal(void)
930 static struct cli_state *cli1;
931 uint16_t fnum1;
932 const char *lockfname = "\\large.dat";
933 off_t fsize;
934 char buf[126*1024];
935 bool correct = True;
936 NTSTATUS status;
938 if (!torture_open_connection(&cli1, 0)) {
939 return False;
941 smbXcli_conn_set_sockopt(cli1->conn, sockops);
942 memset(buf,'\0',sizeof(buf));
944 printf("starting readwritelarge_internal\n");
946 cli_unlink(cli1, lockfname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
948 status = cli_openx(cli1, lockfname, O_RDWR | O_CREAT | O_EXCL,
949 DENY_NONE, &fnum1);
950 if (!NT_STATUS_IS_OK(status)) {
951 printf("open read/write of %s failed (%s)\n", lockfname, nt_errstr(status));
952 return False;
955 cli_writeall(cli1, fnum1, 0, (uint8_t *)buf, 0, sizeof(buf), NULL);
957 status = cli_qfileinfo_basic(cli1, fnum1, NULL, &fsize, NULL, NULL,
958 NULL, NULL, NULL);
959 if (!NT_STATUS_IS_OK(status)) {
960 printf("qfileinfo failed (%s)\n", nt_errstr(status));
961 correct = False;
964 if (fsize == sizeof(buf))
965 printf("readwritelarge_internal test 1 succeeded (size = %lx)\n",
966 (unsigned long)fsize);
967 else {
968 printf("readwritelarge_internal test 1 failed (size = %lx)\n",
969 (unsigned long)fsize);
970 correct = False;
973 status = cli_close(cli1, fnum1);
974 if (!NT_STATUS_IS_OK(status)) {
975 printf("close failed (%s)\n", nt_errstr(status));
976 correct = False;
979 status = cli_unlink(cli1, lockfname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
980 if (!NT_STATUS_IS_OK(status)) {
981 printf("unlink failed (%s)\n", nt_errstr(status));
982 correct = False;
985 status = cli_openx(cli1, lockfname, O_RDWR | O_CREAT | O_EXCL,
986 DENY_NONE, &fnum1);
987 if (!NT_STATUS_IS_OK(status)) {
988 printf("open read/write of %s failed (%s)\n", lockfname, nt_errstr(status));
989 return False;
992 cli_smbwrite(cli1, fnum1, buf, 0, sizeof(buf), NULL);
994 status = cli_qfileinfo_basic(cli1, fnum1, NULL, &fsize, NULL, NULL,
995 NULL, NULL, NULL);
996 if (!NT_STATUS_IS_OK(status)) {
997 printf("qfileinfo failed (%s)\n", nt_errstr(status));
998 correct = False;
1001 if (fsize == sizeof(buf))
1002 printf("readwritelarge_internal test 2 succeeded (size = %lx)\n",
1003 (unsigned long)fsize);
1004 else {
1005 printf("readwritelarge_internal test 2 failed (size = %lx)\n",
1006 (unsigned long)fsize);
1007 correct = False;
1010 #if 0
1011 /* ToDo - set allocation. JRA */
1012 if(!cli_set_allocation_size(cli1, fnum1, 0)) {
1013 printf("set allocation size to zero failed (%s)\n", cli_errstr(&cli1));
1014 return False;
1016 if (!cli_qfileinfo_basic(cli1, fnum1, NULL, &fsize, NULL, NULL, NULL,
1017 NULL, NULL)) {
1018 printf("qfileinfo failed (%s)\n", cli_errstr(cli1));
1019 correct = False;
1021 if (fsize != 0)
1022 printf("readwritelarge test 3 (truncate test) succeeded (size = %x)\n", fsize);
1023 #endif
1025 status = cli_close(cli1, fnum1);
1026 if (!NT_STATUS_IS_OK(status)) {
1027 printf("close failed (%s)\n", nt_errstr(status));
1028 correct = False;
1031 if (!torture_close_connection(cli1)) {
1032 correct = False;
1034 return correct;
1037 static bool run_readwritelarge(int dummy)
1039 return run_readwritelarge_internal();
1042 static bool run_readwritelarge_signtest(int dummy)
1044 bool ret;
1045 signing_state = SMB_SIGNING_REQUIRED;
1046 ret = run_readwritelarge_internal();
1047 signing_state = SMB_SIGNING_DEFAULT;
1048 return ret;
1051 int line_count = 0;
1052 int nbio_id;
1054 #define ival(s) strtol(s, NULL, 0)
1056 /* run a test that simulates an approximate netbench client load */
1057 static bool run_netbench(int client)
1059 struct cli_state *cli;
1060 int i;
1061 char line[1024];
1062 char cname[20];
1063 FILE *f;
1064 const char *params[20];
1065 bool correct = True;
1067 cli = current_cli;
1069 nbio_id = client;
1071 smbXcli_conn_set_sockopt(cli->conn, sockops);
1073 nb_setup(cli);
1075 slprintf(cname,sizeof(cname)-1, "client%d", client);
1077 f = fopen(client_txt, "r");
1079 if (!f) {
1080 perror(client_txt);
1081 return False;
1084 while (fgets(line, sizeof(line)-1, f)) {
1085 char *saveptr;
1086 line_count++;
1088 line[strlen(line)-1] = 0;
1090 /* printf("[%d] %s\n", line_count, line); */
1092 all_string_sub(line,"client1", cname, sizeof(line));
1094 /* parse the command parameters */
1095 params[0] = strtok_r(line, " ", &saveptr);
1096 i = 0;
1097 while (params[i]) params[++i] = strtok_r(NULL, " ", &saveptr);
1099 params[i] = "";
1101 if (i < 2) continue;
1103 if (!strncmp(params[0],"SMB", 3)) {
1104 printf("ERROR: You are using a dbench 1 load file\n");
1105 exit(1);
1108 if (!strcmp(params[0],"NTCreateX")) {
1109 nb_createx(params[1], ival(params[2]), ival(params[3]),
1110 ival(params[4]));
1111 } else if (!strcmp(params[0],"Close")) {
1112 nb_close(ival(params[1]));
1113 } else if (!strcmp(params[0],"Rename")) {
1114 nb_rename(params[1], params[2]);
1115 } else if (!strcmp(params[0],"Unlink")) {
1116 nb_unlink(params[1]);
1117 } else if (!strcmp(params[0],"Deltree")) {
1118 nb_deltree(params[1]);
1119 } else if (!strcmp(params[0],"Rmdir")) {
1120 nb_rmdir(params[1]);
1121 } else if (!strcmp(params[0],"QUERY_PATH_INFORMATION")) {
1122 nb_qpathinfo(params[1]);
1123 } else if (!strcmp(params[0],"QUERY_FILE_INFORMATION")) {
1124 nb_qfileinfo(ival(params[1]));
1125 } else if (!strcmp(params[0],"QUERY_FS_INFORMATION")) {
1126 nb_qfsinfo(ival(params[1]));
1127 } else if (!strcmp(params[0],"FIND_FIRST")) {
1128 nb_findfirst(params[1]);
1129 } else if (!strcmp(params[0],"WriteX")) {
1130 nb_writex(ival(params[1]),
1131 ival(params[2]), ival(params[3]), ival(params[4]));
1132 } else if (!strcmp(params[0],"ReadX")) {
1133 nb_readx(ival(params[1]),
1134 ival(params[2]), ival(params[3]), ival(params[4]));
1135 } else if (!strcmp(params[0],"Flush")) {
1136 nb_flush(ival(params[1]));
1137 } else {
1138 printf("Unknown operation %s\n", params[0]);
1139 exit(1);
1142 fclose(f);
1144 nb_cleanup();
1146 if (!torture_close_connection(cli)) {
1147 correct = False;
1150 return correct;
1154 /* run a test that simulates an approximate netbench client load */
1155 static bool run_nbench(int dummy)
1157 double t;
1158 bool correct = True;
1160 nbio_shmem(torture_nprocs);
1162 nbio_id = -1;
1164 signal(SIGALRM, nb_alarm);
1165 alarm(1);
1166 t = create_procs(run_netbench, &correct);
1167 alarm(0);
1169 printf("\nThroughput %g MB/sec\n",
1170 1.0e-6 * nbio_total() / t);
1171 return correct;
1176 This test checks for two things:
1178 1) correct support for retaining locks over a close (ie. the server
1179 must not use posix semantics)
1180 2) support for lock timeouts
1182 static bool run_locktest1(int dummy)
1184 struct cli_state *cli1, *cli2;
1185 const char *fname = "\\lockt1.lck";
1186 uint16_t fnum1, fnum2, fnum3;
1187 time_t t1, t2;
1188 unsigned lock_timeout;
1189 NTSTATUS status;
1191 if (!torture_open_connection(&cli1, 0) || !torture_open_connection(&cli2, 1)) {
1192 return False;
1194 smbXcli_conn_set_sockopt(cli1->conn, sockops);
1195 smbXcli_conn_set_sockopt(cli2->conn, sockops);
1197 printf("starting locktest1\n");
1199 cli_unlink(cli1, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
1201 status = cli_openx(cli1, fname, O_RDWR|O_CREAT|O_EXCL, DENY_NONE,
1202 &fnum1);
1203 if (!NT_STATUS_IS_OK(status)) {
1204 printf("open of %s failed (%s)\n", fname, nt_errstr(status));
1205 return False;
1208 status = cli_openx(cli1, fname, O_RDWR, DENY_NONE, &fnum2);
1209 if (!NT_STATUS_IS_OK(status)) {
1210 printf("open2 of %s failed (%s)\n", fname, nt_errstr(status));
1211 return False;
1214 status = cli_openx(cli2, fname, O_RDWR, DENY_NONE, &fnum3);
1215 if (!NT_STATUS_IS_OK(status)) {
1216 printf("open3 of %s failed (%s)\n", fname, nt_errstr(status));
1217 return False;
1220 status = cli_lock32(cli1, fnum1, 0, 4, 0, WRITE_LOCK);
1221 if (!NT_STATUS_IS_OK(status)) {
1222 printf("lock1 failed (%s)\n", nt_errstr(status));
1223 return false;
1226 status = cli_lock32(cli2, fnum3, 0, 4, 0, WRITE_LOCK);
1227 if (NT_STATUS_IS_OK(status)) {
1228 printf("lock2 succeeded! This is a locking bug\n");
1229 return false;
1230 } else {
1231 if (!check_both_error(__LINE__, status, ERRDOS, ERRlock,
1232 NT_STATUS_LOCK_NOT_GRANTED)) {
1233 return false;
1237 lock_timeout = (1 + (random() % 20));
1238 printf("Testing lock timeout with timeout=%u\n", lock_timeout);
1239 t1 = time(NULL);
1240 status = cli_lock32(cli2, fnum3, 0, 4, lock_timeout * 1000, WRITE_LOCK);
1241 if (NT_STATUS_IS_OK(status)) {
1242 printf("lock3 succeeded! This is a locking bug\n");
1243 return false;
1244 } else {
1245 if (!check_both_error(__LINE__, status, ERRDOS, ERRlock,
1246 NT_STATUS_FILE_LOCK_CONFLICT)) {
1247 return false;
1250 t2 = time(NULL);
1252 if (ABS(t2 - t1) < lock_timeout-1) {
1253 printf("error: This server appears not to support timed lock requests\n");
1256 printf("server slept for %u seconds for a %u second timeout\n",
1257 (unsigned int)(t2-t1), lock_timeout);
1259 status = cli_close(cli1, fnum2);
1260 if (!NT_STATUS_IS_OK(status)) {
1261 printf("close1 failed (%s)\n", nt_errstr(status));
1262 return False;
1265 status = cli_lock32(cli2, fnum3, 0, 4, 0, WRITE_LOCK);
1266 if (NT_STATUS_IS_OK(status)) {
1267 printf("lock4 succeeded! This is a locking bug\n");
1268 return false;
1269 } else {
1270 if (!check_both_error(__LINE__, status, ERRDOS, ERRlock,
1271 NT_STATUS_FILE_LOCK_CONFLICT)) {
1272 return false;
1276 status = cli_close(cli1, fnum1);
1277 if (!NT_STATUS_IS_OK(status)) {
1278 printf("close2 failed (%s)\n", nt_errstr(status));
1279 return False;
1282 status = cli_close(cli2, fnum3);
1283 if (!NT_STATUS_IS_OK(status)) {
1284 printf("close3 failed (%s)\n", nt_errstr(status));
1285 return False;
1288 status = cli_unlink(cli1, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
1289 if (!NT_STATUS_IS_OK(status)) {
1290 printf("unlink failed (%s)\n", nt_errstr(status));
1291 return False;
1295 if (!torture_close_connection(cli1)) {
1296 return False;
1299 if (!torture_close_connection(cli2)) {
1300 return False;
1303 printf("Passed locktest1\n");
1304 return True;
1308 this checks to see if a secondary tconx can use open files from an
1309 earlier tconx
1311 static bool run_tcon_test(int dummy)
1313 static struct cli_state *cli;
1314 const char *fname = "\\tcontest.tmp";
1315 uint16 fnum1;
1316 uint16 cnum1, cnum2, cnum3;
1317 uint16 vuid1, vuid2;
1318 char buf[4];
1319 bool ret = True;
1320 NTSTATUS status;
1322 memset(buf, '\0', sizeof(buf));
1324 if (!torture_open_connection(&cli, 0)) {
1325 return False;
1327 smbXcli_conn_set_sockopt(cli->conn, sockops);
1329 printf("starting tcontest\n");
1331 cli_unlink(cli, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
1333 status = cli_openx(cli, fname, O_RDWR|O_CREAT|O_EXCL, DENY_NONE, &fnum1);
1334 if (!NT_STATUS_IS_OK(status)) {
1335 printf("open of %s failed (%s)\n", fname, nt_errstr(status));
1336 return False;
1339 cnum1 = cli_state_get_tid(cli);
1340 vuid1 = cli_state_get_uid(cli);
1342 status = cli_writeall(cli, fnum1, 0, (uint8_t *)buf, 130, 4, NULL);
1343 if (!NT_STATUS_IS_OK(status)) {
1344 printf("initial write failed (%s)", nt_errstr(status));
1345 return False;
1348 status = cli_tree_connect(cli, share, "?????",
1349 password, strlen(password)+1);
1350 if (!NT_STATUS_IS_OK(status)) {
1351 printf("%s refused 2nd tree connect (%s)\n", host,
1352 nt_errstr(status));
1353 cli_shutdown(cli);
1354 return False;
1357 cnum2 = cli_state_get_tid(cli);
1358 cnum3 = MAX(cnum1, cnum2) + 1; /* any invalid number */
1359 vuid2 = cli_state_get_uid(cli) + 1;
1361 /* try a write with the wrong tid */
1362 cli_state_set_tid(cli, cnum2);
1364 status = cli_writeall(cli, fnum1, 0, (uint8_t *)buf, 130, 4, NULL);
1365 if (NT_STATUS_IS_OK(status)) {
1366 printf("* server allows write with wrong TID\n");
1367 ret = False;
1368 } else {
1369 printf("server fails write with wrong TID : %s\n",
1370 nt_errstr(status));
1374 /* try a write with an invalid tid */
1375 cli_state_set_tid(cli, cnum3);
1377 status = cli_writeall(cli, fnum1, 0, (uint8_t *)buf, 130, 4, NULL);
1378 if (NT_STATUS_IS_OK(status)) {
1379 printf("* server allows write with invalid TID\n");
1380 ret = False;
1381 } else {
1382 printf("server fails write with invalid TID : %s\n",
1383 nt_errstr(status));
1386 /* try a write with an invalid vuid */
1387 cli_state_set_uid(cli, vuid2);
1388 cli_state_set_tid(cli, cnum1);
1390 status = cli_writeall(cli, fnum1, 0, (uint8_t *)buf, 130, 4, NULL);
1391 if (NT_STATUS_IS_OK(status)) {
1392 printf("* server allows write with invalid VUID\n");
1393 ret = False;
1394 } else {
1395 printf("server fails write with invalid VUID : %s\n",
1396 nt_errstr(status));
1399 cli_state_set_tid(cli, cnum1);
1400 cli_state_set_uid(cli, vuid1);
1402 status = cli_close(cli, fnum1);
1403 if (!NT_STATUS_IS_OK(status)) {
1404 printf("close failed (%s)\n", nt_errstr(status));
1405 return False;
1408 cli_state_set_tid(cli, cnum2);
1410 status = cli_tdis(cli);
1411 if (!NT_STATUS_IS_OK(status)) {
1412 printf("secondary tdis failed (%s)\n", nt_errstr(status));
1413 return False;
1416 cli_state_set_tid(cli, cnum1);
1418 if (!torture_close_connection(cli)) {
1419 return False;
1422 return ret;
1427 checks for old style tcon support
1429 static bool run_tcon2_test(int dummy)
1431 static struct cli_state *cli;
1432 uint16 cnum, max_xmit;
1433 char *service;
1434 NTSTATUS status;
1436 if (!torture_open_connection(&cli, 0)) {
1437 return False;
1439 smbXcli_conn_set_sockopt(cli->conn, sockops);
1441 printf("starting tcon2 test\n");
1443 if (asprintf(&service, "\\\\%s\\%s", host, share) == -1) {
1444 return false;
1447 status = cli_raw_tcon(cli, service, password, "?????", &max_xmit, &cnum);
1449 SAFE_FREE(service);
1451 if (!NT_STATUS_IS_OK(status)) {
1452 printf("tcon2 failed : %s\n", nt_errstr(status));
1453 } else {
1454 printf("tcon OK : max_xmit=%d cnum=%d\n",
1455 (int)max_xmit, (int)cnum);
1458 if (!torture_close_connection(cli)) {
1459 return False;
1462 printf("Passed tcon2 test\n");
1463 return True;
1466 static bool tcon_devtest(struct cli_state *cli,
1467 const char *myshare, const char *devtype,
1468 const char *return_devtype,
1469 NTSTATUS expected_error)
1471 NTSTATUS status;
1472 bool ret;
1474 status = cli_tree_connect(cli, myshare, devtype,
1475 password, strlen(password)+1);
1477 if (NT_STATUS_IS_OK(expected_error)) {
1478 if (NT_STATUS_IS_OK(status)) {
1479 if (strcmp(cli->dev, return_devtype) == 0) {
1480 ret = True;
1481 } else {
1482 printf("tconX to share %s with type %s "
1483 "succeeded but returned the wrong "
1484 "device type (got [%s] but should have got [%s])\n",
1485 myshare, devtype, cli->dev, return_devtype);
1486 ret = False;
1488 } else {
1489 printf("tconX to share %s with type %s "
1490 "should have succeeded but failed\n",
1491 myshare, devtype);
1492 ret = False;
1494 cli_tdis(cli);
1495 } else {
1496 if (NT_STATUS_IS_OK(status)) {
1497 printf("tconx to share %s with type %s "
1498 "should have failed but succeeded\n",
1499 myshare, devtype);
1500 ret = False;
1501 } else {
1502 if (NT_STATUS_EQUAL(status, expected_error)) {
1503 ret = True;
1504 } else {
1505 printf("Returned unexpected error\n");
1506 ret = False;
1510 return ret;
1514 checks for correct tconX support
1516 static bool run_tcon_devtype_test(int dummy)
1518 static struct cli_state *cli1 = NULL;
1519 int flags = 0;
1520 NTSTATUS status;
1521 bool ret = True;
1523 status = cli_full_connection(&cli1, myname,
1524 host, NULL, port_to_use,
1525 NULL, NULL,
1526 username, workgroup,
1527 password, flags, signing_state);
1529 if (!NT_STATUS_IS_OK(status)) {
1530 printf("could not open connection\n");
1531 return False;
1534 if (!tcon_devtest(cli1, "IPC$", "A:", NULL, NT_STATUS_BAD_DEVICE_TYPE))
1535 ret = False;
1537 if (!tcon_devtest(cli1, "IPC$", "?????", "IPC", NT_STATUS_OK))
1538 ret = False;
1540 if (!tcon_devtest(cli1, "IPC$", "LPT:", NULL, NT_STATUS_BAD_DEVICE_TYPE))
1541 ret = False;
1543 if (!tcon_devtest(cli1, "IPC$", "IPC", "IPC", NT_STATUS_OK))
1544 ret = False;
1546 if (!tcon_devtest(cli1, "IPC$", "FOOBA", NULL, NT_STATUS_BAD_DEVICE_TYPE))
1547 ret = False;
1549 if (!tcon_devtest(cli1, share, "A:", "A:", NT_STATUS_OK))
1550 ret = False;
1552 if (!tcon_devtest(cli1, share, "?????", "A:", NT_STATUS_OK))
1553 ret = False;
1555 if (!tcon_devtest(cli1, share, "LPT:", NULL, NT_STATUS_BAD_DEVICE_TYPE))
1556 ret = False;
1558 if (!tcon_devtest(cli1, share, "IPC", NULL, NT_STATUS_BAD_DEVICE_TYPE))
1559 ret = False;
1561 if (!tcon_devtest(cli1, share, "FOOBA", NULL, NT_STATUS_BAD_DEVICE_TYPE))
1562 ret = False;
1564 cli_shutdown(cli1);
1566 if (ret)
1567 printf("Passed tcondevtest\n");
1569 return ret;
1574 This test checks that
1576 1) the server supports multiple locking contexts on the one SMB
1577 connection, distinguished by PID.
1579 2) the server correctly fails overlapping locks made by the same PID (this
1580 goes against POSIX behaviour, which is why it is tricky to implement)
1582 3) the server denies unlock requests by an incorrect client PID
1584 static bool run_locktest2(int dummy)
1586 static struct cli_state *cli;
1587 const char *fname = "\\lockt2.lck";
1588 uint16_t fnum1, fnum2, fnum3;
1589 bool correct = True;
1590 NTSTATUS status;
1592 if (!torture_open_connection(&cli, 0)) {
1593 return False;
1596 smbXcli_conn_set_sockopt(cli->conn, sockops);
1598 printf("starting locktest2\n");
1600 cli_unlink(cli, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
1602 cli_setpid(cli, 1);
1604 status = cli_openx(cli, fname, O_RDWR|O_CREAT|O_EXCL, DENY_NONE, &fnum1);
1605 if (!NT_STATUS_IS_OK(status)) {
1606 printf("open of %s failed (%s)\n", fname, nt_errstr(status));
1607 return False;
1610 status = cli_openx(cli, fname, O_RDWR, DENY_NONE, &fnum2);
1611 if (!NT_STATUS_IS_OK(status)) {
1612 printf("open2 of %s failed (%s)\n", fname, nt_errstr(status));
1613 return False;
1616 cli_setpid(cli, 2);
1618 status = cli_openx(cli, fname, O_RDWR, DENY_NONE, &fnum3);
1619 if (!NT_STATUS_IS_OK(status)) {
1620 printf("open3 of %s failed (%s)\n", fname, nt_errstr(status));
1621 return False;
1624 cli_setpid(cli, 1);
1626 status = cli_lock32(cli, fnum1, 0, 4, 0, WRITE_LOCK);
1627 if (!NT_STATUS_IS_OK(status)) {
1628 printf("lock1 failed (%s)\n", nt_errstr(status));
1629 return false;
1632 status = cli_lock32(cli, fnum1, 0, 4, 0, WRITE_LOCK);
1633 if (NT_STATUS_IS_OK(status)) {
1634 printf("WRITE lock1 succeeded! This is a locking bug\n");
1635 correct = false;
1636 } else {
1637 if (!check_both_error(__LINE__, status, ERRDOS, ERRlock,
1638 NT_STATUS_LOCK_NOT_GRANTED)) {
1639 return false;
1643 status = cli_lock32(cli, fnum2, 0, 4, 0, WRITE_LOCK);
1644 if (NT_STATUS_IS_OK(status)) {
1645 printf("WRITE lock2 succeeded! This is a locking bug\n");
1646 correct = false;
1647 } else {
1648 if (!check_both_error(__LINE__, status, ERRDOS, ERRlock,
1649 NT_STATUS_LOCK_NOT_GRANTED)) {
1650 return false;
1654 status = cli_lock32(cli, fnum2, 0, 4, 0, READ_LOCK);
1655 if (NT_STATUS_IS_OK(status)) {
1656 printf("READ lock2 succeeded! This is a locking bug\n");
1657 correct = false;
1658 } else {
1659 if (!check_both_error(__LINE__, status, ERRDOS, ERRlock,
1660 NT_STATUS_FILE_LOCK_CONFLICT)) {
1661 return false;
1665 status = cli_lock32(cli, fnum1, 100, 4, 0, WRITE_LOCK);
1666 if (!NT_STATUS_IS_OK(status)) {
1667 printf("lock at 100 failed (%s)\n", nt_errstr(status));
1669 cli_setpid(cli, 2);
1670 if (NT_STATUS_IS_OK(cli_unlock(cli, fnum1, 100, 4))) {
1671 printf("unlock at 100 succeeded! This is a locking bug\n");
1672 correct = False;
1675 status = cli_unlock(cli, fnum1, 0, 4);
1676 if (NT_STATUS_IS_OK(status)) {
1677 printf("unlock1 succeeded! This is a locking bug\n");
1678 correct = false;
1679 } else {
1680 if (!check_both_error(__LINE__, status, ERRDOS, ERRlock,
1681 NT_STATUS_RANGE_NOT_LOCKED)) {
1682 return false;
1686 status = cli_unlock(cli, fnum1, 0, 8);
1687 if (NT_STATUS_IS_OK(status)) {
1688 printf("unlock2 succeeded! This is a locking bug\n");
1689 correct = false;
1690 } else {
1691 if (!check_both_error(__LINE__, status, ERRDOS, ERRlock,
1692 NT_STATUS_RANGE_NOT_LOCKED)) {
1693 return false;
1697 status = cli_lock32(cli, fnum3, 0, 4, 0, WRITE_LOCK);
1698 if (NT_STATUS_IS_OK(status)) {
1699 printf("lock3 succeeded! This is a locking bug\n");
1700 correct = false;
1701 } else {
1702 if (!check_both_error(__LINE__, status, ERRDOS, ERRlock,
1703 NT_STATUS_LOCK_NOT_GRANTED)) {
1704 return false;
1708 cli_setpid(cli, 1);
1710 status = cli_close(cli, fnum1);
1711 if (!NT_STATUS_IS_OK(status)) {
1712 printf("close1 failed (%s)\n", nt_errstr(status));
1713 return False;
1716 status = cli_close(cli, fnum2);
1717 if (!NT_STATUS_IS_OK(status)) {
1718 printf("close2 failed (%s)\n", nt_errstr(status));
1719 return False;
1722 status = cli_close(cli, fnum3);
1723 if (!NT_STATUS_IS_OK(status)) {
1724 printf("close3 failed (%s)\n", nt_errstr(status));
1725 return False;
1728 if (!torture_close_connection(cli)) {
1729 correct = False;
1732 printf("locktest2 finished\n");
1734 return correct;
1739 This test checks that
1741 1) the server supports the full offset range in lock requests
1743 static bool run_locktest3(int dummy)
1745 static struct cli_state *cli1, *cli2;
1746 const char *fname = "\\lockt3.lck";
1747 uint16_t fnum1, fnum2;
1748 int i;
1749 uint32 offset;
1750 bool correct = True;
1751 NTSTATUS status;
1753 #define NEXT_OFFSET offset += (~(uint32)0) / torture_numops
1755 if (!torture_open_connection(&cli1, 0) || !torture_open_connection(&cli2, 1)) {
1756 return False;
1758 smbXcli_conn_set_sockopt(cli1->conn, sockops);
1759 smbXcli_conn_set_sockopt(cli2->conn, sockops);
1761 printf("starting locktest3\n");
1763 cli_unlink(cli1, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
1765 status = cli_openx(cli1, fname, O_RDWR|O_CREAT|O_EXCL, DENY_NONE,
1766 &fnum1);
1767 if (!NT_STATUS_IS_OK(status)) {
1768 printf("open of %s failed (%s)\n", fname, nt_errstr(status));
1769 return False;
1772 status = cli_openx(cli2, fname, O_RDWR, DENY_NONE, &fnum2);
1773 if (!NT_STATUS_IS_OK(status)) {
1774 printf("open2 of %s failed (%s)\n", fname, nt_errstr(status));
1775 return False;
1778 for (offset=i=0;i<torture_numops;i++) {
1779 NEXT_OFFSET;
1781 status = cli_lock32(cli1, fnum1, offset-1, 1, 0, WRITE_LOCK);
1782 if (!NT_STATUS_IS_OK(status)) {
1783 printf("lock1 %d failed (%s)\n",
1785 nt_errstr(status));
1786 return False;
1789 status = cli_lock32(cli2, fnum2, offset-2, 1, 0, WRITE_LOCK);
1790 if (!NT_STATUS_IS_OK(status)) {
1791 printf("lock2 %d failed (%s)\n",
1793 nt_errstr(status));
1794 return False;
1798 for (offset=i=0;i<torture_numops;i++) {
1799 NEXT_OFFSET;
1801 status = cli_lock32(cli1, fnum1, offset-2, 1, 0, WRITE_LOCK);
1802 if (NT_STATUS_IS_OK(status)) {
1803 printf("error: lock1 %d succeeded!\n", i);
1804 return False;
1807 status = cli_lock32(cli2, fnum2, offset-1, 1, 0, WRITE_LOCK);
1808 if (NT_STATUS_IS_OK(status)) {
1809 printf("error: lock2 %d succeeded!\n", i);
1810 return False;
1813 status = cli_lock32(cli1, fnum1, offset-1, 1, 0, WRITE_LOCK);
1814 if (NT_STATUS_IS_OK(status)) {
1815 printf("error: lock3 %d succeeded!\n", i);
1816 return False;
1819 status = cli_lock32(cli2, fnum2, offset-2, 1, 0, WRITE_LOCK);
1820 if (NT_STATUS_IS_OK(status)) {
1821 printf("error: lock4 %d succeeded!\n", i);
1822 return False;
1826 for (offset=i=0;i<torture_numops;i++) {
1827 NEXT_OFFSET;
1829 status = cli_unlock(cli1, fnum1, offset-1, 1);
1830 if (!NT_STATUS_IS_OK(status)) {
1831 printf("unlock1 %d failed (%s)\n",
1833 nt_errstr(status));
1834 return False;
1837 status = cli_unlock(cli2, fnum2, offset-2, 1);
1838 if (!NT_STATUS_IS_OK(status)) {
1839 printf("unlock2 %d failed (%s)\n",
1841 nt_errstr(status));
1842 return False;
1846 status = cli_close(cli1, fnum1);
1847 if (!NT_STATUS_IS_OK(status)) {
1848 printf("close1 failed (%s)\n", nt_errstr(status));
1849 return False;
1852 status = cli_close(cli2, fnum2);
1853 if (!NT_STATUS_IS_OK(status)) {
1854 printf("close2 failed (%s)\n", nt_errstr(status));
1855 return False;
1858 status = cli_unlink(cli1, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
1859 if (!NT_STATUS_IS_OK(status)) {
1860 printf("unlink failed (%s)\n", nt_errstr(status));
1861 return False;
1864 if (!torture_close_connection(cli1)) {
1865 correct = False;
1868 if (!torture_close_connection(cli2)) {
1869 correct = False;
1872 printf("finished locktest3\n");
1874 return correct;
1877 static bool test_cli_read(struct cli_state *cli, uint16_t fnum,
1878 char *buf, off_t offset, size_t size,
1879 size_t *nread, size_t expect)
1881 NTSTATUS status;
1882 size_t l_nread;
1884 status = cli_read(cli, fnum, buf, offset, size, &l_nread);
1886 if(!NT_STATUS_IS_OK(status)) {
1887 return false;
1888 } else if (l_nread != expect) {
1889 return false;
1892 if (nread) {
1893 *nread = l_nread;
1896 return true;
1899 #define EXPECTED(ret, v) if ((ret) != (v)) { \
1900 printf("** "); correct = False; \
1904 looks at overlapping locks
1906 static bool run_locktest4(int dummy)
1908 static struct cli_state *cli1, *cli2;
1909 const char *fname = "\\lockt4.lck";
1910 uint16_t fnum1, fnum2, f;
1911 bool ret;
1912 char buf[1000];
1913 bool correct = True;
1914 NTSTATUS status;
1916 if (!torture_open_connection(&cli1, 0) || !torture_open_connection(&cli2, 1)) {
1917 return False;
1920 smbXcli_conn_set_sockopt(cli1->conn, sockops);
1921 smbXcli_conn_set_sockopt(cli2->conn, sockops);
1923 printf("starting locktest4\n");
1925 cli_unlink(cli1, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
1927 cli_openx(cli1, fname, O_RDWR|O_CREAT|O_EXCL, DENY_NONE, &fnum1);
1928 cli_openx(cli2, fname, O_RDWR, DENY_NONE, &fnum2);
1930 memset(buf, 0, sizeof(buf));
1932 status = cli_writeall(cli1, fnum1, 0, (uint8_t *)buf, 0, sizeof(buf),
1933 NULL);
1934 if (!NT_STATUS_IS_OK(status)) {
1935 printf("Failed to create file: %s\n", nt_errstr(status));
1936 correct = False;
1937 goto fail;
1940 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 0, 4, 0, WRITE_LOCK)) &&
1941 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 2, 4, 0, WRITE_LOCK));
1942 EXPECTED(ret, False);
1943 printf("the same process %s set overlapping write locks\n", ret?"can":"cannot");
1945 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 10, 4, 0, READ_LOCK)) &&
1946 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 12, 4, 0, READ_LOCK));
1947 EXPECTED(ret, True);
1948 printf("the same process %s set overlapping read locks\n", ret?"can":"cannot");
1950 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 20, 4, 0, WRITE_LOCK)) &&
1951 NT_STATUS_IS_OK(cli_lock32(cli2, fnum2, 22, 4, 0, WRITE_LOCK));
1952 EXPECTED(ret, False);
1953 printf("a different connection %s set overlapping write locks\n", ret?"can":"cannot");
1955 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 30, 4, 0, READ_LOCK)) &&
1956 NT_STATUS_IS_OK(cli_lock32(cli2, fnum2, 32, 4, 0, READ_LOCK));
1957 EXPECTED(ret, True);
1958 printf("a different connection %s set overlapping read locks\n", ret?"can":"cannot");
1960 ret = (cli_setpid(cli1, 1),
1961 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 40, 4, 0, WRITE_LOCK))) &&
1962 (cli_setpid(cli1, 2),
1963 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 42, 4, 0, WRITE_LOCK)));
1964 EXPECTED(ret, False);
1965 printf("a different pid %s set overlapping write locks\n", ret?"can":"cannot");
1967 ret = (cli_setpid(cli1, 1),
1968 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 50, 4, 0, READ_LOCK))) &&
1969 (cli_setpid(cli1, 2),
1970 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 52, 4, 0, READ_LOCK)));
1971 EXPECTED(ret, True);
1972 printf("a different pid %s set overlapping read locks\n", ret?"can":"cannot");
1974 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 60, 4, 0, READ_LOCK)) &&
1975 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 60, 4, 0, READ_LOCK));
1976 EXPECTED(ret, True);
1977 printf("the same process %s set the same read lock twice\n", ret?"can":"cannot");
1979 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 70, 4, 0, WRITE_LOCK)) &&
1980 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 70, 4, 0, WRITE_LOCK));
1981 EXPECTED(ret, False);
1982 printf("the same process %s set the same write lock twice\n", ret?"can":"cannot");
1984 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 80, 4, 0, READ_LOCK)) &&
1985 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 80, 4, 0, WRITE_LOCK));
1986 EXPECTED(ret, False);
1987 printf("the same process %s overlay a read lock with a write lock\n", ret?"can":"cannot");
1989 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 90, 4, 0, WRITE_LOCK)) &&
1990 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 90, 4, 0, READ_LOCK));
1991 EXPECTED(ret, True);
1992 printf("the same process %s overlay a write lock with a read lock\n", ret?"can":"cannot");
1994 ret = (cli_setpid(cli1, 1),
1995 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 100, 4, 0, WRITE_LOCK))) &&
1996 (cli_setpid(cli1, 2),
1997 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 100, 4, 0, READ_LOCK)));
1998 EXPECTED(ret, False);
1999 printf("a different pid %s overlay a write lock with a read lock\n", ret?"can":"cannot");
2001 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 110, 4, 0, READ_LOCK)) &&
2002 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 112, 4, 0, READ_LOCK)) &&
2003 NT_STATUS_IS_OK(cli_unlock(cli1, fnum1, 110, 6));
2004 EXPECTED(ret, False);
2005 printf("the same process %s coalesce read locks\n", ret?"can":"cannot");
2008 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 120, 4, 0, WRITE_LOCK)) &&
2009 test_cli_read(cli2, fnum2, buf, 120, 4, NULL, 4);
2010 EXPECTED(ret, False);
2011 printf("this server %s strict write locking\n", ret?"doesn't do":"does");
2013 status = cli_lock32(cli1, fnum1, 130, 4, 0, READ_LOCK);
2014 ret = NT_STATUS_IS_OK(status);
2015 if (ret) {
2016 status = cli_writeall(cli2, fnum2, 0, (uint8_t *)buf, 130, 4,
2017 NULL);
2018 ret = NT_STATUS_IS_OK(status);
2020 EXPECTED(ret, False);
2021 printf("this server %s strict read locking\n", ret?"doesn't do":"does");
2024 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 140, 4, 0, READ_LOCK)) &&
2025 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 140, 4, 0, READ_LOCK)) &&
2026 NT_STATUS_IS_OK(cli_unlock(cli1, fnum1, 140, 4)) &&
2027 NT_STATUS_IS_OK(cli_unlock(cli1, fnum1, 140, 4));
2028 EXPECTED(ret, True);
2029 printf("this server %s do recursive read locking\n", ret?"does":"doesn't");
2032 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 150, 4, 0, WRITE_LOCK)) &&
2033 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 150, 4, 0, READ_LOCK)) &&
2034 NT_STATUS_IS_OK(cli_unlock(cli1, fnum1, 150, 4)) &&
2035 test_cli_read(cli2, fnum2, buf, 150, 4, NULL, 4) &&
2036 !(NT_STATUS_IS_OK(cli_writeall(cli2, fnum2, 0, (uint8_t *)buf,
2037 150, 4, NULL))) &&
2038 NT_STATUS_IS_OK(cli_unlock(cli1, fnum1, 150, 4));
2039 EXPECTED(ret, True);
2040 printf("this server %s do recursive lock overlays\n", ret?"does":"doesn't");
2042 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 160, 4, 0, READ_LOCK)) &&
2043 NT_STATUS_IS_OK(cli_unlock(cli1, fnum1, 160, 4)) &&
2044 NT_STATUS_IS_OK(cli_writeall(cli2, fnum2, 0, (uint8_t *)buf,
2045 160, 4, NULL)) &&
2046 test_cli_read(cli2, fnum2, buf, 160, 4, NULL, 4);
2047 EXPECTED(ret, True);
2048 printf("the same process %s remove a read lock using write locking\n", ret?"can":"cannot");
2050 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 170, 4, 0, WRITE_LOCK)) &&
2051 NT_STATUS_IS_OK(cli_unlock(cli1, fnum1, 170, 4)) &&
2052 NT_STATUS_IS_OK(cli_writeall(cli2, fnum2, 0, (uint8_t *)buf,
2053 170, 4, NULL)) &&
2054 test_cli_read(cli2, fnum2, buf, 170, 4, NULL, 4);
2055 EXPECTED(ret, True);
2056 printf("the same process %s remove a write lock using read locking\n", ret?"can":"cannot");
2058 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 190, 4, 0, WRITE_LOCK)) &&
2059 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 190, 4, 0, READ_LOCK)) &&
2060 NT_STATUS_IS_OK(cli_unlock(cli1, fnum1, 190, 4)) &&
2061 !NT_STATUS_IS_OK(cli_writeall(cli2, fnum2, 0, (uint8_t *)buf,
2062 190, 4, NULL)) &&
2063 test_cli_read(cli2, fnum2, buf, 190, 4, NULL, 4);
2064 EXPECTED(ret, True);
2065 printf("the same process %s remove the first lock first\n", ret?"does":"doesn't");
2067 cli_close(cli1, fnum1);
2068 cli_close(cli2, fnum2);
2069 cli_openx(cli1, fname, O_RDWR, DENY_NONE, &fnum1);
2070 cli_openx(cli1, fname, O_RDWR, DENY_NONE, &f);
2071 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 0, 8, 0, READ_LOCK)) &&
2072 NT_STATUS_IS_OK(cli_lock32(cli1, f, 0, 1, 0, READ_LOCK)) &&
2073 NT_STATUS_IS_OK(cli_close(cli1, fnum1)) &&
2074 NT_STATUS_IS_OK(cli_openx(cli1, fname, O_RDWR, DENY_NONE, &fnum1)) &&
2075 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 7, 1, 0, WRITE_LOCK));
2076 cli_close(cli1, f);
2077 cli_close(cli1, fnum1);
2078 EXPECTED(ret, True);
2079 printf("the server %s have the NT byte range lock bug\n", !ret?"does":"doesn't");
2081 fail:
2082 cli_close(cli1, fnum1);
2083 cli_close(cli2, fnum2);
2084 cli_unlink(cli1, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2085 torture_close_connection(cli1);
2086 torture_close_connection(cli2);
2088 printf("finished locktest4\n");
2089 return correct;
2093 looks at lock upgrade/downgrade.
2095 static bool run_locktest5(int dummy)
2097 static struct cli_state *cli1, *cli2;
2098 const char *fname = "\\lockt5.lck";
2099 uint16_t fnum1, fnum2, fnum3;
2100 bool ret;
2101 char buf[1000];
2102 bool correct = True;
2103 NTSTATUS status;
2105 if (!torture_open_connection(&cli1, 0) || !torture_open_connection(&cli2, 1)) {
2106 return False;
2109 smbXcli_conn_set_sockopt(cli1->conn, sockops);
2110 smbXcli_conn_set_sockopt(cli2->conn, sockops);
2112 printf("starting locktest5\n");
2114 cli_unlink(cli1, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2116 cli_openx(cli1, fname, O_RDWR|O_CREAT|O_EXCL, DENY_NONE, &fnum1);
2117 cli_openx(cli2, fname, O_RDWR, DENY_NONE, &fnum2);
2118 cli_openx(cli1, fname, O_RDWR, DENY_NONE, &fnum3);
2120 memset(buf, 0, sizeof(buf));
2122 status = cli_writeall(cli1, fnum1, 0, (uint8_t *)buf, 0, sizeof(buf),
2123 NULL);
2124 if (!NT_STATUS_IS_OK(status)) {
2125 printf("Failed to create file: %s\n", nt_errstr(status));
2126 correct = False;
2127 goto fail;
2130 /* Check for NT bug... */
2131 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 0, 8, 0, READ_LOCK)) &&
2132 NT_STATUS_IS_OK(cli_lock32(cli1, fnum3, 0, 1, 0, READ_LOCK));
2133 cli_close(cli1, fnum1);
2134 cli_openx(cli1, fname, O_RDWR, DENY_NONE, &fnum1);
2135 status = cli_lock32(cli1, fnum1, 7, 1, 0, WRITE_LOCK);
2136 ret = NT_STATUS_IS_OK(status);
2137 EXPECTED(ret, True);
2138 printf("this server %s the NT locking bug\n", ret ? "doesn't have" : "has");
2139 cli_close(cli1, fnum1);
2140 cli_openx(cli1, fname, O_RDWR, DENY_NONE, &fnum1);
2141 cli_unlock(cli1, fnum3, 0, 1);
2143 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 0, 4, 0, WRITE_LOCK)) &&
2144 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 1, 1, 0, READ_LOCK));
2145 EXPECTED(ret, True);
2146 printf("the same process %s overlay a write with a read lock\n", ret?"can":"cannot");
2148 status = cli_lock32(cli2, fnum2, 0, 4, 0, READ_LOCK);
2149 ret = NT_STATUS_IS_OK(status);
2150 EXPECTED(ret, False);
2152 printf("a different processs %s get a read lock on the first process lock stack\n", ret?"can":"cannot");
2154 /* Unlock the process 2 lock. */
2155 cli_unlock(cli2, fnum2, 0, 4);
2157 status = cli_lock32(cli1, fnum3, 0, 4, 0, READ_LOCK);
2158 ret = NT_STATUS_IS_OK(status);
2159 EXPECTED(ret, False);
2161 printf("the same processs on a different fnum %s get a read lock\n", ret?"can":"cannot");
2163 /* Unlock the process 1 fnum3 lock. */
2164 cli_unlock(cli1, fnum3, 0, 4);
2166 /* Stack 2 more locks here. */
2167 ret = NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 0, 4, 0, READ_LOCK)) &&
2168 NT_STATUS_IS_OK(cli_lock32(cli1, fnum1, 0, 4, 0, READ_LOCK));
2170 EXPECTED(ret, True);
2171 printf("the same process %s stack read locks\n", ret?"can":"cannot");
2173 /* Unlock the first process lock, then check this was the WRITE lock that was
2174 removed. */
2176 ret = NT_STATUS_IS_OK(cli_unlock(cli1, fnum1, 0, 4)) &&
2177 NT_STATUS_IS_OK(cli_lock32(cli2, fnum2, 0, 4, 0, READ_LOCK));
2179 EXPECTED(ret, True);
2180 printf("the first unlock removes the %s lock\n", ret?"WRITE":"READ");
2182 /* Unlock the process 2 lock. */
2183 cli_unlock(cli2, fnum2, 0, 4);
2185 /* We should have 3 stacked locks here. Ensure we need to do 3 unlocks. */
2187 ret = NT_STATUS_IS_OK(cli_unlock(cli1, fnum1, 1, 1)) &&
2188 NT_STATUS_IS_OK(cli_unlock(cli1, fnum1, 0, 4)) &&
2189 NT_STATUS_IS_OK(cli_unlock(cli1, fnum1, 0, 4));
2191 EXPECTED(ret, True);
2192 printf("the same process %s unlock the stack of 4 locks\n", ret?"can":"cannot");
2194 /* Ensure the next unlock fails. */
2195 ret = NT_STATUS_IS_OK(cli_unlock(cli1, fnum1, 0, 4));
2196 EXPECTED(ret, False);
2197 printf("the same process %s count the lock stack\n", !ret?"can":"cannot");
2199 /* Ensure connection 2 can get a write lock. */
2200 status = cli_lock32(cli2, fnum2, 0, 4, 0, WRITE_LOCK);
2201 ret = NT_STATUS_IS_OK(status);
2202 EXPECTED(ret, True);
2204 printf("a different processs %s get a write lock on the unlocked stack\n", ret?"can":"cannot");
2207 fail:
2208 cli_close(cli1, fnum1);
2209 cli_close(cli2, fnum2);
2210 cli_unlink(cli1, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2211 if (!torture_close_connection(cli1)) {
2212 correct = False;
2214 if (!torture_close_connection(cli2)) {
2215 correct = False;
2218 printf("finished locktest5\n");
2220 return correct;
2224 tries the unusual lockingX locktype bits
2226 static bool run_locktest6(int dummy)
2228 static struct cli_state *cli;
2229 const char *fname[1] = { "\\lock6.txt" };
2230 int i;
2231 uint16_t fnum;
2232 NTSTATUS status;
2234 if (!torture_open_connection(&cli, 0)) {
2235 return False;
2238 smbXcli_conn_set_sockopt(cli->conn, sockops);
2240 printf("starting locktest6\n");
2242 for (i=0;i<1;i++) {
2243 printf("Testing %s\n", fname[i]);
2245 cli_unlink(cli, fname[i], FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2247 cli_openx(cli, fname[i], O_RDWR|O_CREAT|O_EXCL, DENY_NONE, &fnum);
2248 status = cli_locktype(cli, fnum, 0, 8, 0, LOCKING_ANDX_CHANGE_LOCKTYPE);
2249 cli_close(cli, fnum);
2250 printf("CHANGE_LOCKTYPE gave %s\n", nt_errstr(status));
2252 cli_openx(cli, fname[i], O_RDWR, DENY_NONE, &fnum);
2253 status = cli_locktype(cli, fnum, 0, 8, 0, LOCKING_ANDX_CANCEL_LOCK);
2254 cli_close(cli, fnum);
2255 printf("CANCEL_LOCK gave %s\n", nt_errstr(status));
2257 cli_unlink(cli, fname[i], FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2260 torture_close_connection(cli);
2262 printf("finished locktest6\n");
2263 return True;
2266 static bool run_locktest7(int dummy)
2268 struct cli_state *cli1;
2269 const char *fname = "\\lockt7.lck";
2270 uint16_t fnum1;
2271 char buf[200];
2272 bool correct = False;
2273 size_t nread;
2274 NTSTATUS status;
2276 if (!torture_open_connection(&cli1, 0)) {
2277 return False;
2280 smbXcli_conn_set_sockopt(cli1->conn, sockops);
2282 printf("starting locktest7\n");
2284 cli_unlink(cli1, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2286 cli_openx(cli1, fname, O_RDWR|O_CREAT|O_EXCL, DENY_NONE, &fnum1);
2288 memset(buf, 0, sizeof(buf));
2290 status = cli_writeall(cli1, fnum1, 0, (uint8_t *)buf, 0, sizeof(buf),
2291 NULL);
2292 if (!NT_STATUS_IS_OK(status)) {
2293 printf("Failed to create file: %s\n", nt_errstr(status));
2294 goto fail;
2297 cli_setpid(cli1, 1);
2299 status = cli_lock32(cli1, fnum1, 130, 4, 0, READ_LOCK);
2300 if (!NT_STATUS_IS_OK(status)) {
2301 printf("Unable to apply read lock on range 130:4, "
2302 "error was %s\n", nt_errstr(status));
2303 goto fail;
2304 } else {
2305 printf("pid1 successfully locked range 130:4 for READ\n");
2308 status = cli_read(cli1, fnum1, buf, 130, 4, &nread);
2309 if (!NT_STATUS_IS_OK(status)) {
2310 printf("pid1 unable to read the range 130:4, error was %s\n",
2311 nt_errstr(status));
2312 goto fail;
2313 } else if (nread != 4) {
2314 printf("pid1 unable to read the range 130:4, "
2315 "recv %ld req %d\n", (unsigned long)nread, 4);
2316 goto fail;
2317 } else {
2318 printf("pid1 successfully read the range 130:4\n");
2321 status = cli_writeall(cli1, fnum1, 0, (uint8_t *)buf, 130, 4, NULL);
2322 if (!NT_STATUS_IS_OK(status)) {
2323 printf("pid1 unable to write to the range 130:4, error was "
2324 "%s\n", nt_errstr(status));
2325 if (!NT_STATUS_EQUAL(status, NT_STATUS_FILE_LOCK_CONFLICT)) {
2326 printf("Incorrect error (should be NT_STATUS_FILE_LOCK_CONFLICT)\n");
2327 goto fail;
2329 } else {
2330 printf("pid1 successfully wrote to the range 130:4 (should be denied)\n");
2331 goto fail;
2334 cli_setpid(cli1, 2);
2336 status = cli_read(cli1, fnum1, buf, 130, 4, &nread);
2337 if (!NT_STATUS_IS_OK(status)) {
2338 printf("pid2 unable to read the range 130:4, error was %s\n",
2339 nt_errstr(status));
2340 goto fail;
2341 } else if (nread != 4) {
2342 printf("pid2 unable to read the range 130:4, "
2343 "recv %ld req %d\n", (unsigned long)nread, 4);
2344 goto fail;
2345 } else {
2346 printf("pid2 successfully read the range 130:4\n");
2349 status = cli_writeall(cli1, fnum1, 0, (uint8_t *)buf, 130, 4, NULL);
2350 if (!NT_STATUS_IS_OK(status)) {
2351 printf("pid2 unable to write to the range 130:4, error was "
2352 "%s\n", nt_errstr(status));
2353 if (!NT_STATUS_EQUAL(status, NT_STATUS_FILE_LOCK_CONFLICT)) {
2354 printf("Incorrect error (should be NT_STATUS_FILE_LOCK_CONFLICT)\n");
2355 goto fail;
2357 } else {
2358 printf("pid2 successfully wrote to the range 130:4 (should be denied)\n");
2359 goto fail;
2362 cli_setpid(cli1, 1);
2363 cli_unlock(cli1, fnum1, 130, 4);
2365 status = cli_lock32(cli1, fnum1, 130, 4, 0, WRITE_LOCK);
2366 if (!NT_STATUS_IS_OK(status)) {
2367 printf("Unable to apply write lock on range 130:4, error was %s\n", nt_errstr(status));
2368 goto fail;
2369 } else {
2370 printf("pid1 successfully locked range 130:4 for WRITE\n");
2373 status = cli_read(cli1, fnum1, buf, 130, 4, &nread);
2374 if (!NT_STATUS_IS_OK(status)) {
2375 printf("pid1 unable to read the range 130:4, error was %s\n",
2376 nt_errstr(status));
2377 goto fail;
2378 } else if (nread != 4) {
2379 printf("pid1 unable to read the range 130:4, "
2380 "recv %ld req %d\n", (unsigned long)nread, 4);
2381 goto fail;
2382 } else {
2383 printf("pid1 successfully read the range 130:4\n");
2386 status = cli_writeall(cli1, fnum1, 0, (uint8_t *)buf, 130, 4, NULL);
2387 if (!NT_STATUS_IS_OK(status)) {
2388 printf("pid1 unable to write to the range 130:4, error was "
2389 "%s\n", nt_errstr(status));
2390 goto fail;
2391 } else {
2392 printf("pid1 successfully wrote to the range 130:4\n");
2395 cli_setpid(cli1, 2);
2397 status = cli_read(cli1, fnum1, buf, 130, 4, &nread);
2398 if (!NT_STATUS_IS_OK(status)) {
2399 printf("pid2 unable to read the range 130:4, error was "
2400 "%s\n", nt_errstr(status));
2401 if (!NT_STATUS_EQUAL(status, NT_STATUS_FILE_LOCK_CONFLICT)) {
2402 printf("Incorrect error (should be NT_STATUS_FILE_LOCK_CONFLICT)\n");
2403 goto fail;
2405 } else {
2406 printf("pid2 successfully read the range 130:4 (should be denied) recv %ld\n",
2407 (unsigned long)nread);
2408 goto fail;
2411 status = cli_writeall(cli1, fnum1, 0, (uint8_t *)buf, 130, 4, NULL);
2412 if (!NT_STATUS_IS_OK(status)) {
2413 printf("pid2 unable to write to the range 130:4, error was "
2414 "%s\n", nt_errstr(status));
2415 if (!NT_STATUS_EQUAL(status, NT_STATUS_FILE_LOCK_CONFLICT)) {
2416 printf("Incorrect error (should be NT_STATUS_FILE_LOCK_CONFLICT)\n");
2417 goto fail;
2419 } else {
2420 printf("pid2 successfully wrote to the range 130:4 (should be denied)\n");
2421 goto fail;
2424 cli_unlock(cli1, fnum1, 130, 0);
2425 correct = True;
2427 fail:
2428 cli_close(cli1, fnum1);
2429 cli_unlink(cli1, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2430 torture_close_connection(cli1);
2432 printf("finished locktest7\n");
2433 return correct;
2437 * This demonstrates a problem with our use of GPFS share modes: A file
2438 * descriptor sitting in the pending close queue holding a GPFS share mode
2439 * blocks opening a file another time. Happens with Word 2007 temp files.
2440 * With "posix locking = yes" and "gpfs:sharemodes = yes" enabled, the third
2441 * open is denied with NT_STATUS_SHARING_VIOLATION.
2444 static bool run_locktest8(int dummy)
2446 struct cli_state *cli1;
2447 const char *fname = "\\lockt8.lck";
2448 uint16_t fnum1, fnum2;
2449 char buf[200];
2450 bool correct = False;
2451 NTSTATUS status;
2453 if (!torture_open_connection(&cli1, 0)) {
2454 return False;
2457 smbXcli_conn_set_sockopt(cli1->conn, sockops);
2459 printf("starting locktest8\n");
2461 cli_unlink(cli1, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2463 status = cli_openx(cli1, fname, O_RDWR|O_CREAT|O_EXCL, DENY_WRITE,
2464 &fnum1);
2465 if (!NT_STATUS_IS_OK(status)) {
2466 d_fprintf(stderr, "cli_openx returned %s\n", nt_errstr(status));
2467 return false;
2470 memset(buf, 0, sizeof(buf));
2472 status = cli_openx(cli1, fname, O_RDONLY, DENY_NONE, &fnum2);
2473 if (!NT_STATUS_IS_OK(status)) {
2474 d_fprintf(stderr, "cli_openx second time returned %s\n",
2475 nt_errstr(status));
2476 goto fail;
2479 status = cli_lock32(cli1, fnum2, 1, 1, 0, READ_LOCK);
2480 if (!NT_STATUS_IS_OK(status)) {
2481 printf("Unable to apply read lock on range 1:1, error was "
2482 "%s\n", nt_errstr(status));
2483 goto fail;
2486 status = cli_close(cli1, fnum1);
2487 if (!NT_STATUS_IS_OK(status)) {
2488 d_fprintf(stderr, "cli_close(fnum1) %s\n", nt_errstr(status));
2489 goto fail;
2492 status = cli_openx(cli1, fname, O_RDWR, DENY_NONE, &fnum1);
2493 if (!NT_STATUS_IS_OK(status)) {
2494 d_fprintf(stderr, "cli_openx third time returned %s\n",
2495 nt_errstr(status));
2496 goto fail;
2499 correct = true;
2501 fail:
2502 cli_close(cli1, fnum1);
2503 cli_close(cli1, fnum2);
2504 cli_unlink(cli1, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2505 torture_close_connection(cli1);
2507 printf("finished locktest8\n");
2508 return correct;
2512 * This test is designed to be run in conjunction with
2513 * external NFS or POSIX locks taken in the filesystem.
2514 * It checks that the smbd server will block until the
2515 * lock is released and then acquire it. JRA.
2518 static bool got_alarm;
2519 static struct cli_state *alarm_cli;
2521 static void alarm_handler(int dummy)
2523 got_alarm = True;
2526 static void alarm_handler_parent(int dummy)
2528 smbXcli_conn_disconnect(alarm_cli->conn, NT_STATUS_OK);
2531 static void do_local_lock(int read_fd, int write_fd)
2533 int fd;
2534 char c = '\0';
2535 struct flock lock;
2536 const char *local_pathname = NULL;
2537 int ret;
2539 local_pathname = talloc_asprintf(talloc_tos(),
2540 "%s/lockt9.lck", local_path);
2541 if (!local_pathname) {
2542 printf("child: alloc fail\n");
2543 exit(1);
2546 unlink(local_pathname);
2547 fd = open(local_pathname, O_RDWR|O_CREAT, 0666);
2548 if (fd == -1) {
2549 printf("child: open of %s failed %s.\n",
2550 local_pathname, strerror(errno));
2551 exit(1);
2554 /* Now take a fcntl lock. */
2555 lock.l_type = F_WRLCK;
2556 lock.l_whence = SEEK_SET;
2557 lock.l_start = 0;
2558 lock.l_len = 4;
2559 lock.l_pid = getpid();
2561 ret = fcntl(fd,F_SETLK,&lock);
2562 if (ret == -1) {
2563 printf("child: failed to get lock 0:4 on file %s. Error %s\n",
2564 local_pathname, strerror(errno));
2565 exit(1);
2566 } else {
2567 printf("child: got lock 0:4 on file %s.\n",
2568 local_pathname );
2569 fflush(stdout);
2572 CatchSignal(SIGALRM, alarm_handler);
2573 alarm(5);
2574 /* Signal the parent. */
2575 if (write(write_fd, &c, 1) != 1) {
2576 printf("child: start signal fail %s.\n",
2577 strerror(errno));
2578 exit(1);
2580 alarm(0);
2582 alarm(10);
2583 /* Wait for the parent to be ready. */
2584 if (read(read_fd, &c, 1) != 1) {
2585 printf("child: reply signal fail %s.\n",
2586 strerror(errno));
2587 exit(1);
2589 alarm(0);
2591 sleep(5);
2592 close(fd);
2593 printf("child: released lock 0:4 on file %s.\n",
2594 local_pathname );
2595 fflush(stdout);
2596 exit(0);
2599 static bool run_locktest9(int dummy)
2601 struct cli_state *cli1;
2602 const char *fname = "\\lockt9.lck";
2603 uint16_t fnum;
2604 bool correct = False;
2605 int pipe_in[2], pipe_out[2];
2606 pid_t child_pid;
2607 char c = '\0';
2608 int ret;
2609 struct timeval start;
2610 double seconds;
2611 NTSTATUS status;
2613 printf("starting locktest9\n");
2615 if (local_path == NULL) {
2616 d_fprintf(stderr, "locktest9 must be given a local path via -l <localpath>\n");
2617 return false;
2620 if (pipe(pipe_in) == -1 || pipe(pipe_out) == -1) {
2621 return false;
2624 child_pid = fork();
2625 if (child_pid == -1) {
2626 return false;
2629 if (child_pid == 0) {
2630 /* Child. */
2631 do_local_lock(pipe_out[0], pipe_in[1]);
2632 exit(0);
2635 close(pipe_out[0]);
2636 close(pipe_in[1]);
2637 pipe_out[0] = -1;
2638 pipe_in[1] = -1;
2640 /* Parent. */
2641 ret = read(pipe_in[0], &c, 1);
2642 if (ret != 1) {
2643 d_fprintf(stderr, "failed to read start signal from child. %s\n",
2644 strerror(errno));
2645 return false;
2648 if (!torture_open_connection(&cli1, 0)) {
2649 return false;
2652 smbXcli_conn_set_sockopt(cli1->conn, sockops);
2654 status = cli_openx(cli1, fname, O_RDWR, DENY_NONE,
2655 &fnum);
2656 if (!NT_STATUS_IS_OK(status)) {
2657 d_fprintf(stderr, "cli_openx returned %s\n", nt_errstr(status));
2658 return false;
2661 /* Ensure the child has the lock. */
2662 status = cli_lock32(cli1, fnum, 0, 4, 0, WRITE_LOCK);
2663 if (NT_STATUS_IS_OK(status)) {
2664 d_fprintf(stderr, "Got the lock on range 0:4 - this should not happen !\n");
2665 goto fail;
2666 } else {
2667 d_printf("Child has the lock.\n");
2670 /* Tell the child to wait 5 seconds then exit. */
2671 ret = write(pipe_out[1], &c, 1);
2672 if (ret != 1) {
2673 d_fprintf(stderr, "failed to send exit signal to child. %s\n",
2674 strerror(errno));
2675 goto fail;
2678 /* Wait 20 seconds for the lock. */
2679 alarm_cli = cli1;
2680 CatchSignal(SIGALRM, alarm_handler_parent);
2681 alarm(20);
2683 start = timeval_current();
2685 status = cli_lock32(cli1, fnum, 0, 4, -1, WRITE_LOCK);
2686 if (!NT_STATUS_IS_OK(status)) {
2687 d_fprintf(stderr, "Unable to apply write lock on range 0:4, error was "
2688 "%s\n", nt_errstr(status));
2689 goto fail_nofd;
2691 alarm(0);
2693 seconds = timeval_elapsed(&start);
2695 printf("Parent got the lock after %.2f seconds.\n",
2696 seconds);
2698 status = cli_close(cli1, fnum);
2699 if (!NT_STATUS_IS_OK(status)) {
2700 d_fprintf(stderr, "cli_close(fnum1) %s\n", nt_errstr(status));
2701 goto fail;
2704 correct = true;
2706 fail:
2707 cli_close(cli1, fnum);
2708 torture_close_connection(cli1);
2710 fail_nofd:
2712 printf("finished locktest9\n");
2713 return correct;
2717 test whether fnums and tids open on one VC are available on another (a major
2718 security hole)
2720 static bool run_fdpasstest(int dummy)
2722 struct cli_state *cli1, *cli2;
2723 const char *fname = "\\fdpass.tst";
2724 uint16_t fnum1;
2725 char buf[1024];
2726 NTSTATUS status;
2728 if (!torture_open_connection(&cli1, 0) || !torture_open_connection(&cli2, 1)) {
2729 return False;
2731 smbXcli_conn_set_sockopt(cli1->conn, sockops);
2732 smbXcli_conn_set_sockopt(cli2->conn, sockops);
2734 printf("starting fdpasstest\n");
2736 cli_unlink(cli1, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2738 status = cli_openx(cli1, fname, O_RDWR|O_CREAT|O_EXCL, DENY_NONE,
2739 &fnum1);
2740 if (!NT_STATUS_IS_OK(status)) {
2741 printf("open of %s failed (%s)\n", fname, nt_errstr(status));
2742 return False;
2745 status = cli_writeall(cli1, fnum1, 0, (const uint8_t *)"hello world\n", 0,
2746 13, NULL);
2747 if (!NT_STATUS_IS_OK(status)) {
2748 printf("write failed (%s)\n", nt_errstr(status));
2749 return False;
2752 cli_state_set_uid(cli2, cli_state_get_uid(cli1));
2753 cli_state_set_tid(cli2, cli_state_get_tid(cli1));
2754 cli_setpid(cli2, cli_getpid(cli1));
2756 if (test_cli_read(cli2, fnum1, buf, 0, 13, NULL, 13)) {
2757 printf("read succeeded! nasty security hole [%s]\n", buf);
2758 return false;
2761 cli_close(cli1, fnum1);
2762 cli_unlink(cli1, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2764 torture_close_connection(cli1);
2765 torture_close_connection(cli2);
2767 printf("finished fdpasstest\n");
2768 return True;
2771 static bool run_fdsesstest(int dummy)
2773 struct cli_state *cli;
2774 uint16 new_vuid;
2775 uint16 saved_vuid;
2776 uint16 new_cnum;
2777 uint16 saved_cnum;
2778 const char *fname = "\\fdsess.tst";
2779 const char *fname1 = "\\fdsess1.tst";
2780 uint16_t fnum1;
2781 uint16_t fnum2;
2782 char buf[1024];
2783 bool ret = True;
2784 NTSTATUS status;
2786 if (!torture_open_connection(&cli, 0))
2787 return False;
2788 smbXcli_conn_set_sockopt(cli->conn, sockops);
2790 if (!torture_cli_session_setup2(cli, &new_vuid))
2791 return False;
2793 saved_cnum = cli_state_get_tid(cli);
2794 if (!NT_STATUS_IS_OK(cli_tree_connect(cli, share, "?????", "", 1)))
2795 return False;
2796 new_cnum = cli_state_get_tid(cli);
2797 cli_state_set_tid(cli, saved_cnum);
2799 printf("starting fdsesstest\n");
2801 cli_unlink(cli, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2802 cli_unlink(cli, fname1, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2804 status = cli_openx(cli, fname, O_RDWR|O_CREAT|O_EXCL, DENY_NONE, &fnum1);
2805 if (!NT_STATUS_IS_OK(status)) {
2806 printf("open of %s failed (%s)\n", fname, nt_errstr(status));
2807 return False;
2810 status = cli_writeall(cli, fnum1, 0, (const uint8_t *)"hello world\n", 0, 13,
2811 NULL);
2812 if (!NT_STATUS_IS_OK(status)) {
2813 printf("write failed (%s)\n", nt_errstr(status));
2814 return False;
2817 saved_vuid = cli_state_get_uid(cli);
2818 cli_state_set_uid(cli, new_vuid);
2820 if (test_cli_read(cli, fnum1, buf, 0, 13, NULL, 13)) {
2821 printf("read succeeded with different vuid! "
2822 "nasty security hole [%s]\n", buf);
2823 ret = false;
2825 /* Try to open a file with different vuid, samba cnum. */
2826 if (NT_STATUS_IS_OK(cli_openx(cli, fname1, O_RDWR|O_CREAT|O_EXCL, DENY_NONE, &fnum2))) {
2827 printf("create with different vuid, same cnum succeeded.\n");
2828 cli_close(cli, fnum2);
2829 cli_unlink(cli, fname1, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2830 } else {
2831 printf("create with different vuid, same cnum failed.\n");
2832 printf("This will cause problems with service clients.\n");
2833 ret = False;
2836 cli_state_set_uid(cli, saved_vuid);
2838 /* Try with same vuid, different cnum. */
2839 cli_state_set_tid(cli, new_cnum);
2841 if (test_cli_read(cli, fnum1, buf, 0, 13, NULL, 13)) {
2842 printf("read succeeded with different cnum![%s]\n", buf);
2843 ret = false;
2846 cli_state_set_tid(cli, saved_cnum);
2847 cli_close(cli, fnum1);
2848 cli_unlink(cli, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2850 torture_close_connection(cli);
2852 printf("finished fdsesstest\n");
2853 return ret;
2857 This test checks that
2859 1) the server does not allow an unlink on a file that is open
2861 static bool run_unlinktest(int dummy)
2863 struct cli_state *cli;
2864 const char *fname = "\\unlink.tst";
2865 uint16_t fnum;
2866 bool correct = True;
2867 NTSTATUS status;
2869 if (!torture_open_connection(&cli, 0)) {
2870 return False;
2873 smbXcli_conn_set_sockopt(cli->conn, sockops);
2875 printf("starting unlink test\n");
2877 cli_unlink(cli, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2879 cli_setpid(cli, 1);
2881 status = cli_openx(cli, fname, O_RDWR|O_CREAT|O_EXCL, DENY_NONE, &fnum);
2882 if (!NT_STATUS_IS_OK(status)) {
2883 printf("open of %s failed (%s)\n", fname, nt_errstr(status));
2884 return False;
2887 status = cli_unlink(cli, fname,
2888 FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2889 if (NT_STATUS_IS_OK(status)) {
2890 printf("error: server allowed unlink on an open file\n");
2891 correct = False;
2892 } else {
2893 correct = check_error(__LINE__, status, ERRDOS, ERRbadshare,
2894 NT_STATUS_SHARING_VIOLATION);
2897 cli_close(cli, fnum);
2898 cli_unlink(cli, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2900 if (!torture_close_connection(cli)) {
2901 correct = False;
2904 printf("unlink test finished\n");
2906 return correct;
2911 test how many open files this server supports on the one socket
2913 static bool run_maxfidtest(int dummy)
2915 struct cli_state *cli;
2916 fstring fname;
2917 uint16_t fnums[0x11000];
2918 int i;
2919 int retries=4;
2920 bool correct = True;
2921 NTSTATUS status;
2923 cli = current_cli;
2925 if (retries <= 0) {
2926 printf("failed to connect\n");
2927 return False;
2930 smbXcli_conn_set_sockopt(cli->conn, sockops);
2932 for (i=0; i<0x11000; i++) {
2933 slprintf(fname,sizeof(fname)-1,"\\maxfid.%d.%d", i,(int)getpid());
2934 status = cli_openx(cli, fname, O_RDWR|O_CREAT|O_TRUNC, DENY_NONE,
2935 &fnums[i]);
2936 if (!NT_STATUS_IS_OK(status)) {
2937 printf("open of %s failed (%s)\n",
2938 fname, nt_errstr(status));
2939 printf("maximum fnum is %d\n", i);
2940 break;
2942 printf("%6d\r", i);
2944 printf("%6d\n", i);
2945 i--;
2947 printf("cleaning up\n");
2948 for (;i>=0;i--) {
2949 slprintf(fname,sizeof(fname)-1,"\\maxfid.%d.%d", i,(int)getpid());
2950 cli_close(cli, fnums[i]);
2952 status = cli_unlink(cli, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
2953 if (!NT_STATUS_IS_OK(status)) {
2954 printf("unlink of %s failed (%s)\n",
2955 fname, nt_errstr(status));
2956 correct = False;
2958 printf("%6d\r", i);
2960 printf("%6d\n", 0);
2962 printf("maxfid test finished\n");
2963 if (!torture_close_connection(cli)) {
2964 correct = False;
2966 return correct;
2969 /* generate a random buffer */
2970 static void rand_buf(char *buf, int len)
2972 while (len--) {
2973 *buf = (char)sys_random();
2974 buf++;
2978 /* send smb negprot commands, not reading the response */
2979 static bool run_negprot_nowait(int dummy)
2981 struct tevent_context *ev;
2982 int i;
2983 struct cli_state *cli;
2984 bool correct = True;
2986 printf("starting negprot nowait test\n");
2988 ev = samba_tevent_context_init(talloc_tos());
2989 if (ev == NULL) {
2990 return false;
2993 if (!(cli = open_nbt_connection())) {
2994 TALLOC_FREE(ev);
2995 return False;
2998 for (i=0;i<50000;i++) {
2999 struct tevent_req *req;
3001 req = smbXcli_negprot_send(ev, ev, cli->conn, cli->timeout,
3002 PROTOCOL_CORE, PROTOCOL_NT1);
3003 if (req == NULL) {
3004 TALLOC_FREE(ev);
3005 return false;
3007 if (!tevent_req_poll(req, ev)) {
3008 d_fprintf(stderr, "tevent_req_poll failed: %s\n",
3009 strerror(errno));
3010 TALLOC_FREE(ev);
3011 return false;
3013 TALLOC_FREE(req);
3016 if (torture_close_connection(cli)) {
3017 correct = False;
3020 printf("finished negprot nowait test\n");
3022 return correct;
3025 /* send smb negprot commands, not reading the response */
3026 static bool run_bad_nbt_session(int dummy)
3028 struct nmb_name called, calling;
3029 struct sockaddr_storage ss;
3030 NTSTATUS status;
3031 int fd;
3032 bool ret;
3034 printf("starting bad nbt session test\n");
3036 make_nmb_name(&calling, myname, 0x0);
3037 make_nmb_name(&called , host, 0x20);
3039 if (!resolve_name(host, &ss, 0x20, true)) {
3040 d_fprintf(stderr, "Could not resolve name %s\n", host);
3041 return false;
3044 status = open_socket_out(&ss, NBT_SMB_PORT, 10000, &fd);
3045 if (!NT_STATUS_IS_OK(status)) {
3046 d_fprintf(stderr, "open_socket_out failed: %s\n",
3047 nt_errstr(status));
3048 return false;
3051 ret = cli_bad_session_request(fd, &calling, &called);
3052 close(fd);
3053 if (!ret) {
3054 d_fprintf(stderr, "open_socket_out failed: %s\n",
3055 nt_errstr(status));
3056 return false;
3059 printf("finished bad nbt session test\n");
3060 return true;
3063 /* send random IPC commands */
3064 static bool run_randomipc(int dummy)
3066 char *rparam = NULL;
3067 char *rdata = NULL;
3068 unsigned int rdrcnt,rprcnt;
3069 char param[1024];
3070 int api, param_len, i;
3071 struct cli_state *cli;
3072 bool correct = True;
3073 int count = 50000;
3075 printf("starting random ipc test\n");
3077 if (!torture_open_connection(&cli, 0)) {
3078 return False;
3081 for (i=0;i<count;i++) {
3082 api = sys_random() % 500;
3083 param_len = (sys_random() % 64);
3085 rand_buf(param, param_len);
3087 SSVAL(param,0,api);
3089 cli_api(cli,
3090 param, param_len, 8,
3091 NULL, 0, BUFFER_SIZE,
3092 &rparam, &rprcnt,
3093 &rdata, &rdrcnt);
3094 if (i % 100 == 0) {
3095 printf("%d/%d\r", i,count);
3098 printf("%d/%d\n", i, count);
3100 if (!torture_close_connection(cli)) {
3101 correct = False;
3104 printf("finished random ipc test\n");
3106 return correct;
3111 static void browse_callback(const char *sname, uint32 stype,
3112 const char *comment, void *state)
3114 printf("\t%20.20s %08x %s\n", sname, stype, comment);
3120 This test checks the browse list code
3123 static bool run_browsetest(int dummy)
3125 static struct cli_state *cli;
3126 bool correct = True;
3128 printf("starting browse test\n");
3130 if (!torture_open_connection(&cli, 0)) {
3131 return False;
3134 printf("domain list:\n");
3135 cli_NetServerEnum(cli, cli->server_domain,
3136 SV_TYPE_DOMAIN_ENUM,
3137 browse_callback, NULL);
3139 printf("machine list:\n");
3140 cli_NetServerEnum(cli, cli->server_domain,
3141 SV_TYPE_ALL,
3142 browse_callback, NULL);
3144 if (!torture_close_connection(cli)) {
3145 correct = False;
3148 printf("browse test finished\n");
3150 return correct;
3156 This checks how the getatr calls works
3158 static bool run_attrtest(int dummy)
3160 struct cli_state *cli;
3161 uint16_t fnum;
3162 time_t t, t2;
3163 const char *fname = "\\attrib123456789.tst";
3164 bool correct = True;
3165 NTSTATUS status;
3167 printf("starting attrib test\n");
3169 if (!torture_open_connection(&cli, 0)) {
3170 return False;
3173 cli_unlink(cli, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
3174 cli_openx(cli, fname,
3175 O_RDWR | O_CREAT | O_TRUNC, DENY_NONE, &fnum);
3176 cli_close(cli, fnum);
3178 status = cli_getatr(cli, fname, NULL, NULL, &t);
3179 if (!NT_STATUS_IS_OK(status)) {
3180 printf("getatr failed (%s)\n", nt_errstr(status));
3181 correct = False;
3184 if (abs(t - time(NULL)) > 60*60*24*10) {
3185 printf("ERROR: SMBgetatr bug. time is %s",
3186 ctime(&t));
3187 t = time(NULL);
3188 correct = True;
3191 t2 = t-60*60*24; /* 1 day ago */
3193 status = cli_setatr(cli, fname, 0, t2);
3194 if (!NT_STATUS_IS_OK(status)) {
3195 printf("setatr failed (%s)\n", nt_errstr(status));
3196 correct = True;
3199 status = cli_getatr(cli, fname, NULL, NULL, &t);
3200 if (!NT_STATUS_IS_OK(status)) {
3201 printf("getatr failed (%s)\n", nt_errstr(status));
3202 correct = True;
3205 if (t != t2) {
3206 printf("ERROR: getatr/setatr bug. times are\n%s",
3207 ctime(&t));
3208 printf("%s", ctime(&t2));
3209 correct = True;
3212 cli_unlink(cli, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
3214 if (!torture_close_connection(cli)) {
3215 correct = False;
3218 printf("attrib test finished\n");
3220 return correct;
3225 This checks a couple of trans2 calls
3227 static bool run_trans2test(int dummy)
3229 struct cli_state *cli;
3230 uint16_t fnum;
3231 off_t size;
3232 time_t c_time, a_time, m_time;
3233 struct timespec c_time_ts, a_time_ts, m_time_ts, w_time_ts, m_time2_ts;
3234 const char *fname = "\\trans2.tst";
3235 const char *dname = "\\trans2";
3236 const char *fname2 = "\\trans2\\trans2.tst";
3237 char *pname;
3238 bool correct = True;
3239 NTSTATUS status;
3240 uint32_t fs_attr;
3242 printf("starting trans2 test\n");
3244 if (!torture_open_connection(&cli, 0)) {
3245 return False;
3248 status = cli_get_fs_attr_info(cli, &fs_attr);
3249 if (!NT_STATUS_IS_OK(status)) {
3250 printf("ERROR: cli_get_fs_attr_info returned %s\n",
3251 nt_errstr(status));
3252 correct = false;
3255 cli_unlink(cli, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
3256 cli_openx(cli, fname, O_RDWR | O_CREAT | O_TRUNC, DENY_NONE, &fnum);
3257 status = cli_qfileinfo_basic(cli, fnum, NULL, &size, &c_time_ts,
3258 &a_time_ts, &w_time_ts, &m_time_ts, NULL);
3259 if (!NT_STATUS_IS_OK(status)) {
3260 printf("ERROR: qfileinfo failed (%s)\n", nt_errstr(status));
3261 correct = False;
3264 status = cli_qfilename(cli, fnum, talloc_tos(), &pname);
3265 if (!NT_STATUS_IS_OK(status)) {
3266 printf("ERROR: qfilename failed (%s)\n", nt_errstr(status));
3267 correct = False;
3270 if (strcmp(pname, fname)) {
3271 printf("qfilename gave different name? [%s] [%s]\n",
3272 fname, pname);
3273 correct = False;
3276 cli_close(cli, fnum);
3278 sleep(2);
3280 cli_unlink(cli, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
3281 status = cli_openx(cli, fname, O_RDWR | O_CREAT | O_TRUNC, DENY_NONE,
3282 &fnum);
3283 if (!NT_STATUS_IS_OK(status)) {
3284 printf("open of %s failed (%s)\n", fname, nt_errstr(status));
3285 return False;
3287 cli_close(cli, fnum);
3289 status = cli_qpathinfo1(cli, fname, &c_time, &a_time, &m_time, &size,
3290 NULL);
3291 if (!NT_STATUS_IS_OK(status)) {
3292 printf("ERROR: qpathinfo failed (%s)\n", nt_errstr(status));
3293 correct = False;
3294 } else {
3295 time_t t = time(NULL);
3297 if (c_time != m_time) {
3298 printf("create time=%s", ctime(&c_time));
3299 printf("modify time=%s", ctime(&m_time));
3300 printf("This system appears to have sticky create times\n");
3302 if ((abs(a_time - t) > 60) && (a_time % (60*60) == 0)) {
3303 printf("access time=%s", ctime(&a_time));
3304 printf("This system appears to set a midnight access time\n");
3305 correct = False;
3308 if (abs(m_time - t) > 60*60*24*7) {
3309 printf("ERROR: totally incorrect times - maybe word reversed? mtime=%s", ctime(&m_time));
3310 correct = False;
3315 cli_unlink(cli, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
3316 cli_openx(cli, fname,
3317 O_RDWR | O_CREAT | O_TRUNC, DENY_NONE, &fnum);
3318 cli_close(cli, fnum);
3319 status = cli_qpathinfo2(cli, fname, &c_time_ts, &a_time_ts, &w_time_ts,
3320 &m_time_ts, &size, NULL, NULL);
3321 if (!NT_STATUS_IS_OK(status)) {
3322 printf("ERROR: qpathinfo2 failed (%s)\n", nt_errstr(status));
3323 correct = False;
3324 } else {
3325 if (w_time_ts.tv_sec < 60*60*24*2) {
3326 printf("write time=%s", ctime(&w_time_ts.tv_sec));
3327 printf("This system appears to set a initial 0 write time\n");
3328 correct = False;
3332 cli_unlink(cli, fname, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
3335 /* check if the server updates the directory modification time
3336 when creating a new file */
3337 status = cli_mkdir(cli, dname);
3338 if (!NT_STATUS_IS_OK(status)) {
3339 printf("ERROR: mkdir failed (%s)\n", nt_errstr(status));
3340 correct = False;
3342 sleep(3);
3343 status = cli_qpathinfo2(cli, "\\trans2\\", &c_time_ts, &a_time_ts,
3344 &w_time_ts, &m_time_ts, &size, NULL, NULL);
3345 if (!NT_STATUS_IS_OK(status)) {
3346 printf("ERROR: qpathinfo2 failed (%s)\n", nt_errstr(status));
3347 correct = False;
3350 cli_openx(cli, fname2,
3351 O_RDWR | O_CREAT | O_TRUNC, DENY_NONE, &fnum);
3352 cli_writeall(cli, fnum, 0, (uint8_t *)&fnum, 0, sizeof(fnum), NULL);
3353 cli_close(cli, fnum);
3354 status = cli_qpathinfo2(cli, "\\trans2\\", &c_time_ts, &a_time_ts,
3355 &w_time_ts, &m_time2_ts, &size, NULL, NULL);
3356 if (!NT_STATUS_IS_OK(status)) {
3357 printf("ERROR: qpathinfo2 failed (%s)\n", nt_errstr(status));
3358 correct = False;
3359 } else {
3360 if (memcmp(&m_time_ts, &m_time2_ts, sizeof(struct timespec))
3361 == 0) {
3362 printf("This system does not update directory modification times\n");
3363 correct = False;
3366 cli_unlink(cli, fname2, FILE_ATTRIBUTE_SYSTEM | FILE_ATTRIBUTE_HIDDEN);
3367 cli_rmdir(cli, dname);
3369 if (!torture_close_connection(cli)) {
3370 correct = False;
3373 printf("trans2 test finished\n");
3375 return correct;
3379 This checks new W2K calls.
3382 static NTSTATUS new_trans(<