2 Unix SMB/CIFS implementation.
3 Main SMB reply routines
4 Copyright (C) Andrew Tridgell 1992-1998
5 Copyright (C) Andrew Bartlett 2001
6 Copyright (C) Jeremy Allison 1992-2004.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23 This file handles most of the reply_ calls that the server
24 makes to handle specific protocols
29 /* look in server.c for some explanation of these variables */
30 extern enum protocol_types Protocol;
33 unsigned int smb_echo_count = 0;
34 extern uint32 global_client_caps;
36 extern struct current_user current_user;
37 extern BOOL global_encrypted_passwords_negotiated;
39 /****************************************************************************
40 Ensure we check the path in *exactly* the same way as W2K for regular pathnames.
41 We're assuming here that '/' is not the second byte in any multibyte char
42 set (a safe assumption). '\\' *may* be the second byte in a multibyte char
44 ****************************************************************************/
46 NTSTATUS check_path_syntax(pstring destname, const pstring srcname)
49 const char *s = srcname;
50 NTSTATUS ret = NT_STATUS_OK;
51 BOOL start_of_name_component = True;
52 unsigned int num_bad_components = 0;
55 if (IS_DIRECTORY_SEP(*s)) {
57 * Safe to assume is not the second part of a mb char as this is handled below.
59 /* Eat multiple '/' or '\\' */
60 while (IS_DIRECTORY_SEP(*s)) {
63 if ((d != destname) && (*s != '\0')) {
64 /* We only care about non-leading or trailing '/' or '\\' */
68 start_of_name_component = True;
72 if (start_of_name_component) {
73 if ((s[0] == '.') && (s[1] == '.') && (IS_DIRECTORY_SEP(s[2]) || s[2] == '\0')) {
74 /* Uh oh - "/../" or "\\..\\" or "/..\0" or "\\..\0" ! */
77 * No mb char starts with '.' so we're safe checking the directory separator here.
80 /* If we just added a '/' - delete it */
81 if ((d > destname) && (*(d-1) == '/')) {
86 /* Are we at the start ? Can't go back further if so. */
88 ret = NT_STATUS_OBJECT_PATH_SYNTAX_BAD;
91 /* Go back one level... */
92 /* We know this is safe as '/' cannot be part of a mb sequence. */
93 /* NOTE - if this assumption is invalid we are not in good shape... */
94 /* Decrement d first as d points to the *next* char to write into. */
95 for (d--; d > destname; d--) {
99 s += 2; /* Else go past the .. */
100 /* We're still at the start of a name component, just the previous one. */
102 if (num_bad_components) {
103 /* Hmmm. Should we only decrement the bad_components if
104 we're removing a bad component ? Need to check this. JRA. */
105 num_bad_components--;
110 } else if ((s[0] == '.') && ((s[1] == '\0') || IS_DIRECTORY_SEP(s[1]))) {
111 /* Component of pathname can't be "." only. */
112 ret = NT_STATUS_OBJECT_NAME_INVALID;
113 num_bad_components++;
121 return NT_STATUS_OBJECT_NAME_INVALID;
129 return NT_STATUS_OBJECT_NAME_INVALID;
136 /* Get the size of the next MB character. */
137 next_codepoint(s,&siz);
155 DEBUG(0,("check_path_syntax: character length assumptions invalid !\n"));
157 return NT_STATUS_INVALID_PARAMETER;
160 if (start_of_name_component && num_bad_components) {
161 num_bad_components++;
163 start_of_name_component = False;
166 if (NT_STATUS_EQUAL(ret, NT_STATUS_OBJECT_NAME_INVALID)) {
167 if (num_bad_components > 1) {
168 ret = NT_STATUS_OBJECT_PATH_NOT_FOUND;
176 /****************************************************************************
177 Ensure we check the path in *exactly* the same way as W2K for a findfirst/findnext
178 path or anything including wildcards.
179 We're assuming here that '/' is not the second byte in any multibyte char
180 set (a safe assumption). '\\' *may* be the second byte in a multibyte char
182 ****************************************************************************/
184 NTSTATUS check_path_syntax_wcard(pstring destname, const pstring srcname, BOOL *p_contains_wcard)
187 const char *s = srcname;
188 NTSTATUS ret = NT_STATUS_OK;
189 BOOL start_of_name_component = True;
190 unsigned int num_bad_components = 0;
192 *p_contains_wcard = False;
195 if (IS_DIRECTORY_SEP(*s)) {
197 * Safe to assume is not the second part of a mb char as this is handled below.
199 /* Eat multiple '/' or '\\' */
200 while (IS_DIRECTORY_SEP(*s)) {
203 if ((d != destname) && (*s != '\0')) {
204 /* We only care about non-leading or trailing '/' or '\\' */
208 start_of_name_component = True;
212 if (start_of_name_component) {
213 if ((s[0] == '.') && (s[1] == '.') && (IS_DIRECTORY_SEP(s[2]) || s[2] == '\0')) {
214 /* Uh oh - "/../" or "\\..\\" or "/..\0" or "\\..\0" ! */
217 * No mb char starts with '.' so we're safe checking the directory separator here.
220 /* If we just added a '/' - delete it */
221 if ((d > destname) && (*(d-1) == '/')) {
226 /* Are we at the start ? Can't go back further if so. */
228 ret = NT_STATUS_OBJECT_PATH_SYNTAX_BAD;
231 /* Go back one level... */
232 /* We know this is safe as '/' cannot be part of a mb sequence. */
233 /* NOTE - if this assumption is invalid we are not in good shape... */
234 /* Decrement d first as d points to the *next* char to write into. */
235 for (d--; d > destname; d--) {
239 s += 2; /* Else go past the .. */
240 /* We're still at the start of a name component, just the previous one. */
242 if (num_bad_components) {
243 /* Hmmm. Should we only decrement the bad_components if
244 we're removing a bad component ? Need to check this. JRA. */
245 num_bad_components--;
250 } else if ((s[0] == '.') && ((s[1] == '\0') || IS_DIRECTORY_SEP(s[1]))) {
251 /* Component of pathname can't be "." only. */
252 ret = NT_STATUS_OBJECT_NAME_INVALID;
253 num_bad_components++;
261 return NT_STATUS_OBJECT_NAME_INVALID;
263 if (!*p_contains_wcard) {
270 *p_contains_wcard = True;
279 /* Get the size of the next MB character. */
280 next_codepoint(s,&siz);
298 DEBUG(0,("check_path_syntax_wcard: character length assumptions invalid !\n"));
300 return NT_STATUS_INVALID_PARAMETER;
303 if (start_of_name_component && num_bad_components) {
304 num_bad_components++;
306 start_of_name_component = False;
309 if (NT_STATUS_EQUAL(ret, NT_STATUS_OBJECT_NAME_INVALID)) {
310 /* For some strange reason being called from findfirst changes
311 the num_components number to cause the error return to change. JRA. */
312 if (num_bad_components > 2) {
313 ret = NT_STATUS_OBJECT_PATH_NOT_FOUND;
321 /****************************************************************************
322 Check the path for a POSIX client.
323 We're assuming here that '/' is not the second byte in any multibyte char
324 set (a safe assumption).
325 ****************************************************************************/
327 NTSTATUS check_path_syntax_posix(pstring destname, const pstring srcname)
330 const char *s = srcname;
331 NTSTATUS ret = NT_STATUS_OK;
332 BOOL start_of_name_component = True;
337 * Safe to assume is not the second part of a mb char as this is handled below.
339 /* Eat multiple '/' or '\\' */
343 if ((d != destname) && (*s != '\0')) {
344 /* We only care about non-leading or trailing '/' */
348 start_of_name_component = True;
352 if (start_of_name_component) {
353 if ((s[0] == '.') && (s[1] == '.') && (s[2] == '/' || s[2] == '\0')) {
354 /* Uh oh - "/../" or "/..\0" ! */
357 * No mb char starts with '.' so we're safe checking the directory separator here.
360 /* If we just added a '/' - delete it */
361 if ((d > destname) && (*(d-1) == '/')) {
366 /* Are we at the start ? Can't go back further if so. */
368 ret = NT_STATUS_OBJECT_PATH_SYNTAX_BAD;
371 /* Go back one level... */
372 /* We know this is safe as '/' cannot be part of a mb sequence. */
373 /* NOTE - if this assumption is invalid we are not in good shape... */
374 /* Decrement d first as d points to the *next* char to write into. */
375 for (d--; d > destname; d--) {
379 s += 2; /* Else go past the .. */
382 } else if ((s[0] == '.') && ((s[1] == '\0') || (s[1] == '/'))) {
393 /* Get the size of the next MB character. */
394 next_codepoint(s,&siz);
412 DEBUG(0,("check_path_syntax_posix: character length assumptions invalid !\n"));
414 return NT_STATUS_INVALID_PARAMETER;
417 start_of_name_component = False;
424 /****************************************************************************
425 Pull a string and check the path allowing a wilcard - provide for error return.
426 ****************************************************************************/
428 size_t srvstr_get_path_wcard(char *inbuf, char *dest, const char *src, size_t dest_len, size_t src_len, int flags,
429 NTSTATUS *err, BOOL *contains_wcard)
432 char *tmppath_ptr = tmppath;
435 SMB_ASSERT(dest_len == sizeof(pstring));
439 ret = srvstr_pull_buf( inbuf, tmppath_ptr, src, dest_len, flags);
441 ret = srvstr_pull( inbuf, tmppath_ptr, src, dest_len, src_len, flags);
444 *contains_wcard = False;
446 if (lp_posix_pathnames()) {
447 *err = check_path_syntax_posix(dest, tmppath);
449 *err = check_path_syntax_wcard(dest, tmppath, contains_wcard);
455 /****************************************************************************
456 Pull a string and check the path - provide for error return.
457 ****************************************************************************/
459 size_t srvstr_get_path(char *inbuf, char *dest, const char *src, size_t dest_len, size_t src_len, int flags, NTSTATUS *err)
462 char *tmppath_ptr = tmppath;
465 SMB_ASSERT(dest_len == sizeof(pstring));
469 ret = srvstr_pull_buf( inbuf, tmppath_ptr, src, dest_len, flags);
471 ret = srvstr_pull( inbuf, tmppath_ptr, src, dest_len, src_len, flags);
473 if (lp_posix_pathnames()) {
474 *err = check_path_syntax_posix(dest, tmppath);
476 *err = check_path_syntax(dest, tmppath);
482 /****************************************************************************
483 Reply to a special message.
484 ****************************************************************************/
486 int reply_special(char *inbuf,char *outbuf)
489 int msg_type = CVAL(inbuf,0);
490 int msg_flags = CVAL(inbuf,1);
494 static BOOL already_got_session = False;
498 memset(outbuf,'\0',smb_size);
500 smb_setlen(outbuf,0);
503 case 0x81: /* session request */
505 if (already_got_session) {
506 exit_server_cleanly("multiple session request not permitted");
509 SCVAL(outbuf,0,0x82);
511 if (name_len(inbuf+4) > 50 ||
512 name_len(inbuf+4 + name_len(inbuf + 4)) > 50) {
513 DEBUG(0,("Invalid name length in session request\n"));
516 name_extract(inbuf,4,name1);
517 name_type = name_extract(inbuf,4 + name_len(inbuf + 4),name2);
518 DEBUG(2,("netbios connect: name1=%s name2=%s\n",
521 set_local_machine_name(name1, True);
522 set_remote_machine_name(name2, True);
524 DEBUG(2,("netbios connect: local=%s remote=%s, name type = %x\n",
525 get_local_machine_name(), get_remote_machine_name(),
528 if (name_type == 'R') {
529 /* We are being asked for a pathworks session ---
531 SCVAL(outbuf, 0,0x83);
535 /* only add the client's machine name to the list
536 of possibly valid usernames if we are operating
537 in share mode security */
538 if (lp_security() == SEC_SHARE) {
539 add_session_user(get_remote_machine_name());
542 reload_services(True);
545 already_got_session = True;
548 case 0x89: /* session keepalive request
549 (some old clients produce this?) */
550 SCVAL(outbuf,0,SMBkeepalive);
554 case 0x82: /* positive session response */
555 case 0x83: /* negative session response */
556 case 0x84: /* retarget session response */
557 DEBUG(0,("Unexpected session response\n"));
560 case SMBkeepalive: /* session keepalive */
565 DEBUG(5,("init msg_type=0x%x msg_flags=0x%x\n",
566 msg_type, msg_flags));
571 /****************************************************************************
573 conn POINTER CAN BE NULL HERE !
574 ****************************************************************************/
576 int reply_tcon(connection_struct *conn,
577 char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
584 uint16 vuid = SVAL(inbuf,smb_uid);
588 DATA_BLOB password_blob;
590 START_PROFILE(SMBtcon);
592 *service_buf = *password = *dev = 0;
594 p = smb_buf(inbuf)+1;
595 p += srvstr_pull_buf(inbuf, service_buf, p, sizeof(service_buf), STR_TERMINATE) + 1;
596 pwlen = srvstr_pull_buf(inbuf, password, p, sizeof(password), STR_TERMINATE) + 1;
598 p += srvstr_pull_buf(inbuf, dev, p, sizeof(dev), STR_TERMINATE) + 1;
600 p = strrchr_m(service_buf,'\\');
604 service = service_buf;
607 password_blob = data_blob(password, pwlen+1);
609 conn = make_connection(service,password_blob,dev,vuid,&nt_status);
611 data_blob_clear_free(&password_blob);
614 END_PROFILE(SMBtcon);
615 return ERROR_NT(nt_status);
618 outsize = set_message(outbuf,2,0,True);
619 SSVAL(outbuf,smb_vwv0,max_recv);
620 SSVAL(outbuf,smb_vwv1,conn->cnum);
621 SSVAL(outbuf,smb_tid,conn->cnum);
623 DEBUG(3,("tcon service=%s cnum=%d\n",
624 service, conn->cnum));
626 END_PROFILE(SMBtcon);
630 /****************************************************************************
631 Reply to a tcon and X.
632 conn POINTER CAN BE NULL HERE !
633 ****************************************************************************/
635 int reply_tcon_and_X(connection_struct *conn, char *inbuf,char *outbuf,int length,int bufsize)
640 /* what the cleint thinks the device is */
641 fstring client_devicetype;
642 /* what the server tells the client the share represents */
643 const char *server_devicetype;
645 uint16 vuid = SVAL(inbuf,smb_uid);
646 int passlen = SVAL(inbuf,smb_vwv3);
650 START_PROFILE(SMBtconX);
652 *service = *client_devicetype = 0;
654 /* we might have to close an old one */
655 if ((SVAL(inbuf,smb_vwv2) & 0x1) && conn) {
656 close_cnum(conn,vuid);
659 if (passlen > MAX_PASS_LEN) {
660 return ERROR_DOS(ERRDOS,ERRbuftoosmall);
663 if (global_encrypted_passwords_negotiated) {
664 password = data_blob(smb_buf(inbuf),passlen);
666 password = data_blob(smb_buf(inbuf),passlen+1);
667 /* Ensure correct termination */
668 password.data[passlen]=0;
671 p = smb_buf(inbuf) + passlen;
672 p += srvstr_pull_buf(inbuf, path, p, sizeof(path), STR_TERMINATE);
675 * the service name can be either: \\server\share
676 * or share directly like on the DELL PowerVault 705
679 q = strchr_m(path+2,'\\');
681 END_PROFILE(SMBtconX);
682 return(ERROR_DOS(ERRDOS,ERRnosuchshare));
684 fstrcpy(service,q+1);
687 fstrcpy(service,path);
689 p += srvstr_pull(inbuf, client_devicetype, p, sizeof(client_devicetype), 6, STR_ASCII);
691 DEBUG(4,("Client requested device type [%s] for share [%s]\n", client_devicetype, service));
693 conn = make_connection(service,password,client_devicetype,vuid,&nt_status);
695 data_blob_clear_free(&password);
698 END_PROFILE(SMBtconX);
699 return ERROR_NT(nt_status);
703 server_devicetype = "IPC";
704 else if ( IS_PRINT(conn) )
705 server_devicetype = "LPT1:";
707 server_devicetype = "A:";
709 if (Protocol < PROTOCOL_NT1) {
710 set_message(outbuf,2,0,True);
712 p += srvstr_push(outbuf, p, server_devicetype, -1,
713 STR_TERMINATE|STR_ASCII);
714 set_message_end(outbuf,p);
716 /* NT sets the fstype of IPC$ to the null string */
717 const char *fstype = IS_IPC(conn) ? "" : lp_fstype(SNUM(conn));
719 set_message(outbuf,3,0,True);
722 p += srvstr_push(outbuf, p, server_devicetype, -1,
723 STR_TERMINATE|STR_ASCII);
724 p += srvstr_push(outbuf, p, fstype, -1,
727 set_message_end(outbuf,p);
729 /* what does setting this bit do? It is set by NT4 and
730 may affect the ability to autorun mounted cdroms */
731 SSVAL(outbuf, smb_vwv2, SMB_SUPPORT_SEARCH_BITS|
732 (lp_csc_policy(SNUM(conn)) << 2));
734 init_dfsroot(conn, inbuf, outbuf);
738 DEBUG(3,("tconX service=%s \n",
741 /* set the incoming and outgoing tid to the just created one */
742 SSVAL(inbuf,smb_tid,conn->cnum);
743 SSVAL(outbuf,smb_tid,conn->cnum);
745 END_PROFILE(SMBtconX);
746 return chain_reply(inbuf,outbuf,length,bufsize);
749 /****************************************************************************
750 Reply to an unknown type.
751 ****************************************************************************/
753 int reply_unknown(char *inbuf,char *outbuf)
756 type = CVAL(inbuf,smb_com);
758 DEBUG(0,("unknown command type (%s): type=%d (0x%X)\n",
759 smb_fn_name(type), type, type));
761 return(ERROR_DOS(ERRSRV,ERRunknownsmb));
764 /****************************************************************************
766 conn POINTER CAN BE NULL HERE !
767 ****************************************************************************/
769 int reply_ioctl(connection_struct *conn,
770 char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
772 uint16 device = SVAL(inbuf,smb_vwv1);
773 uint16 function = SVAL(inbuf,smb_vwv2);
774 uint32 ioctl_code = (device << 16) + function;
775 int replysize, outsize;
777 START_PROFILE(SMBioctl);
779 DEBUG(4, ("Received IOCTL (code 0x%x)\n", ioctl_code));
781 switch (ioctl_code) {
782 case IOCTL_QUERY_JOB_INFO:
786 END_PROFILE(SMBioctl);
787 return(ERROR_DOS(ERRSRV,ERRnosupport));
790 outsize = set_message(outbuf,8,replysize+1,True);
791 SSVAL(outbuf,smb_vwv1,replysize); /* Total data bytes returned */
792 SSVAL(outbuf,smb_vwv5,replysize); /* Data bytes this buffer */
793 SSVAL(outbuf,smb_vwv6,52); /* Offset to data */
794 p = smb_buf(outbuf) + 1; /* Allow for alignment */
796 switch (ioctl_code) {
797 case IOCTL_QUERY_JOB_INFO:
799 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
801 END_PROFILE(SMBioctl);
802 return(UNIXERROR(ERRDOS,ERRbadfid));
804 SSVAL(p,0,fsp->rap_print_jobid); /* Job number */
805 srvstr_push(outbuf, p+2, global_myname(), 15, STR_TERMINATE|STR_ASCII);
807 srvstr_push(outbuf, p+18, lp_servicename(SNUM(conn)), 13, STR_TERMINATE|STR_ASCII);
813 END_PROFILE(SMBioctl);
817 /****************************************************************************
819 ****************************************************************************/
821 int reply_chkpth(connection_struct *conn, char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
826 BOOL bad_path = False;
827 SMB_STRUCT_STAT sbuf;
830 START_PROFILE(SMBchkpth);
832 srvstr_get_path(inbuf, name, smb_buf(inbuf) + 1, sizeof(name), 0, STR_TERMINATE, &status);
833 if (!NT_STATUS_IS_OK(status)) {
834 END_PROFILE(SMBchkpth);
836 /* Strange DOS error code semantics only for chkpth... */
837 if (!(SVAL(inbuf,smb_flg2) & FLAGS2_32_BIT_ERROR_CODES)) {
838 if (NT_STATUS_EQUAL(NT_STATUS_OBJECT_NAME_INVALID,status)) {
839 /* We need to map to ERRbadpath */
840 status = NT_STATUS_OBJECT_PATH_NOT_FOUND;
843 return ERROR_NT(status);
846 RESOLVE_DFSPATH(name, conn, inbuf, outbuf);
848 unix_convert(name,conn,0,&bad_path,&sbuf);
850 END_PROFILE(SMBchkpth);
851 return ERROR_NT(NT_STATUS_OBJECT_PATH_NOT_FOUND);
854 if (check_name(name,conn)) {
855 if (VALID_STAT(sbuf) || SMB_VFS_STAT(conn,name,&sbuf) == 0)
856 if (!(ok = S_ISDIR(sbuf.st_mode))) {
857 END_PROFILE(SMBchkpth);
858 return ERROR_BOTH(NT_STATUS_NOT_A_DIRECTORY,ERRDOS,ERRbadpath);
863 /* We special case this - as when a Windows machine
864 is parsing a path is steps through the components
865 one at a time - if a component fails it expects
866 ERRbadpath, not ERRbadfile.
868 if(errno == ENOENT) {
870 * Windows returns different error codes if
871 * the parent directory is valid but not the
872 * last component - it returns NT_STATUS_OBJECT_NAME_NOT_FOUND
873 * for that case and NT_STATUS_OBJECT_PATH_NOT_FOUND
874 * if the path is invalid. This is different from set_bad_path_error()
875 * in the non-NT error case.
877 END_PROFILE(SMBchkpth);
878 return ERROR_BOTH(NT_STATUS_OBJECT_NAME_NOT_FOUND,ERRDOS,ERRbadpath);
881 END_PROFILE(SMBchkpth);
882 return(UNIXERROR(ERRDOS,ERRbadpath));
885 outsize = set_message(outbuf,0,0,False);
886 DEBUG(3,("chkpth %s mode=%d\n", name, (int)SVAL(inbuf,smb_vwv0)));
888 END_PROFILE(SMBchkpth);
892 /****************************************************************************
894 ****************************************************************************/
896 int reply_getatr(connection_struct *conn, char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
900 SMB_STRUCT_STAT sbuf;
905 BOOL bad_path = False;
909 START_PROFILE(SMBgetatr);
911 p = smb_buf(inbuf) + 1;
912 p += srvstr_get_path(inbuf, fname, p, sizeof(fname), 0, STR_TERMINATE, &status);
913 if (!NT_STATUS_IS_OK(status)) {
914 END_PROFILE(SMBgetatr);
915 return ERROR_NT(status);
918 RESOLVE_DFSPATH(fname, conn, inbuf, outbuf);
920 /* dos smetimes asks for a stat of "" - it returns a "hidden directory"
921 under WfWg - weird! */
923 mode = aHIDDEN | aDIR;
924 if (!CAN_WRITE(conn))
930 unix_convert(fname,conn,0,&bad_path,&sbuf);
932 END_PROFILE(SMBgetatr);
933 return ERROR_NT(NT_STATUS_OBJECT_PATH_NOT_FOUND);
935 if (check_name(fname,conn)) {
936 if (VALID_STAT(sbuf) || SMB_VFS_STAT(conn,fname,&sbuf) == 0) {
937 mode = dos_mode(conn,fname,&sbuf);
939 mtime = sbuf.st_mtime;
944 DEBUG(3,("stat of %s failed (%s)\n",fname,strerror(errno)));
950 END_PROFILE(SMBgetatr);
951 return UNIXERROR(ERRDOS, ERRbadfile);
954 outsize = set_message(outbuf,10,0,True);
956 SSVAL(outbuf,smb_vwv0,mode);
957 if(lp_dos_filetime_resolution(SNUM(conn)) ) {
958 srv_put_dos_date3(outbuf,smb_vwv1,mtime & ~1);
960 srv_put_dos_date3(outbuf,smb_vwv1,mtime);
962 SIVAL(outbuf,smb_vwv3,(uint32)size);
964 if (Protocol >= PROTOCOL_NT1) {
965 SSVAL(outbuf,smb_flg2,SVAL(outbuf, smb_flg2) | FLAGS2_IS_LONG_NAME);
968 DEBUG( 3, ( "getatr name=%s mode=%d size=%d\n", fname, mode, (uint32)size ) );
970 END_PROFILE(SMBgetatr);
974 /****************************************************************************
976 ****************************************************************************/
978 int reply_setatr(connection_struct *conn, char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
984 SMB_STRUCT_STAT sbuf;
985 BOOL bad_path = False;
989 START_PROFILE(SMBsetatr);
991 p = smb_buf(inbuf) + 1;
992 p += srvstr_get_path(inbuf, fname, p, sizeof(fname), 0, STR_TERMINATE, &status);
993 if (!NT_STATUS_IS_OK(status)) {
994 END_PROFILE(SMBsetatr);
995 return ERROR_NT(status);
998 RESOLVE_DFSPATH(fname, conn, inbuf, outbuf);
1000 unix_convert(fname,conn,0,&bad_path,&sbuf);
1001 if (bad_path || !check_name(fname, conn)) {
1002 END_PROFILE(SMBsetatr);
1003 return ERROR_NT(NT_STATUS_OBJECT_PATH_NOT_FOUND);
1006 if (fname[0] == '.' && fname[1] == '\0') {
1008 * Not sure here is the right place to catch this
1009 * condition. Might be moved to somewhere else later -- vl
1011 END_PROFILE(SMBsetatr);
1012 return ERROR_NT(NT_STATUS_ACCESS_DENIED);
1015 mode = SVAL(inbuf,smb_vwv0);
1016 mtime = srv_make_unix_date3(inbuf+smb_vwv1);
1018 if (mode != FILE_ATTRIBUTE_NORMAL) {
1019 if (VALID_STAT_OF_DIR(sbuf))
1024 if (file_set_dosmode(conn,fname,mode,&sbuf,False) != 0) {
1025 END_PROFILE(SMBsetatr);
1026 return UNIXERROR(ERRDOS, ERRnoaccess);
1030 if (!set_filetime(conn,fname,mtime)) {
1031 END_PROFILE(SMBsetatr);
1032 return UNIXERROR(ERRDOS, ERRnoaccess);
1035 outsize = set_message(outbuf,0,0,False);
1037 DEBUG( 3, ( "setatr name=%s mode=%d\n", fname, mode ) );
1039 END_PROFILE(SMBsetatr);
1043 /****************************************************************************
1045 ****************************************************************************/
1047 int reply_dskattr(connection_struct *conn, char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
1050 SMB_BIG_UINT dfree,dsize,bsize;
1051 START_PROFILE(SMBdskattr);
1053 if (get_dfree_info(conn,".",True,&bsize,&dfree,&dsize) == (SMB_BIG_UINT)-1) {
1054 END_PROFILE(SMBdskattr);
1055 return(UNIXERROR(ERRHRD,ERRgeneral));
1058 outsize = set_message(outbuf,5,0,True);
1060 if (Protocol <= PROTOCOL_LANMAN2) {
1061 double total_space, free_space;
1062 /* we need to scale this to a number that DOS6 can handle. We
1063 use floating point so we can handle large drives on systems
1064 that don't have 64 bit integers
1066 we end up displaying a maximum of 2G to DOS systems
1068 total_space = dsize * (double)bsize;
1069 free_space = dfree * (double)bsize;
1071 dsize = (total_space+63*512) / (64*512);
1072 dfree = (free_space+63*512) / (64*512);
1074 if (dsize > 0xFFFF) dsize = 0xFFFF;
1075 if (dfree > 0xFFFF) dfree = 0xFFFF;
1077 SSVAL(outbuf,smb_vwv0,dsize);
1078 SSVAL(outbuf,smb_vwv1,64); /* this must be 64 for dos systems */
1079 SSVAL(outbuf,smb_vwv2,512); /* and this must be 512 */
1080 SSVAL(outbuf,smb_vwv3,dfree);
1082 SSVAL(outbuf,smb_vwv0,dsize);
1083 SSVAL(outbuf,smb_vwv1,bsize/512);
1084 SSVAL(outbuf,smb_vwv2,512);
1085 SSVAL(outbuf,smb_vwv3,dfree);
1088 DEBUG(3,("dskattr dfree=%d\n", (unsigned int)dfree));
1090 END_PROFILE(SMBdskattr);
1094 /****************************************************************************
1096 Can be called from SMBsearch, SMBffirst or SMBfunique.
1097 ****************************************************************************/
1099 int reply_search(connection_struct *conn, char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
1109 unsigned int numentries = 0;
1110 unsigned int maxentries = 0;
1111 BOOL finished = False;
1118 BOOL check_descend = False;
1119 BOOL expect_close = False;
1120 BOOL can_open = True;
1121 BOOL bad_path = False;
1123 BOOL mask_contains_wcard = False;
1124 BOOL allow_long_path_components = (SVAL(inbuf,smb_flg2) & FLAGS2_LONG_PATH_COMPONENTS) ? True : False;
1126 START_PROFILE(SMBsearch);
1128 if (lp_posix_pathnames()) {
1129 END_PROFILE(SMBsearch);
1130 return reply_unknown(inbuf, outbuf);
1133 *mask = *directory = *fname = 0;
1135 /* If we were called as SMBffirst then we must expect close. */
1136 if(CVAL(inbuf,smb_com) == SMBffirst)
1137 expect_close = True;
1139 outsize = set_message(outbuf,1,3,True);
1140 maxentries = SVAL(inbuf,smb_vwv0);
1141 dirtype = SVAL(inbuf,smb_vwv1);
1142 p = smb_buf(inbuf) + 1;
1143 p += srvstr_get_path_wcard(inbuf, path, p, sizeof(path), 0, STR_TERMINATE, &nt_status, &mask_contains_wcard);
1144 if (!NT_STATUS_IS_OK(nt_status)) {
1145 END_PROFILE(SMBsearch);
1146 return ERROR_NT(nt_status);
1149 RESOLVE_DFSPATH_WCARD(path, conn, inbuf, outbuf);
1152 status_len = SVAL(p, 0);
1155 /* dirtype &= ~aDIR; */
1157 if (status_len == 0) {
1158 SMB_STRUCT_STAT sbuf;
1161 pstrcpy(directory,path);
1163 unix_convert(directory,conn,0,&bad_path,&sbuf);
1166 if (!check_name(directory,conn))
1169 p = strrchr_m(dir2,'/');
1178 p = strrchr_m(directory,'/');
1184 if (strlen(directory) == 0)
1185 pstrcpy(directory,".");
1186 memset((char *)status,'\0',21);
1187 SCVAL(status,0,(dirtype & 0x1F));
1191 memcpy(status,p,21);
1192 status_dirtype = CVAL(status,0) & 0x1F;
1193 if (status_dirtype != (dirtype & 0x1F))
1194 dirtype = status_dirtype;
1196 conn->dirptr = dptr_fetch(status+12,&dptr_num);
1199 string_set(&conn->dirpath,dptr_path(dptr_num));
1200 pstrcpy(mask, dptr_wcard(dptr_num));
1204 p = smb_buf(outbuf) + 3;
1207 if (status_len == 0) {
1208 dptr_num = dptr_create(conn,directory,True,expect_close,SVAL(inbuf,smb_pid), mask, mask_contains_wcard, dirtype);
1210 if(dptr_num == -2) {
1211 END_PROFILE(SMBsearch);
1212 if ((errno == ENOENT) && bad_path) {
1213 return ERROR_NT(NT_STATUS_OBJECT_PATH_NOT_FOUND);
1215 return UNIXERROR(ERRDOS, ERRnofids);
1217 END_PROFILE(SMBsearch);
1218 return ERROR_DOS(ERRDOS,ERRnofids);
1221 dirtype = dptr_attr(dptr_num);
1224 DEBUG(4,("dptr_num is %d\n",dptr_num));
1227 if ((dirtype&0x1F) == aVOLID) {
1228 memcpy(p,status,21);
1229 make_dir_struct(p,"???????????",volume_label(SNUM(conn)),
1230 0,aVOLID,0,!allow_long_path_components);
1231 dptr_fill(p+12,dptr_num);
1232 if (dptr_zero(p+12) && (status_len==0))
1236 p += DIR_STRUCT_SIZE;
1239 maxentries = MIN(maxentries, ((BUFFER_SIZE - (p - outbuf))/DIR_STRUCT_SIZE));
1241 DEBUG(8,("dirpath=<%s> dontdescend=<%s>\n",
1242 conn->dirpath,lp_dontdescend(SNUM(conn))));
1243 if (in_list(conn->dirpath, lp_dontdescend(SNUM(conn)),True))
1244 check_descend = True;
1246 for (i=numentries;(i<maxentries) && !finished;i++) {
1247 finished = !get_dir_entry(conn,mask,dirtype,fname,&size,&mode,&date,check_descend);
1249 memcpy(p,status,21);
1250 make_dir_struct(p,mask,fname,size, mode,date,
1251 !allow_long_path_components);
1252 if (!dptr_fill(p+12,dptr_num)) {
1256 p += DIR_STRUCT_SIZE;
1266 /* If we were called as SMBffirst with smb_search_id == NULL
1267 and no entries were found then return error and close dirptr
1270 if (numentries == 0 || !ok) {
1271 dptr_close(&dptr_num);
1272 } else if(ok && expect_close && status_len == 0) {
1273 /* Close the dptr - we know it's gone */
1274 dptr_close(&dptr_num);
1277 /* If we were called as SMBfunique, then we can close the dirptr now ! */
1278 if(dptr_num >= 0 && CVAL(inbuf,smb_com) == SMBfunique) {
1279 dptr_close(&dptr_num);
1282 if ((numentries == 0) && !mask_contains_wcard) {
1283 return ERROR_BOTH(STATUS_NO_MORE_FILES,ERRDOS,ERRnofiles);
1286 SSVAL(outbuf,smb_vwv0,numentries);
1287 SSVAL(outbuf,smb_vwv1,3 + numentries * DIR_STRUCT_SIZE);
1288 SCVAL(smb_buf(outbuf),0,5);
1289 SSVAL(smb_buf(outbuf),1,numentries*DIR_STRUCT_SIZE);
1291 /* The replies here are never long name. */
1292 SSVAL(outbuf,smb_flg2,SVAL(outbuf, smb_flg2) & (~FLAGS2_IS_LONG_NAME));
1293 if (!allow_long_path_components) {
1294 SSVAL(outbuf,smb_flg2,SVAL(outbuf, smb_flg2) & (~FLAGS2_LONG_PATH_COMPONENTS));
1297 /* This SMB *always* returns ASCII names. Remove the unicode bit in flags2. */
1298 SSVAL(outbuf,smb_flg2, (SVAL(outbuf, smb_flg2) & (~FLAGS2_UNICODE_STRINGS)));
1300 outsize += DIR_STRUCT_SIZE*numentries;
1301 smb_setlen(outbuf,outsize - 4);
1303 if ((! *directory) && dptr_path(dptr_num))
1304 slprintf(directory, sizeof(directory)-1, "(%s)",dptr_path(dptr_num));
1306 DEBUG( 4, ( "%s mask=%s path=%s dtype=%d nument=%u of %u\n",
1307 smb_fn_name(CVAL(inbuf,smb_com)),
1308 mask, directory, dirtype, numentries, maxentries ) );
1310 END_PROFILE(SMBsearch);
1314 /****************************************************************************
1315 Reply to a fclose (stop directory search).
1316 ****************************************************************************/
1318 int reply_fclose(connection_struct *conn, char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
1327 BOOL path_contains_wcard = False;
1329 START_PROFILE(SMBfclose);
1331 if (lp_posix_pathnames()) {
1332 END_PROFILE(SMBfclose);
1333 return reply_unknown(inbuf, outbuf);
1336 outsize = set_message(outbuf,1,0,True);
1337 p = smb_buf(inbuf) + 1;
1338 p += srvstr_get_path_wcard(inbuf, path, p, sizeof(path), 0, STR_TERMINATE, &err, &path_contains_wcard);
1339 if (!NT_STATUS_IS_OK(err)) {
1340 END_PROFILE(SMBfclose);
1341 return ERROR_NT(err);
1344 status_len = SVAL(p,0);
1347 if (status_len == 0) {
1348 END_PROFILE(SMBfclose);
1349 return ERROR_DOS(ERRSRV,ERRsrverror);
1352 memcpy(status,p,21);
1354 if(dptr_fetch(status+12,&dptr_num)) {
1355 /* Close the dptr - we know it's gone */
1356 dptr_close(&dptr_num);
1359 SSVAL(outbuf,smb_vwv0,0);
1361 DEBUG(3,("search close\n"));
1363 END_PROFILE(SMBfclose);
1367 /****************************************************************************
1369 ****************************************************************************/
1371 int reply_open(connection_struct *conn, char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
1379 SMB_STRUCT_STAT sbuf;
1380 BOOL bad_path = False;
1382 int oplock_request = CORE_OPLOCK_REQUEST(inbuf);
1384 uint32 dos_attr = SVAL(inbuf,smb_vwv1);
1387 uint32 create_disposition;
1388 uint32 create_options = 0;
1390 START_PROFILE(SMBopen);
1392 deny_mode = SVAL(inbuf,smb_vwv0);
1394 srvstr_get_path(inbuf, fname, smb_buf(inbuf)+1, sizeof(fname), 0, STR_TERMINATE, &status);
1395 if (!NT_STATUS_IS_OK(status)) {
1396 END_PROFILE(SMBopen);
1397 return ERROR_NT(status);
1400 RESOLVE_DFSPATH(fname, conn, inbuf, outbuf);
1402 unix_convert(fname,conn,0,&bad_path,&sbuf);
1404 END_PROFILE(SMBopen);
1405 return ERROR_NT(NT_STATUS_OBJECT_PATH_NOT_FOUND);
1408 if (!map_open_params_to_ntcreate(fname, deny_mode, OPENX_FILE_EXISTS_OPEN,
1409 &access_mask, &share_mode, &create_disposition, &create_options)) {
1410 END_PROFILE(SMBopen);
1411 return ERROR_NT(NT_STATUS_DOS(ERRDOS, ERRbadaccess));
1414 status = open_file_ntcreate(conn,fname,&sbuf,
1423 if (!NT_STATUS_IS_OK(status)) {
1424 END_PROFILE(SMBopen);
1425 if (open_was_deferred(SVAL(inbuf,smb_mid))) {
1426 /* We have re-scheduled this call. */
1429 return ERROR_NT(status);
1432 size = sbuf.st_size;
1433 fattr = dos_mode(conn,fname,&sbuf);
1434 mtime = sbuf.st_mtime;
1437 DEBUG(3,("attempt to open a directory %s\n",fname));
1438 close_file(fsp,ERROR_CLOSE);
1439 END_PROFILE(SMBopen);
1440 return ERROR_DOS(ERRDOS,ERRnoaccess);
1443 outsize = set_message(outbuf,7,0,True);
1444 SSVAL(outbuf,smb_vwv0,fsp->fnum);
1445 SSVAL(outbuf,smb_vwv1,fattr);
1446 if(lp_dos_filetime_resolution(SNUM(conn)) ) {
1447 srv_put_dos_date3(outbuf,smb_vwv2,mtime & ~1);
1449 srv_put_dos_date3(outbuf,smb_vwv2,mtime);
1451 SIVAL(outbuf,smb_vwv4,(uint32)size);
1452 SSVAL(outbuf,smb_vwv6,deny_mode);
1454 if (oplock_request && lp_fake_oplocks(SNUM(conn))) {
1455 SCVAL(outbuf,smb_flg,CVAL(outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
1458 if(EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) {
1459 SCVAL(outbuf,smb_flg,CVAL(outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
1461 END_PROFILE(SMBopen);
1465 /****************************************************************************
1466 Reply to an open and X.
1467 ****************************************************************************/
1469 int reply_open_and_X(connection_struct *conn, char *inbuf,char *outbuf,int length,int bufsize)
1472 uint16 open_flags = SVAL(inbuf,smb_vwv2);
1473 int deny_mode = SVAL(inbuf,smb_vwv3);
1474 uint32 smb_attr = SVAL(inbuf,smb_vwv5);
1475 /* Breakout the oplock request bits so we can set the
1476 reply bits separately. */
1477 int ex_oplock_request = EXTENDED_OPLOCK_REQUEST(inbuf);
1478 int core_oplock_request = CORE_OPLOCK_REQUEST(inbuf);
1479 int oplock_request = ex_oplock_request | core_oplock_request;
1481 int smb_sattr = SVAL(inbuf,smb_vwv4);
1482 uint32 smb_time = make_unix_date3(inbuf+smb_vwv6);
1484 int smb_ofun = SVAL(inbuf,smb_vwv8);
1487 SMB_STRUCT_STAT sbuf;
1489 BOOL bad_path = False;
1492 SMB_BIG_UINT allocation_size = (SMB_BIG_UINT)IVAL(inbuf,smb_vwv9);
1493 ssize_t retval = -1;
1496 uint32 create_disposition;
1497 uint32 create_options = 0;
1499 START_PROFILE(SMBopenX);
1501 /* If it's an IPC, pass off the pipe handler. */
1503 if (lp_nt_pipe_support()) {
1504 END_PROFILE(SMBopenX);
1505 return reply_open_pipe_and_X(conn, inbuf,outbuf,length,bufsize);
1507 END_PROFILE(SMBopenX);
1508 return ERROR_DOS(ERRSRV,ERRaccess);
1512 /* XXXX we need to handle passed times, sattr and flags */
1513 srvstr_get_path(inbuf, fname, smb_buf(inbuf), sizeof(fname), 0, STR_TERMINATE, &status);
1514 if (!NT_STATUS_IS_OK(status)) {
1515 END_PROFILE(SMBopenX);
1516 return ERROR_NT(status);
1519 RESOLVE_DFSPATH(fname, conn, inbuf, outbuf);
1521 unix_convert(fname,conn,0,&bad_path,&sbuf);
1523 END_PROFILE(SMBopenX);
1524 return ERROR_NT(NT_STATUS_OBJECT_PATH_NOT_FOUND);
1527 if (!map_open_params_to_ntcreate(fname, deny_mode, smb_ofun,
1530 &create_disposition,
1532 END_PROFILE(SMBopenX);
1533 return ERROR_NT(NT_STATUS_DOS(ERRDOS, ERRbadaccess));
1536 status = open_file_ntcreate(conn,fname,&sbuf,
1545 if (!NT_STATUS_IS_OK(status)) {
1546 END_PROFILE(SMBopenX);
1547 if (open_was_deferred(SVAL(inbuf,smb_mid))) {
1548 /* We have re-scheduled this call. */
1551 return ERROR_NT(status);
1554 /* Setting the "size" field in vwv9 and vwv10 causes the file to be set to this size,
1555 if the file is truncated or created. */
1556 if (((smb_action == FILE_WAS_CREATED) || (smb_action == FILE_WAS_OVERWRITTEN)) && allocation_size) {
1557 fsp->initial_allocation_size = smb_roundup(fsp->conn, allocation_size);
1558 if (vfs_allocate_file_space(fsp, fsp->initial_allocation_size) == -1) {
1559 close_file(fsp,ERROR_CLOSE);
1560 END_PROFILE(SMBopenX);
1561 return ERROR_NT(NT_STATUS_DISK_FULL);
1563 retval = vfs_set_filelen(fsp, (SMB_OFF_T)allocation_size);
1565 close_file(fsp,ERROR_CLOSE);
1566 END_PROFILE(SMBopenX);
1567 return ERROR_NT(NT_STATUS_DISK_FULL);
1569 sbuf.st_size = get_allocation_size(conn,fsp,&sbuf);
1572 fattr = dos_mode(conn,fname,&sbuf);
1573 mtime = sbuf.st_mtime;
1575 close_file(fsp,ERROR_CLOSE);
1576 END_PROFILE(SMBopenX);
1577 return ERROR_DOS(ERRDOS,ERRnoaccess);
1580 /* If the caller set the extended oplock request bit
1581 and we granted one (by whatever means) - set the
1582 correct bit for extended oplock reply.
1585 if (ex_oplock_request && lp_fake_oplocks(SNUM(conn))) {
1586 smb_action |= EXTENDED_OPLOCK_GRANTED;
1589 if(ex_oplock_request && EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) {
1590 smb_action |= EXTENDED_OPLOCK_GRANTED;
1593 /* If the caller set the core oplock request bit
1594 and we granted one (by whatever means) - set the
1595 correct bit for core oplock reply.
1598 if (core_oplock_request && lp_fake_oplocks(SNUM(conn))) {
1599 SCVAL(outbuf,smb_flg,CVAL(outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
1602 if(core_oplock_request && EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) {
1603 SCVAL(outbuf,smb_flg,CVAL(outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
1606 if (open_flags & EXTENDED_RESPONSE_REQUIRED) {
1607 set_message(outbuf,19,0,True);
1609 set_message(outbuf,15,0,True);
1611 SSVAL(outbuf,smb_vwv2,fsp->fnum);
1612 SSVAL(outbuf,smb_vwv3,fattr);
1613 if(lp_dos_filetime_resolution(SNUM(conn)) ) {
1614 srv_put_dos_date3(outbuf,smb_vwv4,mtime & ~1);
1616 srv_put_dos_date3(outbuf,smb_vwv4,mtime);
1618 SIVAL(outbuf,smb_vwv6,(uint32)sbuf.st_size);
1619 SSVAL(outbuf,smb_vwv8,GET_OPENX_MODE(deny_mode));
1620 SSVAL(outbuf,smb_vwv11,smb_action);
1622 if (open_flags & EXTENDED_RESPONSE_REQUIRED) {
1623 SIVAL(outbuf, smb_vwv15, STD_RIGHT_ALL_ACCESS);
1626 END_PROFILE(SMBopenX);
1627 return chain_reply(inbuf,outbuf,length,bufsize);
1630 /****************************************************************************
1631 Reply to a SMBulogoffX.
1632 conn POINTER CAN BE NULL HERE !
1633 ****************************************************************************/
1635 int reply_ulogoffX(connection_struct *conn, char *inbuf,char *outbuf,int length,int bufsize)
1637 uint16 vuid = SVAL(inbuf,smb_uid);
1638 user_struct *vuser = get_valid_user_struct(vuid);
1639 START_PROFILE(SMBulogoffX);
1642 DEBUG(3,("ulogoff, vuser id %d does not map to user.\n", vuid));
1644 /* in user level security we are supposed to close any files
1645 open by this user */
1646 if ((vuser != 0) && (lp_security() != SEC_SHARE))
1647 file_close_user(vuid);
1649 invalidate_vuid(vuid);
1651 set_message(outbuf,2,0,True);
1653 DEBUG( 3, ( "ulogoffX vuid=%d\n", vuid ) );
1655 END_PROFILE(SMBulogoffX);
1656 return chain_reply(inbuf,outbuf,length,bufsize);
1659 /****************************************************************************
1660 Reply to a mknew or a create.
1661 ****************************************************************************/
1663 int reply_mknew(connection_struct *conn, char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
1668 uint32 fattr = SVAL(inbuf,smb_vwv0);
1669 struct utimbuf times;
1670 BOOL bad_path = False;
1672 int oplock_request = CORE_OPLOCK_REQUEST(inbuf);
1673 SMB_STRUCT_STAT sbuf;
1675 uint32 access_mask = FILE_GENERIC_READ | FILE_GENERIC_WRITE;
1676 uint32 share_mode = FILE_SHARE_READ|FILE_SHARE_WRITE;
1677 uint32 create_disposition;
1678 uint32 create_options = 0;
1680 START_PROFILE(SMBcreate);
1682 com = SVAL(inbuf,smb_com);
1684 times.modtime = srv_make_unix_date3(inbuf + smb_vwv1);
1686 srvstr_get_path(inbuf, fname, smb_buf(inbuf) + 1, sizeof(fname), 0, STR_TERMINATE, &status);
1687 if (!NT_STATUS_IS_OK(status)) {
1688 END_PROFILE(SMBcreate);
1689 return ERROR_NT(status);
1692 RESOLVE_DFSPATH(fname, conn, inbuf, outbuf);
1694 unix_convert(fname,conn,0,&bad_path,&sbuf);
1696 END_PROFILE(SMBcreate);
1697 return ERROR_NT(NT_STATUS_OBJECT_PATH_NOT_FOUND);
1700 if (fattr & aVOLID) {
1701 DEBUG(0,("Attempt to create file (%s) with volid set - please report this\n",fname));
1704 if(com == SMBmknew) {
1705 /* We should fail if file exists. */
1706 create_disposition = FILE_CREATE;
1708 /* Create if file doesn't exist, truncate if it does. */
1709 create_disposition = FILE_OVERWRITE_IF;
1712 /* Open file using ntcreate. */
1713 status = open_file_ntcreate(conn,fname,&sbuf,
1722 if (!NT_STATUS_IS_OK(status)) {
1723 END_PROFILE(SMBcreate);
1724 if (open_was_deferred(SVAL(inbuf,smb_mid))) {
1725 /* We have re-scheduled this call. */
1728 return ERROR_NT(status);
1731 times.actime = sbuf.st_atime;
1732 file_utime(conn, fname, ×);
1734 outsize = set_message(outbuf,1,0,True);
1735 SSVAL(outbuf,smb_vwv0,fsp->fnum);
1737 if (oplock_request && lp_fake_oplocks(SNUM(conn))) {
1738 SCVAL(outbuf,smb_flg,CVAL(outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
1741 if(EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) {
1742 SCVAL(outbuf,smb_flg,CVAL(outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
1745 DEBUG( 2, ( "reply_mknew: file %s\n", fname ) );
1746 DEBUG( 3, ( "reply_mknew %s fd=%d dmode=0x%x\n", fname, fsp->fh->fd, (unsigned int)fattr ) );
1748 END_PROFILE(SMBcreate);
1752 /****************************************************************************
1753 Reply to a create temporary file.
1754 ****************************************************************************/
1756 int reply_ctemp(connection_struct *conn, char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
1760 uint32 fattr = SVAL(inbuf,smb_vwv0);
1761 BOOL bad_path = False;
1763 int oplock_request = CORE_OPLOCK_REQUEST(inbuf);
1765 SMB_STRUCT_STAT sbuf;
1768 unsigned int namelen;
1770 START_PROFILE(SMBctemp);
1772 srvstr_get_path(inbuf, fname, smb_buf(inbuf)+1, sizeof(fname), 0, STR_TERMINATE, &status);
1773 if (!NT_STATUS_IS_OK(status)) {
1774 END_PROFILE(SMBctemp);
1775 return ERROR_NT(status);
1778 pstrcat(fname,"/TMXXXXXX");
1780 pstrcat(fname,"TMXXXXXX");
1783 RESOLVE_DFSPATH(fname, conn, inbuf, outbuf);
1785 unix_convert(fname,conn,0,&bad_path,&sbuf);
1787 END_PROFILE(SMBctemp);
1788 return ERROR_NT(NT_STATUS_OBJECT_PATH_NOT_FOUND);
1791 tmpfd = smb_mkstemp(fname);
1793 END_PROFILE(SMBctemp);
1794 return(UNIXERROR(ERRDOS,ERRnoaccess));
1797 SMB_VFS_STAT(conn,fname,&sbuf);
1799 /* We should fail if file does not exist. */
1800 status = open_file_ntcreate(conn,fname,&sbuf,
1801 FILE_GENERIC_READ | FILE_GENERIC_WRITE,
1802 FILE_SHARE_READ|FILE_SHARE_WRITE,
1809 /* close fd from smb_mkstemp() */
1812 if (!NT_STATUS_IS_OK(status)) {
1813 END_PROFILE(SMBctemp);
1814 if (open_was_deferred(SVAL(inbuf,smb_mid))) {
1815 /* We have re-scheduled this call. */
1818 return ERROR_NT(status);
1821 outsize = set_message(outbuf,1,0,True);
1822 SSVAL(outbuf,smb_vwv0,fsp->fnum);
1824 /* the returned filename is relative to the directory */
1825 s = strrchr_m(fname, '/');
1832 p = smb_buf(outbuf);
1834 /* Tested vs W2K3 - this doesn't seem to be here - null terminated filename is the only
1835 thing in the byte section. JRA */
1836 SSVALS(p, 0, -1); /* what is this? not in spec */
1838 namelen = srvstr_push(outbuf, p, s, -1, STR_ASCII|STR_TERMINATE);
1840 outsize = set_message_end(outbuf, p);
1842 if (oplock_request && lp_fake_oplocks(SNUM(conn))) {
1843 SCVAL(outbuf,smb_flg,CVAL(outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
1846 if (EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) {
1847 SCVAL(outbuf,smb_flg,CVAL(outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
1850 DEBUG( 2, ( "reply_ctemp: created temp file %s\n", fname ) );
1851 DEBUG( 3, ( "reply_ctemp %s fd=%d umode=0%o\n", fname, fsp->fh->fd,
1852 (unsigned int)sbuf.st_mode ) );
1854 END_PROFILE(SMBctemp);
1858 /*******************************************************************
1859 Check if a user is allowed to rename a file.
1860 ********************************************************************/
1862 static NTSTATUS can_rename(connection_struct *conn, char *fname, uint16 dirtype, SMB_STRUCT_STAT *pst)
1868 if (!CAN_WRITE(conn)) {
1869 return NT_STATUS_MEDIA_WRITE_PROTECTED;
1872 fmode = dos_mode(conn,fname,pst);
1873 if ((fmode & ~dirtype) & (aHIDDEN | aSYSTEM)) {
1874 return NT_STATUS_NO_SUCH_FILE;
1877 if (S_ISDIR(pst->st_mode)) {
1878 return NT_STATUS_OK;
1881 status = open_file_ntcreate(conn, fname, pst,
1883 FILE_SHARE_READ|FILE_SHARE_WRITE,
1886 FILE_ATTRIBUTE_NORMAL,
1890 if (!NT_STATUS_IS_OK(status)) {
1893 close_file(fsp,NORMAL_CLOSE);
1894 return NT_STATUS_OK;
1897 /*******************************************************************
1898 Check if a user is allowed to delete a file.
1899 ********************************************************************/
1901 static NTSTATUS can_delete(connection_struct *conn, char *fname,
1902 uint32 dirtype, BOOL bad_path)
1904 SMB_STRUCT_STAT sbuf;
1909 DEBUG(10,("can_delete: %s, dirtype = %d\n", fname, dirtype ));
1911 if (!CAN_WRITE(conn)) {
1912 return NT_STATUS_MEDIA_WRITE_PROTECTED;
1915 if (SMB_VFS_LSTAT(conn,fname,&sbuf) != 0) {
1916 if(errno == ENOENT) {
1918 return NT_STATUS_OBJECT_PATH_NOT_FOUND;
1920 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
1923 return map_nt_error_from_unix(errno);
1926 fattr = dos_mode(conn,fname,&sbuf);
1928 /* Can't delete a directory. */
1930 return NT_STATUS_FILE_IS_A_DIRECTORY;
1934 else if (dirtype & aDIR) /* Asked for a directory and it isn't. */
1935 return NT_STATUS_OBJECT_NAME_INVALID;
1936 #endif /* JRATEST */
1938 /* Fix for bug #3035 from SATOH Fumiyasu <fumiyas@miraclelinux.com>
1940 On a Windows share, a file with read-only dosmode can be opened with
1941 DELETE_ACCESS. But on a Samba share (delete readonly = no), it
1942 fails with NT_STATUS_CANNOT_DELETE error.
1944 This semantic causes a problem that a user can not
1945 rename a file with read-only dosmode on a Samba share
1946 from a Windows command prompt (i.e. cmd.exe, but can rename
1947 from Windows Explorer).
1950 if (!lp_delete_readonly(SNUM(conn))) {
1951 if (fattr & aRONLY) {
1952 return NT_STATUS_CANNOT_DELETE;
1955 if ((fattr & ~dirtype) & (aHIDDEN | aSYSTEM)) {
1956 return NT_STATUS_NO_SUCH_FILE;
1959 /* On open checks the open itself will check the share mode, so
1960 don't do it here as we'll get it wrong. */
1962 status = open_file_ntcreate(conn, fname, &sbuf,
1967 FILE_ATTRIBUTE_NORMAL,
1971 if (NT_STATUS_IS_OK(status)) {
1972 close_file(fsp,NORMAL_CLOSE);
1977 /****************************************************************************
1978 The guts of the unlink command, split out so it may be called by the NT SMB
1980 ****************************************************************************/
1982 NTSTATUS unlink_internals(connection_struct *conn, uint32 dirtype,
1983 char *name, BOOL has_wild)
1990 NTSTATUS error = NT_STATUS_OK;
1991 BOOL bad_path = False;
1993 SMB_STRUCT_STAT sbuf;
1995 *directory = *mask = 0;
1997 rc = unix_convert(name,conn,0,&bad_path,&sbuf);
2000 * Feel my pain, this code needs rewriting *very* badly! -- vl
2002 pstrcpy(orig_name, name);
2004 p = strrchr_m(name,'/');
2006 pstrcpy(directory,".");
2010 pstrcpy(directory,name);
2015 * We should only check the mangled cache
2016 * here if unix_convert failed. This means
2017 * that the path in 'mask' doesn't exist
2018 * on the file system and so we need to look
2019 * for a possible mangle. This patch from
2020 * Tine Smukavec <valentin.smukavec@hermes.si>.
2023 if (!rc && mangle_is_mangled(mask,conn->params))
2024 mangle_check_cache( mask, sizeof(pstring)-1, conn->params );
2027 pstrcat(directory,"/");
2028 pstrcat(directory,mask);
2029 error = can_delete(conn,directory,dirtype,bad_path);
2030 if (!NT_STATUS_IS_OK(error))
2033 if (SMB_VFS_UNLINK(conn,directory) == 0) {
2038 struct smb_Dir *dir_hnd = NULL;
2041 /* Ensure we check bad_path in the wcard case.
2042 * This may not be correct w.r.t. Windows (needs
2043 * smbtorture test cases which will be forthcoming)
2044 * but prevents us from continuing in the obvious
2045 * bad path case. This is merely a placeholder. JRA.
2048 if (!rc && bad_path) {
2049 return NT_STATUS_OBJECT_PATH_NOT_FOUND;
2052 if (strequal(mask,"????????.???"))
2055 if (check_name(directory,conn))
2056 dir_hnd = OpenDir(conn, directory, mask, dirtype);
2058 /* XXXX the CIFS spec says that if bit0 of the flags2 field is set then
2059 the pattern matches against the long name, otherwise the short name
2060 We don't implement this yet XXXX
2065 error = NT_STATUS_NO_SUCH_FILE;
2067 while ((dname = ReadDirName(dir_hnd, &offset))) {
2070 BOOL sys_direntry = False;
2071 pstrcpy(fname,dname);
2073 if (!is_visible_file(conn, directory, dname, &st, True)) {
2077 /* Quick check for "." and ".." */
2078 if (fname[0] == '.') {
2079 if (!fname[1] || (fname[1] == '.' && !fname[2])) {
2080 if (dirtype & FILE_ATTRIBUTE_DIRECTORY) {
2081 sys_direntry = True;
2088 if(!mask_match(fname, mask, conn->case_sensitive))
2092 error = NT_STATUS_OBJECT_NAME_INVALID;
2093 DEBUG(3,("unlink_internals: system directory delete denied [%s] mask [%s]\n",
2098 slprintf(fname,sizeof(fname)-1, "%s/%s",directory,dname);
2099 error = can_delete(conn, fname, dirtype,
2101 if (!NT_STATUS_IS_OK(error)) {
2104 if (SMB_VFS_UNLINK(conn,fname) == 0) {
2107 DEBUG(3,("unlink_internals: succesful unlink [%s]\n",fname));
2113 if (count == 0 && NT_STATUS_IS_OK(error)) {
2114 error = map_nt_error_from_unix(errno);
2120 /****************************************************************************
2122 ****************************************************************************/
2124 int reply_unlink(connection_struct *conn, char *inbuf,char *outbuf, int dum_size,
2131 BOOL path_contains_wcard = False;
2133 START_PROFILE(SMBunlink);
2135 dirtype = SVAL(inbuf,smb_vwv0);
2137 srvstr_get_path_wcard(inbuf, name, smb_buf(inbuf) + 1, sizeof(name), 0, STR_TERMINATE, &status, &path_contains_wcard);
2138 if (!NT_STATUS_IS_OK(status)) {
2139 END_PROFILE(SMBunlink);
2140 return ERROR_NT(status);
2143 RESOLVE_DFSPATH_WCARD(name, conn, inbuf, outbuf);
2145 DEBUG(3,("reply_unlink : %s\n",name));
2147 status = unlink_internals(conn, dirtype, name, path_contains_wcard);
2148 if (!NT_STATUS_IS_OK(status)) {
2149 if (open_was_deferred(SVAL(inbuf,smb_mid))) {
2150 /* We have re-scheduled this call. */
2153 return ERROR_NT(status);
2157 * Win2k needs a changenotify request response before it will
2158 * update after a rename..
2160 process_pending_change_notify_queue((time_t)0);
2162 outsize = set_message(outbuf,0,0,False);
2164 END_PROFILE(SMBunlink);
2168 /****************************************************************************
2170 ****************************************************************************/
2172 static void fail_readraw(void)
2175 slprintf(errstr, sizeof(errstr)-1, "FAIL ! reply_readbraw: socket write fail (%s)",
2177 exit_server_cleanly(errstr);
2180 #if defined(WITH_SENDFILE)
2181 /****************************************************************************
2182 Fake (read/write) sendfile. Returns -1 on read or write fail.
2183 ****************************************************************************/
2185 static ssize_t fake_sendfile(files_struct *fsp, SMB_OFF_T startpos, size_t nread, char *buf, int bufsize)
2189 /* Paranioa check... */
2190 if (nread > bufsize) {
2195 ret = read_file(fsp,buf,startpos,nread);
2201 /* If we had a short read, fill with zeros. */
2203 memset(buf, '\0', nread - ret);
2206 if (write_data(smbd_server_fd(),buf,nread) != nread) {
2210 return (ssize_t)nread;
2214 /****************************************************************************
2215 Use sendfile in readbraw.
2216 ****************************************************************************/
2218 void send_file_readbraw(connection_struct *conn, files_struct *fsp, SMB_OFF_T startpos, size_t nread,
2219 ssize_t mincount, char *outbuf, int out_buffsize)
2223 #if defined(WITH_SENDFILE)
2225 * We can only use sendfile on a non-chained packet
2226 * but we can use on a non-oplocked file. tridge proved this
2227 * on a train in Germany :-). JRA.
2228 * reply_readbraw has already checked the length.
2231 if ( (chain_size == 0) && (nread > 0) &&
2232 (fsp->wcp == NULL) && lp_use_sendfile(SNUM(conn)) ) {
2235 _smb_setlen(outbuf,nread);
2236 header.data = (uint8 *)outbuf;
2240 if ( SMB_VFS_SENDFILE( smbd_server_fd(), fsp, fsp->fh->fd, &header, startpos, nread) == -1) {
2241 /* Returning ENOSYS means no data at all was sent. Do this as a normal read. */
2242 if (errno == ENOSYS) {
2243 goto normal_readbraw;
2247 * Special hack for broken Linux with no working sendfile. If we
2248 * return EINTR we sent the header but not the rest of the data.
2249 * Fake this up by doing read/write calls.
2251 if (errno == EINTR) {
2252 /* Ensure we don't do this again. */
2253 set_use_sendfile(SNUM(conn), False);
2254 DEBUG(0,("send_file_readbraw: sendfile not available. Faking..\n"));
2256 if (fake_sendfile(fsp, startpos, nread, outbuf + 4, out_buffsize - 4) == -1) {
2257 DEBUG(0,("send_file_readbraw: fake_sendfile failed for file %s (%s).\n",
2258 fsp->fsp_name, strerror(errno) ));
2259 exit_server_cleanly("send_file_readbraw fake_sendfile failed");
2264 DEBUG(0,("send_file_readbraw: sendfile failed for file %s (%s). Terminating\n",
2265 fsp->fsp_name, strerror(errno) ));
2266 exit_server_cleanly("send_file_readbraw sendfile failed");
2276 ret = read_file(fsp,outbuf+4,startpos,nread);
2277 #if 0 /* mincount appears to be ignored in a W2K server. JRA. */
2286 _smb_setlen(outbuf,ret);
2287 if (write_data(smbd_server_fd(),outbuf,4+ret) != 4+ret)
2291 /****************************************************************************
2292 Reply to a readbraw (core+ protocol).
2293 ****************************************************************************/
2295 int reply_readbraw(connection_struct *conn, char *inbuf, char *outbuf, int dum_size, int out_buffsize)
2297 ssize_t maxcount,mincount;
2300 char *header = outbuf;
2302 START_PROFILE(SMBreadbraw);
2304 if (srv_is_signing_active()) {
2305 exit_server_cleanly("reply_readbraw: SMB signing is active - raw reads/writes are disallowed.");
2309 * Special check if an oplock break has been issued
2310 * and the readraw request croses on the wire, we must
2311 * return a zero length response here.
2314 fsp = file_fsp(inbuf,smb_vwv0);
2316 if (!FNUM_OK(fsp,conn) || !fsp->can_read) {
2318 * fsp could be NULL here so use the value from the packet. JRA.
2320 DEBUG(3,("fnum %d not open in readbraw - cache prime?\n",(int)SVAL(inbuf,smb_vwv0)));
2321 _smb_setlen(header,0);
2322 if (write_data(smbd_server_fd(),header,4) != 4)
2324 END_PROFILE(SMBreadbraw);
2328 CHECK_FSP(fsp,conn);
2330 flush_write_cache(fsp, READRAW_FLUSH);
2332 startpos = IVAL_TO_SMB_OFF_T(inbuf,smb_vwv1);
2333 if(CVAL(inbuf,smb_wct) == 10) {
2335 * This is a large offset (64 bit) read.
2337 #ifdef LARGE_SMB_OFF_T
2339 startpos |= (((SMB_OFF_T)IVAL(inbuf,smb_vwv8)) << 32);
2341 #else /* !LARGE_SMB_OFF_T */
2344 * Ensure we haven't been sent a >32 bit offset.
2347 if(IVAL(inbuf,smb_vwv8) != 0) {
2348 DEBUG(0,("readbraw - large offset (%x << 32) used and we don't support \
2349 64 bit offsets.\n", (unsigned int)IVAL(inbuf,smb_vwv8) ));
2350 _smb_setlen(header,0);
2351 if (write_data(smbd_server_fd(),header,4) != 4)
2353 END_PROFILE(SMBreadbraw);
2357 #endif /* LARGE_SMB_OFF_T */
2360 DEBUG(0,("readbraw - negative 64 bit readraw offset (%.0f) !\n", (double)startpos ));
2361 _smb_setlen(header,0);
2362 if (write_data(smbd_server_fd(),header,4) != 4)
2364 END_PROFILE(SMBreadbraw);
2368 maxcount = (SVAL(inbuf,smb_vwv3) & 0xFFFF);
2369 mincount = (SVAL(inbuf,smb_vwv4) & 0xFFFF);
2371 /* ensure we don't overrun the packet size */
2372 maxcount = MIN(65535,maxcount);
2374 if (!is_locked(fsp,(uint32)SVAL(inbuf,smb_pid),(SMB_BIG_UINT)maxcount,(SMB_BIG_UINT)startpos, READ_LOCK)) {
2378 if (SMB_VFS_FSTAT(fsp,fsp->fh->fd,&st) == 0) {
2382 if (startpos >= size) {
2385 nread = MIN(maxcount,(size - startpos));
2389 #if 0 /* mincount appears to be ignored in a W2K server. JRA. */
2390 if (nread < mincount)
2394 DEBUG( 3, ( "readbraw fnum=%d start=%.0f max=%lu min=%lu nread=%lu\n", fsp->fnum, (double)startpos,
2395 (unsigned long)maxcount, (unsigned long)mincount, (unsigned long)nread ) );
2397 send_file_readbraw(conn, fsp, startpos, nread, mincount, outbuf, out_buffsize);
2399 DEBUG(5,("readbraw finished\n"));
2400 END_PROFILE(SMBreadbraw);
2405 #define DBGC_CLASS DBGC_LOCKING
2407 /****************************************************************************
2408 Reply to a lockread (core+ protocol).
2409 ****************************************************************************/
2411 int reply_lockread(connection_struct *conn, char *inbuf,char *outbuf, int length, int dum_buffsiz)
2419 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
2420 struct byte_range_lock *br_lck = NULL;
2421 START_PROFILE(SMBlockread);
2423 CHECK_FSP(fsp,conn);
2424 if (!CHECK_READ(fsp,inbuf)) {
2425 return(ERROR_DOS(ERRDOS,ERRbadaccess));
2428 release_level_2_oplocks_on_change(fsp);
2430 numtoread = SVAL(inbuf,smb_vwv1);
2431 startpos = IVAL_TO_SMB_OFF_T(inbuf,smb_vwv2);
2433 outsize = set_message(outbuf,5,3,True);
2434 numtoread = MIN(BUFFER_SIZE-outsize,numtoread);
2435 data = smb_buf(outbuf) + 3;
2438 * NB. Discovered by Menny Hamburger at Mainsoft. This is a core+
2439 * protocol request that predates the read/write lock concept.
2440 * Thus instead of asking for a read lock here we need to ask
2441 * for a write lock. JRA.
2442 * Note that the requested lock size is unaffected by max_recv.
2445 br_lck = do_lock(fsp,
2446 (uint32)SVAL(inbuf,smb_pid),
2447 (SMB_BIG_UINT)numtoread,
2448 (SMB_BIG_UINT)startpos,
2451 False, /* Non-blocking lock. */
2453 TALLOC_FREE(br_lck);
2455 if (NT_STATUS_V(status)) {
2456 END_PROFILE(SMBlockread);
2457 return ERROR_NT(status);
2461 * However the requested READ size IS affected by max_recv. Insanity.... JRA.
2464 if (numtoread > max_recv) {
2465 DEBUG(0,("reply_lockread: requested read size (%u) is greater than maximum allowed (%u). \
2466 Returning short read of maximum allowed for compatibility with Windows 2000.\n",
2467 (unsigned int)numtoread, (unsigned int)max_recv ));
2468 numtoread = MIN(numtoread,max_recv);
2470 nread = read_file(fsp,data,startpos,numtoread);
2473 END_PROFILE(SMBlockread);
2474 return(UNIXERROR(ERRDOS,ERRnoaccess));
2478 SSVAL(outbuf,smb_vwv0,nread);
2479 SSVAL(outbuf,smb_vwv5,nread+3);
2480 SSVAL(smb_buf(outbuf),1,nread);
2482 DEBUG(3,("lockread fnum=%d num=%d nread=%d\n",
2483 fsp->fnum, (int)numtoread, (int)nread));
2485 END_PROFILE(SMBlockread);
2490 #define DBGC_CLASS DBGC_ALL
2492 /****************************************************************************
2494 ****************************************************************************/
2496 int reply_read(connection_struct *conn, char *inbuf,char *outbuf, int size, int dum_buffsize)
2503 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
2504 START_PROFILE(SMBread);
2506 CHECK_FSP(fsp,conn);
2507 if (!CHECK_READ(fsp,inbuf)) {
2508 return(ERROR_DOS(ERRDOS,ERRbadaccess));
2511 numtoread = SVAL(inbuf,smb_vwv1);
2512 startpos = IVAL_TO_SMB_OFF_T(inbuf,smb_vwv2);
2514 outsize = set_message(outbuf,5,3,True);
2515 numtoread = MIN(BUFFER_SIZE-outsize,numtoread);
2517 * The requested read size cannot be greater than max_recv. JRA.
2519 if (numtoread > max_recv) {
2520 DEBUG(0,("reply_read: requested read size (%u) is greater than maximum allowed (%u). \
2521 Returning short read of maximum allowed for compatibility with Windows 2000.\n",
2522 (unsigned int)numtoread, (unsigned int)max_recv ));
2523 numtoread = MIN(numtoread,max_recv);
2526 data = smb_buf(outbuf) + 3;
2528 if (is_locked(fsp,(uint32)SVAL(inbuf,smb_pid),(SMB_BIG_UINT)numtoread,(SMB_BIG_UINT)startpos, READ_LOCK)) {
2529 END_PROFILE(SMBread);
2530 return ERROR_DOS(ERRDOS,ERRlock);
2534 nread = read_file(fsp,data,startpos,numtoread);
2537 END_PROFILE(SMBread);
2538 return(UNIXERROR(ERRDOS,ERRnoaccess));
2542 SSVAL(outbuf,smb_vwv0,nread);
2543 SSVAL(outbuf,smb_vwv5,nread+3);
2544 SCVAL(smb_buf(outbuf),0,1);
2545 SSVAL(smb_buf(outbuf),1,nread);
2547 DEBUG( 3, ( "read fnum=%d num=%d nread=%d\n",
2548 fsp->fnum, (int)numtoread, (int)nread ) );
2550 END_PROFILE(SMBread);
2554 /****************************************************************************
2555 Reply to a read and X - possibly using sendfile.
2556 ****************************************************************************/
2558 int send_file_readX(connection_struct *conn, char *inbuf,char *outbuf,int length, int len_outbuf,
2559 files_struct *fsp, SMB_OFF_T startpos, size_t smb_maxcnt)
2563 char *data = smb_buf(outbuf);
2565 #if defined(WITH_SENDFILE)
2567 * We can only use sendfile on a non-chained packet
2568 * but we can use on a non-oplocked file. tridge proved this
2569 * on a train in Germany :-). JRA.
2572 if ((chain_size == 0) && (CVAL(inbuf,smb_vwv0) == 0xFF) &&
2573 lp_use_sendfile(SNUM(conn)) && (fsp->wcp == NULL) ) {
2574 SMB_STRUCT_STAT sbuf;
2577 if(SMB_VFS_FSTAT(fsp,fsp->fh->fd, &sbuf) == -1)
2578 return(UNIXERROR(ERRDOS,ERRnoaccess));
2580 if (startpos > sbuf.st_size)
2583 if (smb_maxcnt > (sbuf.st_size - startpos))
2584 smb_maxcnt = (sbuf.st_size - startpos);
2586 if (smb_maxcnt == 0)
2590 * Set up the packet header before send. We
2591 * assume here the sendfile will work (get the
2592 * correct amount of data).
2595 SSVAL(outbuf,smb_vwv2,0xFFFF); /* Remaining - must be -1. */
2596 SSVAL(outbuf,smb_vwv5,smb_maxcnt);
2597 SSVAL(outbuf,smb_vwv6,smb_offset(data,outbuf));
2598 SSVAL(outbuf,smb_vwv7,((smb_maxcnt >> 16) & 1));
2599 SSVAL(smb_buf(outbuf),-2,smb_maxcnt);
2600 SCVAL(outbuf,smb_vwv0,0xFF);
2601 set_message(outbuf,12,smb_maxcnt,False);
2602 header.data = (uint8 *)outbuf;
2603 header.length = data - outbuf;
2606 if ((nread = SMB_VFS_SENDFILE( smbd_server_fd(), fsp, fsp->fh->fd, &header, startpos, smb_maxcnt)) == -1) {
2607 /* Returning ENOSYS means no data at all was sent. Do this as a normal read. */
2608 if (errno == ENOSYS) {
2613 * Special hack for broken Linux with no working sendfile. If we
2614 * return EINTR we sent the header but not the rest of the data.
2615 * Fake this up by doing read/write calls.
2618 if (errno == EINTR) {
2619 /* Ensure we don't do this again. */
2620 set_use_sendfile(SNUM(conn), False);
2621 DEBUG(0,("send_file_readX: sendfile not available. Faking..\n"));
2623 if ((nread = fake_sendfile(fsp, startpos, smb_maxcnt, data,
2624 len_outbuf - (data-outbuf))) == -1) {
2625 DEBUG(0,("send_file_readX: fake_sendfile failed for file %s (%s).\n",
2626 fsp->fsp_name, strerror(errno) ));
2627 exit_server_cleanly("send_file_readX: fake_sendfile failed");
2629 DEBUG( 3, ( "send_file_readX: fake_sendfile fnum=%d max=%d nread=%d\n",
2630 fsp->fnum, (int)smb_maxcnt, (int)nread ) );
2631 /* Returning -1 here means successful sendfile. */
2635 DEBUG(0,("send_file_readX: sendfile failed for file %s (%s). Terminating\n",
2636 fsp->fsp_name, strerror(errno) ));
2637 exit_server_cleanly("send_file_readX sendfile failed");
2640 DEBUG( 3, ( "send_file_readX: sendfile fnum=%d max=%d nread=%d\n",
2641 fsp->fnum, (int)smb_maxcnt, (int)nread ) );
2642 /* Returning -1 here means successful sendfile. */
2650 nread = read_file(fsp,data,startpos,smb_maxcnt);
2653 return(UNIXERROR(ERRDOS,ERRnoaccess));
2656 outsize = set_message(outbuf,12,nread,False);
2657 SSVAL(outbuf,smb_vwv2,0xFFFF); /* Remaining - must be -1. */
2658 SSVAL(outbuf,smb_vwv5,nread);
2659 SSVAL(outbuf,smb_vwv6,smb_offset(data,outbuf));
2660 SSVAL(outbuf,smb_vwv7,((nread >> 16) & 1));
2661 SSVAL(smb_buf(outbuf),-2,nread);
2663 DEBUG( 3, ( "send_file_readX fnum=%d max=%d nread=%d\n",
2664 fsp->fnum, (int)smb_maxcnt, (int)nread ) );
2666 /* Returning the number of bytes we want to send back - including header. */
2670 /****************************************************************************
2671 Reply to a read and X.
2672 ****************************************************************************/
2674 int reply_read_and_X(connection_struct *conn, char *inbuf,char *outbuf,int length,int bufsize)
2676 files_struct *fsp = file_fsp(inbuf,smb_vwv2);
2677 SMB_OFF_T startpos = IVAL_TO_SMB_OFF_T(inbuf,smb_vwv3);
2679 size_t smb_maxcnt = SVAL(inbuf,smb_vwv5);
2681 size_t smb_mincnt = SVAL(inbuf,smb_vwv6);
2684 START_PROFILE(SMBreadX);
2686 /* If it's an IPC, pass off the pipe handler. */
2688 END_PROFILE(SMBreadX);
2689 return reply_pipe_read_and_X(inbuf,outbuf,length,bufsize);
2692 CHECK_FSP(fsp,conn);
2693 if (!CHECK_READ(fsp,inbuf)) {
2694 return(ERROR_DOS(ERRDOS,ERRbadaccess));
2697 set_message(outbuf,12,0,True);
2699 if (global_client_caps & CAP_LARGE_READX) {
2700 if (SVAL(inbuf,smb_vwv7) == 1) {
2701 smb_maxcnt |= (1<<16);
2703 if (smb_maxcnt > BUFFER_SIZE) {
2704 DEBUG(0,("reply_read_and_X - read too large (%u) for reply buffer %u\n",
2705 (unsigned int)smb_maxcnt, (unsigned int)BUFFER_SIZE));
2706 END_PROFILE(SMBreadX);
2707 return ERROR_NT(NT_STATUS_INVALID_PARAMETER);
2711 if(CVAL(inbuf,smb_wct) == 12) {
2712 #ifdef LARGE_SMB_OFF_T
2714 * This is a large offset (64 bit) read.
2716 startpos |= (((SMB_OFF_T)IVAL(inbuf,smb_vwv10)) << 32);
2718 #else /* !LARGE_SMB_OFF_T */
2721 * Ensure we haven't been sent a >32 bit offset.
2724 if(IVAL(inbuf,smb_vwv10) != 0) {
2725 DEBUG(0,("reply_read_and_X - large offset (%x << 32) used and we don't support \
2726 64 bit offsets.\n", (unsigned int)IVAL(inbuf,smb_vwv10) ));
2727 END_PROFILE(SMBreadX);
2728 return ERROR_DOS(ERRDOS,ERRbadaccess);
2731 #endif /* LARGE_SMB_OFF_T */
2735 if (is_locked(fsp,(uint32)SVAL(inbuf,smb_pid),(SMB_BIG_UINT)smb_maxcnt,(SMB_BIG_UINT)startpos, READ_LOCK)) {
2736 END_PROFILE(SMBreadX);
2737 return ERROR_DOS(ERRDOS,ERRlock);
2740 if (schedule_aio_read_and_X(conn, inbuf, outbuf, length, bufsize, fsp, startpos, smb_maxcnt)) {
2741 END_PROFILE(SMBreadX);
2745 nread = send_file_readX(conn, inbuf, outbuf, length, bufsize, fsp, startpos, smb_maxcnt);
2747 nread = chain_reply(inbuf,outbuf,length,bufsize);
2749 END_PROFILE(SMBreadX);
2753 /****************************************************************************
2754 Reply to a writebraw (core+ or LANMAN1.0 protocol).
2755 ****************************************************************************/
2757 int reply_writebraw(connection_struct *conn, char *inbuf,char *outbuf, int size, int dum_buffsize)
2760 ssize_t total_written=0;
2761 size_t numtowrite=0;
2766 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
2768 START_PROFILE(SMBwritebraw);
2770 if (srv_is_signing_active()) {
2771 exit_server_cleanly("reply_writebraw: SMB signing is active - raw reads/writes are disallowed.");
2774 CHECK_FSP(fsp,conn);
2775 if (!CHECK_WRITE(fsp)) {
2776 return(ERROR_DOS(ERRDOS,ERRbadaccess));
2779 tcount = IVAL(inbuf,smb_vwv1);
2780 startpos = IVAL_TO_SMB_OFF_T(inbuf,smb_vwv3);
2781 write_through = BITSETW(inbuf+smb_vwv7,0);
2783 /* We have to deal with slightly different formats depending
2784 on whether we are using the core+ or lanman1.0 protocol */
2786 if(Protocol <= PROTOCOL_COREPLUS) {
2787 numtowrite = SVAL(smb_buf(inbuf),-2);
2788 data = smb_buf(inbuf);
2790 numtowrite = SVAL(inbuf,smb_vwv10);
2791 data = smb_base(inbuf) + SVAL(inbuf, smb_vwv11);
2794 /* force the error type */
2795 SCVAL(inbuf,smb_com,SMBwritec);
2796 SCVAL(outbuf,smb_com,SMBwritec);
2798 if (is_locked(fsp,(uint32)SVAL(inbuf,smb_pid),(SMB_BIG_UINT)tcount,(SMB_BIG_UINT)startpos, WRITE_LOCK)) {
2799 END_PROFILE(SMBwritebraw);
2800 return(ERROR_DOS(ERRDOS,ERRlock));
2804 nwritten = write_file(fsp,data,startpos,numtowrite);
2806 DEBUG(3,("writebraw1 fnum=%d start=%.0f num=%d wrote=%d sync=%d\n",
2807 fsp->fnum, (double)startpos, (int)numtowrite, (int)nwritten, (int)write_through));
2809 if (nwritten < (ssize_t)numtowrite) {
2810 END_PROFILE(SMBwritebraw);
2811 return(UNIXERROR(ERRHRD,ERRdiskfull));
2814 total_written = nwritten;
2816 /* Return a message to the redirector to tell it to send more bytes */
2817 SCVAL(outbuf,smb_com,SMBwritebraw);
2818 SSVALS(outbuf,smb_vwv0,-1);
2819 outsize = set_message(outbuf,Protocol>PROTOCOL_COREPLUS?1:0,0,True);
2821 if (!send_smb(smbd_server_fd(),outbuf))
2822 exit_server_cleanly("reply_writebraw: send_smb failed.");
2824 /* Now read the raw data into the buffer and write it */
2825 if (read_smb_length(smbd_server_fd(),inbuf,SMB_SECONDARY_WAIT) == -1) {
2826 exit_server_cleanly("secondary writebraw failed");
2829 /* Even though this is not an smb message, smb_len returns the generic length of an smb message */
2830 numtowrite = smb_len(inbuf);
2832 /* Set up outbuf to return the correct return */
2833 outsize = set_message(outbuf,1,0,True);
2834 SCVAL(outbuf,smb_com,SMBwritec);
2836 if (numtowrite != 0) {
2838 if (numtowrite > BUFFER_SIZE) {
2839 DEBUG(0,("reply_writebraw: Oversize secondary write raw requested (%u). Terminating\n",
2840 (unsigned int)numtowrite ));
2841 exit_server_cleanly("secondary writebraw failed");
2844 if (tcount > nwritten+numtowrite) {
2845 DEBUG(3,("Client overestimated the write %d %d %d\n",
2846 (int)tcount,(int)nwritten,(int)numtowrite));
2849 if (read_data( smbd_server_fd(), inbuf+4, numtowrite) != numtowrite ) {
2850 DEBUG(0,("reply_writebraw: Oversize secondary write raw read failed (%s). Terminating\n",
2852 exit_server_cleanly("secondary writebraw failed");
2855 nwritten = write_file(fsp,inbuf+4,startpos+nwritten,numtowrite);
2856 if (nwritten == -1) {
2857 END_PROFILE(SMBwritebraw);
2858 return(UNIXERROR(ERRHRD,ERRdiskfull));
2861 if (nwritten < (ssize_t)numtowrite) {
2862 SCVAL(outbuf,smb_rcls,ERRHRD);
2863 SSVAL(outbuf,smb_err,ERRdiskfull);
2867 total_written += nwritten;
2870 SSVAL(outbuf,smb_vwv0,total_written);
2872 sync_file(conn, fsp, write_through);
2874 DEBUG(3,("writebraw2 fnum=%d start=%.0f num=%d wrote=%d\n",
2875 fsp->fnum, (double)startpos, (int)numtowrite,(int)total_written));
2877 /* we won't return a status if write through is not selected - this follows what WfWg does */
2878 END_PROFILE(SMBwritebraw);
2879 if (!write_through && total_written==tcount) {
2881 #if RABBIT_PELLET_FIX
2883 * Fix for "rabbit pellet" mode, trigger an early TCP ack by
2884 * sending a SMBkeepalive. Thanks to DaveCB at Sun for this. JRA.
2886 if (!send_keepalive(smbd_server_fd()))
2887 exit_server_cleanly("reply_writebraw: send of keepalive failed");
2896 #define DBGC_CLASS DBGC_LOCKING
2898 /****************************************************************************
2899 Reply to a writeunlock (core+).
2900 ****************************************************************************/
2902 int reply_writeunlock(connection_struct *conn, char *inbuf,char *outbuf,
2903 int size, int dum_buffsize)
2905 ssize_t nwritten = -1;
2909 NTSTATUS status = NT_STATUS_OK;
2910 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
2912 START_PROFILE(SMBwriteunlock);
2914 CHECK_FSP(fsp,conn);
2915 if (!CHECK_WRITE(fsp)) {
2916 return(ERROR_DOS(ERRDOS,ERRbadaccess));
2919 numtowrite = SVAL(inbuf,smb_vwv1);
2920 startpos = IVAL_TO_SMB_OFF_T(inbuf,smb_vwv2);
2921 data = smb_buf(inbuf) + 3;
2923 if (numtowrite && is_locked(fsp,(uint32)SVAL(inbuf,smb_pid),(SMB_BIG_UINT)numtowrite,(SMB_BIG_UINT)startpos, WRITE_LOCK)) {
2924 END_PROFILE(SMBwriteunlock);
2925 return ERROR_DOS(ERRDOS,ERRlock);
2928 /* The special X/Open SMB protocol handling of
2929 zero length writes is *NOT* done for
2931 if(numtowrite == 0) {
2934 nwritten = write_file(fsp,data,startpos,numtowrite);
2937 sync_file(conn, fsp, False /* write through */);
2939 if(((nwritten == 0) && (numtowrite != 0))||(nwritten < 0)) {
2940 END_PROFILE(SMBwriteunlock);
2941 return(UNIXERROR(ERRHRD,ERRdiskfull));
2945 status = do_unlock(fsp,
2946 (uint32)SVAL(inbuf,smb_pid),
2947 (SMB_BIG_UINT)numtowrite,
2948 (SMB_BIG_UINT)startpos,
2951 if (NT_STATUS_V(status)) {
2952 END_PROFILE(SMBwriteunlock);
2953 return ERROR_NT(status);
2957 outsize = set_message(outbuf,1,0,True);
2959 SSVAL(outbuf,smb_vwv0,nwritten);
2961 DEBUG(3,("writeunlock fnum=%d num=%d wrote=%d\n",
2962 fsp->fnum, (int)numtowrite, (int)nwritten));
2964 END_PROFILE(SMBwriteunlock);
2969 #define DBGC_CLASS DBGC_ALL
2971 /****************************************************************************
2973 ****************************************************************************/
2975 int reply_write(connection_struct *conn, char *inbuf,char *outbuf,int size,int dum_buffsize)
2978 ssize_t nwritten = -1;
2981 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
2983 START_PROFILE(SMBwrite);
2985 /* If it's an IPC, pass off the pipe handler. */
2987 END_PROFILE(SMBwrite);
2988 return reply_pipe_write(inbuf,outbuf,size,dum_buffsize);
2991 CHECK_FSP(fsp,conn);
2992 if (!CHECK_WRITE(fsp)) {
2993 return(ERROR_DOS(ERRDOS,ERRbadaccess));
2996 numtowrite = SVAL(inbuf,smb_vwv1);
2997 startpos = IVAL_TO_SMB_OFF_T(inbuf,smb_vwv2);
2998 data = smb_buf(inbuf) + 3;
3000 if (is_locked(fsp,(uint32)SVAL(inbuf,smb_pid),(SMB_BIG_UINT)numtowrite,(SMB_BIG_UINT)startpos, WRITE_LOCK)) {
3001 END_PROFILE(SMBwrite);
3002 return ERROR_DOS(ERRDOS,ERRlock);
3006 * X/Open SMB protocol says that if smb_vwv1 is
3007 * zero then the file size should be extended or
3008 * truncated to the size given in smb_vwv[2-3].
3011 if(numtowrite == 0) {
3013 * This is actually an allocate call, and set EOF. JRA.
3015 nwritten = vfs_allocate_file_space(fsp, (SMB_OFF_T)startpos);
3017 END_PROFILE(SMBwrite);
3018 return ERROR_NT(NT_STATUS_DISK_FULL);
3020 nwritten = vfs_set_filelen(fsp, (SMB_OFF_T)startpos);
3022 END_PROFILE(SMBwrite);
3023 return ERROR_NT(NT_STATUS_DISK_FULL);
3026 nwritten = write_file(fsp,data,startpos,numtowrite);
3028 sync_file(conn, fsp, False);
3030 if(((nwritten == 0) && (numtowrite != 0))||(nwritten < 0)) {
3031 END_PROFILE(SMBwrite);
3032 return(UNIXERROR(ERRHRD,ERRdiskfull));
3035 outsize = set_message(outbuf,1,0,True);
3037 SSVAL(outbuf,smb_vwv0,nwritten);
3039 if (nwritten < (ssize_t)numtowrite) {
3040 SCVAL(outbuf,smb_rcls,ERRHRD);
3041 SSVAL(outbuf,smb_err,ERRdiskfull);
3044 DEBUG(3,("write fnum=%d num=%d wrote=%d\n", fsp->fnum, (int)numtowrite, (int)nwritten));
3046 END_PROFILE(SMBwrite);
3050 /****************************************************************************
3051 Reply to a write and X.
3052 ****************************************************************************/
3054 int reply_write_and_X(connection_struct *conn, char *inbuf,char *outbuf,int length,int bufsize)
3056 files_struct *fsp = file_fsp(inbuf,smb_vwv2);
3057 SMB_OFF_T startpos = IVAL_TO_SMB_OFF_T(inbuf,smb_vwv3);
3058 size_t numtowrite = SVAL(inbuf,smb_vwv10);
3059 BOOL write_through = BITSETW(inbuf+smb_vwv7,0);
3060 ssize_t nwritten = -1;
3061 unsigned int smb_doff = SVAL(inbuf,smb_vwv11);
3062 unsigned int smblen = smb_len(inbuf);
3064 BOOL large_writeX = ((CVAL(inbuf,smb_wct) == 14) && (smblen > 0xFFFF));
3065 START_PROFILE(SMBwriteX);
3067 /* If it's an IPC, pass off the pipe handler. */
3069 END_PROFILE(SMBwriteX);
3070 return reply_pipe_write_and_X(inbuf,outbuf,length,bufsize);
3073 CHECK_FSP(fsp,conn);
3074 if (!CHECK_WRITE(fsp)) {
3075 return(ERROR_DOS(ERRDOS,ERRbadaccess));
3078 set_message(outbuf,6,0,True);
3080 /* Deal with possible LARGE_WRITEX */
3082 numtowrite |= ((((size_t)SVAL(inbuf,smb_vwv9)) & 1 )<<16);
3085 if(smb_doff > smblen || (smb_doff + numtowrite > smblen)) {
3086 END_PROFILE(SMBwriteX);
3087 return ERROR_DOS(ERRDOS,ERRbadmem);
3090 data = smb_base(inbuf) + smb_doff;
3092 if(CVAL(inbuf,smb_wct) == 14) {
3093 #ifdef LARGE_SMB_OFF_T
3095 * This is a large offset (64 bit) write.
3097 startpos |= (((SMB_OFF_T)IVAL(inbuf,smb_vwv12)) << 32);
3099 #else /* !LARGE_SMB_OFF_T */
3102 * Ensure we haven't been sent a >32 bit offset.
3105 if(IVAL(inbuf,smb_vwv12) != 0) {
3106 DEBUG(0,("reply_write_and_X - large offset (%x << 32) used and we don't support \
3107 64 bit offsets.\n", (unsigned int)IVAL(inbuf,smb_vwv12) ));
3108 END_PROFILE(SMBwriteX);
3109 return ERROR_DOS(ERRDOS,ERRbadaccess);
3112 #endif /* LARGE_SMB_OFF_T */
3115 if (is_locked(fsp,(uint32)SVAL(inbuf,smb_pid),(SMB_BIG_UINT)numtowrite,(SMB_BIG_UINT)startpos, WRITE_LOCK)) {
3116 END_PROFILE(SMBwriteX);
3117 return ERROR_DOS(ERRDOS,ERRlock);
3120 /* X/Open SMB protocol says that, unlike SMBwrite
3121 if the length is zero then NO truncation is
3122 done, just a write of zero. To truncate a file,
3125 if(numtowrite == 0) {
3129 if (schedule_aio_write_and_X(conn, inbuf, outbuf, length, bufsize,
3130 fsp,data,startpos,numtowrite)) {
3131 END_PROFILE(SMBwriteX);
3135 nwritten = write_file(fsp,data,startpos,numtowrite);
3138 if(((nwritten == 0) && (numtowrite != 0))||(nwritten < 0)) {
3139 END_PROFILE(SMBwriteX);
3140 return(UNIXERROR(ERRHRD,ERRdiskfull));
3143 SSVAL(outbuf,smb_vwv2,nwritten);
3145 SSVAL(outbuf,smb_vwv4,(nwritten>>16)&1);
3147 if (nwritten < (ssize_t)numtowrite) {
3148 SCVAL(outbuf,smb_rcls,ERRHRD);
3149 SSVAL(outbuf,smb_err,ERRdiskfull);
3152 DEBUG(3,("writeX fnum=%d num=%d wrote=%d\n",
3153 fsp->fnum, (int)numtowrite, (int)nwritten));
3155 sync_file(conn, fsp, write_through);
3157 END_PROFILE(SMBwriteX);
3158 return chain_reply(inbuf,outbuf,length,bufsize);
3161 /****************************************************************************
3163 ****************************************************************************/
3165 int reply_lseek(connection_struct *conn, char *inbuf,char *outbuf, int size, int dum_buffsize)
3171 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
3172 START_PROFILE(SMBlseek);
3174 CHECK_FSP(fsp,conn);
3176 flush_write_cache(fsp, SEEK_FLUSH);
3178 mode = SVAL(inbuf,smb_vwv1) & 3;
3179 /* NB. This doesn't use IVAL_TO_SMB_OFF_T as startpos can be signed in this case. */
3180 startpos = (SMB_OFF_T)IVALS(inbuf,smb_vwv2);
3189 res = fsp->fh->pos + startpos;
3200 if (umode == SEEK_END) {
3201 if((res = SMB_VFS_LSEEK(fsp,fsp->fh->fd,startpos,umode)) == -1) {
3202 if(errno == EINVAL) {
3203 SMB_OFF_T current_pos = startpos;
3204 SMB_STRUCT_STAT sbuf;
3206 if(SMB_VFS_FSTAT(fsp,fsp->fh->fd, &sbuf) == -1) {
3207 END_PROFILE(SMBlseek);
3208 return(UNIXERROR(ERRDOS,ERRnoaccess));
3211 current_pos += sbuf.st_size;
3213 res = SMB_VFS_LSEEK(fsp,fsp->fh->fd,0,SEEK_SET);
3218 END_PROFILE(SMBlseek);
3219 return(UNIXERROR(ERRDOS,ERRnoaccess));
3225 outsize = set_message(outbuf,2,0,True);
3226 SIVAL(outbuf,smb_vwv0,res);
3228 DEBUG(3,("lseek fnum=%d ofs=%.0f newpos = %.0f mode=%d\n",
3229 fsp->fnum, (double)startpos, (double)res, mode));
3231 END_PROFILE(SMBlseek);
3235 /****************************************************************************
3237 ****************************************************************************/
3239 int reply_flush(connection_struct *conn, char *inbuf,char *outbuf, int size, int dum_buffsize)
3241 int outsize = set_message(outbuf,0,0,False);
3242 uint16 fnum = SVAL(inbuf,smb_vwv0);
3243 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
3244 START_PROFILE(SMBflush);
3247 CHECK_FSP(fsp,conn);
3250 file_sync_all(conn);
3252 sync_file(conn,fsp, True);
3255 DEBUG(3,("flush\n"));
3256 END_PROFILE(SMBflush);
3260 /****************************************************************************
3262 conn POINTER CAN BE NULL HERE !
3263 ****************************************************************************/
3265 int reply_exit(connection_struct *conn,
3266 char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
3269 START_PROFILE(SMBexit);
3271 file_close_pid(SVAL(inbuf,smb_pid),SVAL(inbuf,smb_uid));
3273 outsize = set_message(outbuf,0,0,False);
3275 DEBUG(3,("exit\n"));
3277 END_PROFILE(SMBexit);
3281 /****************************************************************************
3282 Reply to a close - has to deal with closing a directory opened by NT SMB's.
3283 ****************************************************************************/
3285 int reply_close(connection_struct *conn, char *inbuf,char *outbuf, int size,
3290 int32 eclass = 0, err = 0;
3291 files_struct *fsp = NULL;
3292 START_PROFILE(SMBclose);
3294 outsize = set_message(outbuf,0,0,False);
3296 /* If it's an IPC, pass off to the pipe handler. */
3298 END_PROFILE(SMBclose);
3299 return reply_pipe_close(conn, inbuf,outbuf);
3302 fsp = file_fsp(inbuf,smb_vwv0);
3305 * We can only use CHECK_FSP if we know it's not a directory.
3308 if(!fsp || (fsp->conn != conn) || (fsp->vuid != current_user.vuid)) {
3309 END_PROFILE(SMBclose);
3310 return ERROR_DOS(ERRDOS,ERRbadfid);
3313 if(fsp->is_directory) {
3315 * Special case - close NT SMB directory handle.
3317 DEBUG(3,("close directory fnum=%d\n", fsp->fnum));
3318 close_file(fsp,NORMAL_CLOSE);
3321 * Close ordinary file.
3325 DEBUG(3,("close fd=%d fnum=%d (numopen=%d)\n",
3326 fsp->fh->fd, fsp->fnum,
3327 conn->num_files_open));
3330 * Take care of any time sent in the close.
3333 mtime = srv_make_unix_date3(inbuf+smb_vwv1);
3334 fsp_set_pending_modtime(fsp, mtime);
3337 * close_file() returns the unix errno if an error
3338 * was detected on close - normally this is due to
3339 * a disk full error. If not then it was probably an I/O error.
3342 if((close_err = close_file(fsp,NORMAL_CLOSE)) != 0) {
3344 END_PROFILE(SMBclose);
3345 return (UNIXERROR(ERRHRD,ERRgeneral));
3349 /* We have a cached error */
3351 END_PROFILE(SMBclose);
3352 return ERROR_DOS(eclass,err);
3355 END_PROFILE(SMBclose);
3359 /****************************************************************************
3360 Reply to a writeclose (Core+ protocol).
3361 ****************************************************************************/
3363 int reply_writeclose(connection_struct *conn,
3364 char *inbuf,char *outbuf, int size, int dum_buffsize)
3367 ssize_t nwritten = -1;
3373 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
3374 START_PROFILE(SMBwriteclose);
3376 CHECK_FSP(fsp,conn);
3377 if (!CHECK_WRITE(fsp)) {
3378 return(ERROR_DOS(ERRDOS,ERRbadaccess));
3381 numtowrite = SVAL(inbuf,smb_vwv1);
3382 startpos = IVAL_TO_SMB_OFF_T(inbuf,smb_vwv2);
3383 mtime = srv_make_unix_date3(inbuf+smb_vwv4);
3384 data = smb_buf(inbuf) + 1;
3386 if (numtowrite && is_locked(fsp,(uint32)SVAL(inbuf,smb_pid),(SMB_BIG_UINT)numtowrite,(SMB_BIG_UINT)startpos, WRITE_LOCK)) {
3387 END_PROFILE(SMBwriteclose);
3388 return ERROR_DOS(ERRDOS,ERRlock);
3391 nwritten = write_file(fsp,data,startpos,numtowrite);
3393 set_filetime(conn, fsp->fsp_name,mtime);
3396 * More insanity. W2K only closes the file if writelen > 0.
3401 DEBUG(3,("reply_writeclose: zero length write doesn't close file %s\n",
3403 close_err = close_file(fsp,NORMAL_CLOSE);
3406 DEBUG(3,("writeclose fnum=%d num=%d wrote=%d (numopen=%d)\n",
3407 fsp->fnum, (int)numtowrite, (int)nwritten,
3408 conn->num_files_open));
3410 if(((nwritten == 0) && (numtowrite != 0))||(nwritten < 0)) {
3411 END_PROFILE(SMBwriteclose);
3412 return(UNIXERROR(ERRHRD,ERRdiskfull));
3415 if(close_err != 0) {
3417 END_PROFILE(SMBwriteclose);
3418 return(UNIXERROR(ERRHRD,ERRgeneral));
3421 outsize = set_message(outbuf,1,0,True);
3423 SSVAL(outbuf,smb_vwv0,nwritten);
3424 END_PROFILE(SMBwriteclose);
3429 #define DBGC_CLASS DBGC_LOCKING
3431 /****************************************************************************
3433 ****************************************************************************/
3435 int reply_lock(connection_struct *conn,
3436 char *inbuf,char *outbuf, int length, int dum_buffsize)
3438 int outsize = set_message(outbuf,0,0,False);
3439 SMB_BIG_UINT count,offset;
3441 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
3442 struct byte_range_lock *br_lck = NULL;
3444 START_PROFILE(SMBlock);
3446 CHECK_FSP(fsp,conn);
3448 release_level_2_oplocks_on_change(fsp);
3450 count = (SMB_BIG_UINT)IVAL(inbuf,smb_vwv1);
3451 offset = (SMB_BIG_UINT)IVAL(inbuf,smb_vwv3);
3453 DEBUG(3,("lock fd=%d fnum=%d offset=%.0f count=%.0f\n",
3454 fsp->fh->fd, fsp->fnum, (double)offset, (double)count));
3456 br_lck = do_lock(fsp,
3457 (uint32)SVAL(inbuf,smb_pid),
3462 False, /* Non-blocking lock. */
3465 TALLOC_FREE(br_lck);
3467 if (NT_STATUS_V(status)) {
3468 END_PROFILE(SMBlock);
3469 return ERROR_NT(status);
3472 END_PROFILE(SMBlock);
3476 /****************************************************************************
3478 ****************************************************************************/
3480 int reply_unlock(connection_struct *conn, char *inbuf,char *outbuf, int size,
3483 int outsize = set_message(outbuf,0,0,False);
3484 SMB_BIG_UINT count,offset;
3486 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
3487 START_PROFILE(SMBunlock);
3489 CHECK_FSP(fsp,conn);
3491 count = (SMB_BIG_UINT)IVAL(inbuf,smb_vwv1);
3492 offset = (SMB_BIG_UINT)IVAL(inbuf,smb_vwv3);
3494 status = do_unlock(fsp,
3495 (uint32)SVAL(inbuf,smb_pid),
3500 if (NT_STATUS_V(status)) {
3501 END_PROFILE(SMBunlock);
3502 return ERROR_NT(status);
3505 DEBUG( 3, ( "unlock fd=%d fnum=%d offset=%.0f count=%.0f\n",
3506 fsp->fh->fd, fsp->fnum, (double)offset, (double)count ) );
3508 END_PROFILE(SMBunlock);
3513 #define DBGC_CLASS DBGC_ALL
3515 /****************************************************************************
3517 conn POINTER CAN BE NULL HERE !
3518 ****************************************************************************/
3520 int reply_tdis(connection_struct *conn,
3521 char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
3523 int outsize = set_message(outbuf,0,0,False);
3525 START_PROFILE(SMBtdis);
3527 vuid = SVAL(inbuf,smb_uid);
3530 DEBUG(4,("Invalid connection in tdis\n"));
3531 END_PROFILE(SMBtdis);
3532 return ERROR_DOS(ERRSRV,ERRinvnid);
3537 close_cnum(conn,vuid);
3539 END_PROFILE(SMBtdis);
3543 /****************************************************************************
3545 conn POINTER CAN BE NULL HERE !
3546 ****************************************************************************/
3548 int reply_echo(connection_struct *conn,
3549 char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
3551 int smb_reverb = SVAL(inbuf,smb_vwv0);
3553 unsigned int data_len = smb_buflen(inbuf);
3554 int outsize = set_message(outbuf,1,data_len,True);
3555 START_PROFILE(SMBecho);
3557 if (data_len > BUFFER_SIZE) {
3558 DEBUG(0,("reply_echo: data_len too large.\n"));
3559 END_PROFILE(SMBecho);
3563 /* copy any incoming data back out */
3565 memcpy(smb_buf(outbuf),smb_buf(inbuf),data_len);
3567 if (smb_reverb > 100) {
3568 DEBUG(0,("large reverb (%d)?? Setting to 100\n",smb_reverb));
3572 for (seq_num =1 ; seq_num <= smb_reverb ; seq_num++) {
3573 SSVAL(outbuf,smb_vwv0,seq_num);
3575 smb_setlen(outbuf,outsize - 4);
3578 if (!send_smb(smbd_server_fd(),outbuf))
3579 exit_server_cleanly("reply_echo: send_smb failed.");
3582 DEBUG(3,("echo %d times\n", smb_reverb));
3586 END_PROFILE(SMBecho);
3590 /****************************************************************************
3591 Reply to a printopen.
3592 ****************************************************************************/
3594 int reply_printopen(connection_struct *conn,
3595 char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
3601 START_PROFILE(SMBsplopen);
3603 if (!CAN_PRINT(conn)) {
3604 END_PROFILE(SMBsplopen);
3605 return ERROR_DOS(ERRDOS,ERRnoaccess);
3608 /* Open for exclusive use, write only. */
3609 status = print_fsp_open(conn, NULL, &fsp);
3611 if (!NT_STATUS_IS_OK(status)) {
3612 END_PROFILE(SMBsplopen);
3613 return(ERROR_NT(status));
3616 outsize = set_message(outbuf,1,0,True);
3617 SSVAL(outbuf,smb_vwv0,fsp->fnum);
3619 DEBUG(3,("openprint fd=%d fnum=%d\n",
3620 fsp->fh->fd, fsp->fnum));
3622 END_PROFILE(SMBsplopen);
3626 /****************************************************************************
3627 Reply to a printclose.
3628 ****************************************************************************/
3630 int reply_printclose(connection_struct *conn,
3631 char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
3633 int outsize = set_message(outbuf,0,0,False);
3634 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
3636 START_PROFILE(SMBsplclose);
3638 CHECK_FSP(fsp,conn);
3640 if (!CAN_PRINT(conn)) {
3641 END_PROFILE(SMBsplclose);
3642 return ERROR_NT(NT_STATUS_DOS(ERRSRV, ERRerror));
3645 DEBUG(3,("printclose fd=%d fnum=%d\n",
3646 fsp->fh->fd,fsp->fnum));
3648 close_err = close_file(fsp,NORMAL_CLOSE);
3650 if(close_err != 0) {
3652 END_PROFILE(SMBsplclose);
3653 return(UNIXERROR(ERRHRD,ERRgeneral));
3656 END_PROFILE(SMBsplclose);
3660 /****************************************************************************
3661 Reply to a printqueue.
3662 ****************************************************************************/
3664 int reply_printqueue(connection_struct *conn,
3665 char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
3667 int outsize = set_message(outbuf,2,3,True);
3668 int max_count = SVAL(inbuf,smb_vwv0);
3669 int start_index = SVAL(inbuf,smb_vwv1);
3670 START_PROFILE(SMBsplretq);
3672 /* we used to allow the client to get the cnum wrong, but that
3673 is really quite gross and only worked when there was only
3674 one printer - I think we should now only accept it if they
3675 get it right (tridge) */
3676 if (!CAN_PRINT(conn)) {
3677 END_PROFILE(SMBsplretq);
3678 return ERROR_DOS(ERRDOS,ERRnoaccess);
3681 SSVAL(outbuf,smb_vwv0,0);
3682 SSVAL(outbuf,smb_vwv1,0);
3683 SCVAL(smb_buf(outbuf),0,1);
3684 SSVAL(smb_buf(outbuf),1,0);
3686 DEBUG(3,("printqueue start_index=%d max_count=%d\n",
3687 start_index, max_count));
3690 print_queue_struct *queue = NULL;
3691 print_status_struct status;
3692 char *p = smb_buf(outbuf) + 3;
3693 int count = print_queue_status(SNUM(conn), &queue, &status);
3694 int num_to_get = ABS(max_count);
3695 int first = (max_count>0?start_index:start_index+max_count+1);
3701 num_to_get = MIN(num_to_get,count-first);
3704 for (i=first;i<first+num_to_get;i++) {
3705 srv_put_dos_date2(p,0,queue[i].time);
3706 SCVAL(p,4,(queue[i].status==LPQ_PRINTING?2:3));
3707 SSVAL(p,5, queue[i].job);
3708 SIVAL(p,7,queue[i].size);
3710 srvstr_push(outbuf, p+12, queue[i].fs_user, 16, STR_ASCII);
3715 outsize = set_message(outbuf,2,28*count+3,False);
3716 SSVAL(outbuf,smb_vwv0,count);
3717 SSVAL(outbuf,smb_vwv1,(max_count>0?first+count:first-1));
3718 SCVAL(smb_buf(outbuf),0,1);
3719 SSVAL(smb_buf(outbuf),1,28*count);
3724 DEBUG(3,("%d entries returned in queue\n",count));
3727 END_PROFILE(SMBsplretq);
3731 /****************************************************************************
3732 Reply to a printwrite.
3733 ****************************************************************************/
3735 int reply_printwrite(connection_struct *conn, char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
3738 int outsize = set_message(outbuf,0,0,False);
3740 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
3742 START_PROFILE(SMBsplwr);
3744 if (!CAN_PRINT(conn)) {
3745 END_PROFILE(SMBsplwr);
3746 return ERROR_DOS(ERRDOS,ERRnoaccess);
3749 CHECK_FSP(fsp,conn);
3750 if (!CHECK_WRITE(fsp)) {
3751 return(ERROR_DOS(ERRDOS,ERRbadaccess));
3754 numtowrite = SVAL(smb_buf(inbuf),1);
3755 data = smb_buf(inbuf) + 3;
3757 if (write_file(fsp,data,-1,numtowrite) != numtowrite) {
3758 END_PROFILE(SMBsplwr);
3759 return(UNIXERROR(ERRHRD,ERRdiskfull));
3762 DEBUG( 3, ( "printwrite fnum=%d num=%d\n", fsp->fnum, numtowrite ) );
3764 END_PROFILE(SMBsplwr);
3768 /****************************************************************************
3770 ****************************************************************************/
3772 int reply_mkdir(connection_struct *conn, char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
3777 BOOL bad_path = False;
3778 SMB_STRUCT_STAT sbuf;
3780 START_PROFILE(SMBmkdir);
3782 srvstr_get_path(inbuf, directory, smb_buf(inbuf) + 1, sizeof(directory), 0, STR_TERMINATE, &status);
3783 if (!NT_STATUS_IS_OK(status)) {
3784 END_PROFILE(SMBmkdir);
3785 return ERROR_NT(status);
3788 RESOLVE_DFSPATH(directory, conn, inbuf, outbuf);
3790 unix_convert(directory,conn,0,&bad_path,&sbuf);
3792 END_PROFILE(SMBmkdir);
3793 return ERROR_NT(NT_STATUS_OBJECT_PATH_NOT_FOUND);
3796 status = create_directory(conn, directory);
3798 DEBUG(5, ("create_directory returned %s\n", nt_errstr(status)));
3800 if (!NT_STATUS_IS_OK(status)) {
3802 if (!use_nt_status()
3803 && NT_STATUS_EQUAL(status,
3804 NT_STATUS_OBJECT_NAME_COLLISION)) {
3806 * Yes, in the DOS error code case we get a
3807 * ERRDOS:ERRnoaccess here. See BASE-SAMBA3ERROR
3808 * samba4 torture test.
3810 status = NT_STATUS_DOS(ERRDOS, ERRnoaccess);
3813 END_PROFILE(SMBmkdir);
3814 return ERROR_NT(status);
3817 outsize = set_message(outbuf,0,0,False);
3819 DEBUG( 3, ( "mkdir %s ret=%d\n", directory, outsize ) );
3821 END_PROFILE(SMBmkdir);
3825 /****************************************************************************
3826 Static function used by reply_rmdir to delete an entire directory
3827 tree recursively. Return True on ok, False on fail.
3828 ****************************************************************************/
3830 static BOOL recursive_rmdir(connection_struct *conn, char *directory)
3832 const char *dname = NULL;
3835 struct smb_Dir *dir_hnd = OpenDir(conn, directory, NULL, 0);
3840 while((dname = ReadDirName(dir_hnd, &offset))) {
3844 if((strcmp(dname, ".") == 0) || (strcmp(dname, "..")==0))
3847 if (!is_visible_file(conn, directory, dname, &st, False))
3850 /* Construct the full name. */
3851 if(strlen(directory) + strlen(dname) + 1 >= sizeof(fullname)) {
3857 pstrcpy(fullname, directory);
3858 pstrcat(fullname, "/");
3859 pstrcat(fullname, dname);
3861 if(SMB_VFS_LSTAT(conn,fullname, &st) != 0) {
3866 if(st.st_mode & S_IFDIR) {
3867 if(!recursive_rmdir(conn, fullname)) {
3871 if(SMB_VFS_RMDIR(conn,fullname) != 0) {
3875 } else if(SMB_VFS_UNLINK(conn,fullname) != 0) {
3884 /****************************************************************************
3885 The internals of the rmdir code - called elsewhere.
3886 ****************************************************************************/
3888 BOOL rmdir_internals(connection_struct *conn, const char *directory)
3893 ok = (SMB_VFS_RMDIR(conn,directory) == 0);
3894 if(!ok && ((errno == ENOTEMPTY)||(errno == EEXIST)) && lp_veto_files(SNUM(conn))) {
3896 * Check to see if the only thing in this directory are
3897 * vetoed files/directories. If so then delete them and
3898 * retry. If we fail to delete any of them (and we *don't*
3899 * do a recursive delete) then fail the rmdir.
3903 struct smb_Dir *dir_hnd = OpenDir(conn, directory, NULL, 0);
3905 if(dir_hnd == NULL) {
3910 while ((dname = ReadDirName(dir_hnd,&dirpos))) {
3911 if((strcmp(dname, ".") == 0) || (strcmp(dname, "..")==0))
3913 if (!is_visible_file(conn, directory, dname, &st, False))
3915 if(!IS_VETO_PATH(conn, dname)) {
3922 /* We only have veto files/directories. Recursive delete. */
3924 RewindDir(dir_hnd,&dirpos);
3925 while ((dname = ReadDirName(dir_hnd,&dirpos))) {
3928 if((strcmp(dname, ".") == 0) || (strcmp(dname, "..")==0))
3930 if (!is_visible_file(conn, directory, dname, &st, False))
3933 /* Construct the full name. */
3934 if(strlen(directory) + strlen(dname) + 1 >= sizeof(fullname)) {
3939 pstrcpy(fullname, directory);
3940 pstrcat(fullname, "/");
3941 pstrcat(fullname, dname);
3943 if(SMB_VFS_LSTAT(conn,fullname, &st) != 0)
3945 if(st.st_mode & S_IFDIR) {
3946 if(lp_recursive_veto_delete(SNUM(conn))) {
3947 if(!recursive_rmdir(conn, fullname))
3950 if(SMB_VFS_RMDIR(conn,fullname) != 0)
3952 } else if(SMB_VFS_UNLINK(conn,fullname) != 0)
3956 /* Retry the rmdir */
3957 ok = (SMB_VFS_RMDIR(conn,directory) == 0);
3963 DEBUG(3,("rmdir_internals: couldn't remove directory %s : "
3964 "%s\n", directory,strerror(errno)));
3971 /****************************************************************************
3973 ****************************************************************************/
3975 int reply_rmdir(connection_struct *conn, char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
3980 BOOL bad_path = False;
3981 SMB_STRUCT_STAT sbuf;
3983 START_PROFILE(SMBrmdir);
3985 srvstr_get_path(inbuf, directory, smb_buf(inbuf) + 1, sizeof(directory), 0, STR_TERMINATE, &status);
3986 if (!NT_STATUS_IS_OK(status)) {
3987 END_PROFILE(SMBrmdir);
3988 return ERROR_NT(status);
3991 RESOLVE_DFSPATH(directory, conn, inbuf, outbuf)
3993 unix_convert(directory,conn, NULL,&bad_path,&sbuf);
3995 END_PROFILE(SMBrmdir);
3996 return ERROR_NT(NT_STATUS_OBJECT_PATH_NOT_FOUND);
3999 if (check_name(directory,conn)) {
4000 dptr_closepath(directory,SVAL(inbuf,smb_pid));
4001 ok = rmdir_internals(conn, directory);
4005 END_PROFILE(SMBrmdir);
4006 return UNIXERROR(ERRDOS, ERRbadpath);
4009 outsize = set_message(outbuf,0,0,False);
4011 DEBUG( 3, ( "rmdir %s\n", directory ) );
4013 END_PROFILE(SMBrmdir);
4017 /*******************************************************************
4018 Resolve wildcards in a filename rename.
4019 Note that name is in UNIX charset and thus potentially can be more
4020 than fstring buffer (255 bytes) especially in default UTF-8 case.
4021 Therefore, we use pstring inside and all calls should ensure that
4022 name2 is at least pstring-long (they do already)
4023 ********************************************************************/
4025 static BOOL resolve_wildcards(const char *name1, char *name2)
4027 pstring root1,root2;
4029 char *p,*p2, *pname1, *pname2;
4030 int available_space, actual_space;
4033 pname1 = strrchr_m(name1,'/');
4034 pname2 = strrchr_m(name2,'/');
4036 if (!pname1 || !pname2)
4039 pstrcpy(root1,pname1);
4040 pstrcpy(root2,pname2);
4041 p = strrchr_m(root1,'.');
4048 p = strrchr_m(root2,'.');
4062 } else if (*p2 == '*') {
4078 } else if (*p2 == '*') {
4088 available_space = sizeof(pstring) - PTR_DIFF(pname2, name2);
4091 actual_space = snprintf(pname2, available_space - 1, "%s.%s", root2, ext2);
4092 if (actual_space >= available_space - 1) {
4093 DEBUG(1,("resolve_wildcards: can't fit resolved name into specified buffer (overrun by %d bytes)\n",
4094 actual_space - available_space));
4097 pstrcpy_base(pname2, root2, name2);
4103 /****************************************************************************
4104 Ensure open files have their names updated. Updated to notify other smbd's
4106 ****************************************************************************/
4108 static void rename_open_files(connection_struct *conn, struct share_mode_lock *lck,
4109 SMB_DEV_T dev, SMB_INO_T inode, const char *newname)
4112 BOOL did_rename = False;
4114 for(fsp = file_find_di_first(dev, inode); fsp; fsp = file_find_di_next(fsp)) {
4115 /* fsp_name is a relative path under the fsp. To change this for other
4116 sharepaths we need to manipulate relative paths. */
4117 /* TODO - create the absolute path and manipulate the newname
4118 relative to the sharepath. */
4119 if (fsp->conn != conn) {
4122 DEBUG(10,("rename_open_files: renaming file fnum %d (dev = %x, inode = %.0f) from %s -> %s\n",
4123 fsp->fnum, (unsigned int)fsp->dev, (double)fsp->inode,
4124 fsp->fsp_name, newname ));
4125 string_set(&fsp->fsp_name, newname);
4130 DEBUG(10,("rename_open_files: no open files on dev %x, inode %.0f for %s\n",
4131 (unsigned int)dev, (double)inode, newname ));
4134 /* Send messages to all smbd's (not ourself) that the name has changed. */
4135 rename_share_filename(lck, conn->connectpath, newname);
4138 /****************************************************************************
4139 We need to check if the source path is a parent directory of the destination
4140 (ie. a rename of /foo/bar/baz -> /foo/bar/baz/bibble/bobble. If so we must
4141 refuse the rename with a sharing violation. Under UNIX the above call can
4142 *succeed* if /foo/bar/baz is a symlink to another area in the share. We
4143 probably need to check that the client is a Windows one before disallowing
4144 this as a UNIX client (one with UNIX extensions) can know the source is a
4145 symlink and make this decision intelligently. Found by an excellent bug
4146 report from <AndyLiebman@aol.com>.
4147 ****************************************************************************/
4149 static BOOL rename_path_prefix_equal(const char *src, const char *dest)
4151 const char *psrc = src;
4152 const char *pdst = dest;
4155 if (psrc[0] == '.' && psrc[1] == '/') {
4158 if (pdst[0] == '.' && pdst[1] == '/') {
4161 if ((slen = strlen(psrc)) > strlen(pdst)) {
4164 return ((memcmp(psrc, pdst, slen) == 0) && pdst[slen] == '/');
4167 /****************************************************************************
4168 Rename an open file - given an fsp.
4169 ****************************************************************************/
4171 NTSTATUS rename_internals_fsp(connection_struct *conn, files_struct *fsp, char *newname, uint32 attrs, BOOL replace_if_exists)
4173 SMB_STRUCT_STAT sbuf;
4174 BOOL bad_path = False;
4175 pstring newname_last_component;
4176 NTSTATUS error = NT_STATUS_OK;
4179 struct share_mode_lock *lck = NULL;
4182 rcdest = unix_convert(newname,conn,newname_last_component,&bad_path,&sbuf);
4184 /* Quick check for "." and ".." */
4185 if (!bad_path && newname_last_component[0] == '.') {
4186 if (!newname_last_component[1] || (newname_last_component[1] == '.' && !newname_last_component[2])) {
4187 return NT_STATUS_ACCESS_DENIED;
4190 if (!rcdest && bad_path) {
4191 return NT_STATUS_OBJECT_PATH_NOT_FOUND;
4194 /* Ensure newname contains a '/' */
4195 if(strrchr_m(newname,'/') == 0) {
4198 pstrcpy(tmpstr, "./");
4199 pstrcat(tmpstr, newname);
4200 pstrcpy(newname, tmpstr);
4204 * Check for special case with case preserving and not
4205 * case sensitive. If the old last component differs from the original
4206 * last component only by case, then we should allow
4207 * the rename (user is trying to change the case of the
4211 if((conn->case_sensitive == False) && (conn->case_preserve == True) &&
4212 strequal(newname, fsp->fsp_name)) {
4214 pstring newname_modified_last_component;
4217 * Get the last component of the modified name.
4218 * Note that we guarantee that newname contains a '/'
4221 p = strrchr_m(newname,'/');
4222 pstrcpy(newname_modified_last_component,p+1);
4224 if(strcsequal(newname_modified_last_component,
4225 newname_last_component) == False) {
4227 * Replace the modified last component with
4230 pstrcpy(p+1, newname_last_component);
4235 * If the src and dest names are identical - including case,
4236 * don't do the rename, just return success.
4239 if (strcsequal(fsp->fsp_name, newname)) {
4240 DEBUG(3,("rename_internals_fsp: identical names in rename %s - returning success\n",
4242 return NT_STATUS_OK;
4245 dest_exists = vfs_object_exist(conn,newname,NULL);
4247 if(!replace_if_exists && dest_exists) {
4248 DEBUG(3,("rename_internals_fsp: dest exists doing rename %s -> %s\n",
4249 fsp->fsp_name,newname));
4250 return NT_STATUS_OBJECT_NAME_COLLISION;
4253 error = can_rename(conn,newname,attrs,&sbuf);
4255 if (dest_exists && !NT_STATUS_IS_OK(error)) {
4256 DEBUG(3,("rename_internals: Error %s rename %s -> %s\n",
4257 nt_errstr(error), fsp->fsp_name,newname));
4258 if (NT_STATUS_EQUAL(error,NT_STATUS_SHARING_VIOLATION))
4259 error = NT_STATUS_ACCESS_DENIED;
4263 if (rename_path_prefix_equal(fsp->fsp_name, newname)) {
4264 return NT_STATUS_ACCESS_DENIED;
4267 lck = get_share_mode_lock(NULL, fsp->dev, fsp->inode, NULL, NULL);
4269 if(SMB_VFS_RENAME(conn,fsp->fsp_name, newname) == 0) {
4270 DEBUG(3,("rename_internals_fsp: succeeded doing rename on %s -> %s\n",
4271 fsp->fsp_name,newname));
4272 rename_open_files(conn, lck, fsp->dev, fsp->inode, newname);
4274 return NT_STATUS_OK;
4279 if (errno == ENOTDIR || errno == EISDIR) {
4280 error = NT_STATUS_OBJECT_NAME_COLLISION;
4282 error = map_nt_error_from_unix(errno);
4285 DEBUG(3,("rename_internals_fsp: Error %s rename %s -> %s\n",
4286 nt_errstr(error), fsp->fsp_name,newname));
4291 /****************************************************************************
4292 The guts of the rename command, split out so it may be called by the NT SMB
4294 ****************************************************************************/
4296 NTSTATUS rename_internals(connection_struct *conn, char *name, char *newname, uint32 attrs, BOOL replace_if_exists, BOOL has_wild)
4300 pstring last_component_src;
4301 pstring last_component_dest;
4303 BOOL bad_path_src = False;
4304 BOOL bad_path_dest = False;
4306 NTSTATUS error = NT_STATUS_OK;
4309 SMB_STRUCT_STAT sbuf1, sbuf2;
4310 struct share_mode_lock *lck = NULL;
4312 *directory = *mask = 0;
4317 rc = unix_convert(name,conn,last_component_src,&bad_path_src,&sbuf1);
4318 if (!rc && bad_path_src) {
4319 if (ms_has_wild(last_component_src))
4320 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
4321 return NT_STATUS_OBJECT_PATH_NOT_FOUND;
4324 /* Quick check for "." and ".." */
4325 if (last_component_src[0] == '.') {
4326 if (!last_component_src[1] || (last_component_src[1] == '.' && !last_component_src[2])) {
4327 return NT_STATUS_OBJECT_NAME_INVALID;
4331 rcdest = unix_convert(newname,conn,last_component_dest,&bad_path_dest,&sbuf2);
4333 /* Quick check for "." and ".." */
4334 if (last_component_dest[0] == '.') {
4335 if (!last_component_dest[1] || (last_component_dest[1] == '.' && !last_component_dest[2])) {
4336 return NT_STATUS_OBJECT_NAME_INVALID;
4341 * Split the old name into directory and last component
4342 * strings. Note that unix_convert may have stripped off a
4343 * leading ./ from both name and newname if the rename is
4344 * at the root of the share. We need to make sure either both
4345 * name and newname contain a / character or neither of them do
4346 * as this is checked in resolve_wildcards().
4349 p = strrchr_m(name,'/');
4351 pstrcpy(directory,".");
4355 pstrcpy(directory,name);
4357 *p = '/'; /* Replace needed for exceptional test below. */
4361 * We should only check the mangled cache
4362 * here if unix_convert failed. This means
4363 * that the path in 'mask' doesn't exist
4364 * on the file system and so we need to look
4365 * for a possible mangle. This patch from
4366 * Tine Smukavec <valentin.smukavec@hermes.si>.
4369 if (!rc && mangle_is_mangled(mask, conn->params))
4370 mangle_check_cache( mask, sizeof(pstring)-1, conn->params );
4374 * No wildcards - just process the one file.
4376 BOOL is_short_name = mangle_is_8_3(name, True, conn->params);
4378 /* Add a terminating '/' to the directory name. */
4379 pstrcat(directory,"/");
4380 pstrcat(directory,mask);
4382 /* Ensure newname contains a '/' also */
4383 if(strrchr_m(newname,'/') == 0) {
4386 pstrcpy(tmpstr, "./");
4387 pstrcat(tmpstr, newname);
4388 pstrcpy(newname, tmpstr);
4391 DEBUG(3,("rename_internals: case_sensitive = %d, case_preserve = %d, short case preserve = %d, \
4392 directory = %s, newname = %s, last_component_dest = %s, is_8_3 = %d\n",
4393 conn->case_sensitive, conn->case_preserve, conn->short_case_preserve, directory,
4394 newname, last_component_dest, is_short_name));
4397 * Check for special case with case preserving and not
4398 * case sensitive, if directory and newname are identical,
4399 * and the old last component differs from the original
4400 * last component only by case, then we should allow
4401 * the rename (user is trying to change the case of the
4404 if((conn->case_sensitive == False) &&
4405 (((conn->case_preserve == True) &&
4406 (is_short_name == False)) ||
4407 ((conn->short_case_preserve == True) &&
4408 (is_short_name == True))) &&
4409 strcsequal(directory, newname)) {
4410 pstring modified_last_component;
4413 * Get the last component of the modified name.
4414 * Note that we guarantee that newname contains a '/'
4417 p = strrchr_m(newname,'/');
4418 pstrcpy(modified_last_component,p+1);
4420 if(strcsequal(modified_last_component,
4421 last_component_dest) == False) {
4423 * Replace the modified last component with
4426 pstrcpy(p+1, last_component_dest);
4430 resolve_wildcards(directory,newname);
4433 * The source object must exist.
4436 if (!vfs_object_exist(conn, directory, &sbuf1)) {
4437 DEBUG(3,("rename_internals: source doesn't exist doing rename %s -> %s\n",
4438 directory,newname));
4440 if (errno == ENOTDIR || errno == EISDIR || errno == ENOENT) {
4442 * Must return different errors depending on whether the parent
4443 * directory existed or not.
4446 p = strrchr_m(directory, '/');
4448 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
4450 if (vfs_object_exist(conn, directory, NULL))
4451 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
4452 return NT_STATUS_OBJECT_PATH_NOT_FOUND;
4454 error = map_nt_error_from_unix(errno);
4455 DEBUG(3,("rename_internals: Error %s rename %s -> %s\n",
4456 nt_errstr(error), directory,newname));
4461 if (!rcdest && bad_path_dest) {
4462 if (ms_has_wild(last_component_dest))
4463 return NT_STATUS_OBJECT_NAME_INVALID;
4464 return NT_STATUS_OBJECT_PATH_NOT_FOUND;
4467 error = can_rename(conn,directory,attrs,&sbuf1);
4469 if (!NT_STATUS_IS_OK(error)) {
4470 DEBUG(3,("rename_internals: Error %s rename %s -> %s\n",
4471 nt_errstr(error), directory,newname));
4476 * If the src and dest names are identical - including case,
4477 * don't do the rename, just return success.
4480 if (strcsequal(directory, newname)) {
4481 rename_open_files(conn, NULL, sbuf1.st_dev, sbuf1.st_ino, newname);
4482 DEBUG(3,("rename_internals: identical names in rename %s - returning success\n", directory));
4483 return NT_STATUS_OK;
4486 if(!replace_if_exists && vfs_object_exist(conn,newname,NULL)) {
4487 DEBUG(3,("rename_internals: dest exists doing rename %s -> %s\n",
4488 directory,newname));
4489 return NT_STATUS_OBJECT_NAME_COLLISION;
4492 if (rename_path_prefix_equal(directory, newname)) {
4493 return NT_STATUS_SHARING_VIOLATION;
4496 lck = get_share_mode_lock(NULL, sbuf1.st_dev, sbuf1.st_ino, NULL, NULL);
4498 if(SMB_VFS_RENAME(conn,directory, newname) == 0) {
4499 DEBUG(3,("rename_internals: succeeded doing rename on %s -> %s\n",
4500 directory,newname));
4501 rename_open_files(conn, lck, sbuf1.st_dev, sbuf1.st_ino, newname);
4503 return NT_STATUS_OK;
4507 if (errno == ENOTDIR || errno == EISDIR)
4508 error = NT_STATUS_OBJECT_NAME_COLLISION;
4510 error = map_nt_error_from_unix(errno);
4512 DEBUG(3,("rename_internals: Error %s rename %s -> %s\n",
4513 nt_errstr(error), directory,newname));
4518 * Wildcards - process each file that matches.
4520 struct smb_Dir *dir_hnd = NULL;
4524 if (strequal(mask,"????????.???"))
4527 if (check_name(directory,conn))
4528 dir_hnd = OpenDir(conn, directory, mask, attrs);
4532 error = NT_STATUS_NO_SUCH_FILE;
4533 /* Was error = NT_STATUS_OBJECT_NAME_NOT_FOUND; - gentest fix. JRA */
4535 while ((dname = ReadDirName(dir_hnd, &offset))) {
4537 BOOL sysdir_entry = False;
4539 pstrcpy(fname,dname);
4541 /* Quick check for "." and ".." */
4542 if (fname[0] == '.') {
4543 if (!fname[1] || (fname[1] == '.' && !fname[2])) {
4545 sysdir_entry = True;
4552 if (!is_visible_file(conn, directory, dname, &sbuf1, False))
4555 if(!mask_match(fname, mask, conn->case_sensitive))
4559 error = NT_STATUS_OBJECT_NAME_INVALID;
4563 error = NT_STATUS_ACCESS_DENIED;
4564 slprintf(fname,sizeof(fname)-1,"%s/%s",directory,dname);
4565 if (!vfs_object_exist(conn, fname, &sbuf1)) {
4566 error = NT_STATUS_OBJECT_NAME_NOT_FOUND;
4567 DEBUG(6,("rename %s failed. Error %s\n", fname, nt_errstr(error)));
4570 error = can_rename(conn,fname,attrs,&sbuf1);
4571 if (!NT_STATUS_IS_OK(error)) {
4572 DEBUG(6,("rename %s refused\n", fname));
4575 pstrcpy(destname,newname);
4577 if (!resolve_wildcards(fname,destname)) {
4578 DEBUG(6,("resolve_wildcards %s %s failed\n",
4583 if (strcsequal(fname,destname)) {
4584 rename_open_files(conn, NULL, sbuf1.st_dev, sbuf1.st_ino, newname);
4585 DEBUG(3,("rename_internals: identical names in wildcard rename %s - success\n", fname));
4587 error = NT_STATUS_OK;
4591 if (!replace_if_exists &&
4592 vfs_file_exist(conn,destname, NULL)) {
4593 DEBUG(6,("file_exist %s\n", destname));
4594 error = NT_STATUS_OBJECT_NAME_COLLISION;
4598 if (rename_path_prefix_equal(fname, destname)) {
4599 return NT_STATUS_SHARING_VIOLATION;
4602 lck = get_share_mode_lock(NULL, sbuf1.st_dev, sbuf1.st_ino, NULL, NULL);
4604 if (!SMB_VFS_RENAME(conn,fname,destname)) {
4605 rename_open_files(conn, lck, sbuf1.st_dev, sbuf1.st_ino, newname);
4607 error = NT_STATUS_OK;
4610 DEBUG(3,("rename_internals: doing rename on %s -> %s\n",fname,destname));
4615 if (!NT_STATUS_EQUAL(error,NT_STATUS_NO_SUCH_FILE)) {
4616 if (!rcdest && bad_path_dest) {
4617 if (ms_has_wild(last_component_dest))
4618 return NT_STATUS_OBJECT_NAME_INVALID;
4619 return NT_STATUS_OBJECT_PATH_NOT_FOUND;
4624 if (count == 0 && NT_STATUS_IS_OK(error)) {
4625 error = map_nt_error_from_unix(errno);
4631 /****************************************************************************
4633 ****************************************************************************/
4635 int reply_mv(connection_struct *conn, char *inbuf,char *outbuf, int dum_size,
4642 uint32 attrs = SVAL(inbuf,smb_vwv0);
4644 BOOL path1_contains_wcard = False;
4645 BOOL path2_contains_wcard = False;
4647 START_PROFILE(SMBmv);
4649 p = smb_buf(inbuf) + 1;
4650 p += srvstr_get_path_wcard(inbuf, name, p, sizeof(name), 0, STR_TERMINATE, &status, &path1_contains_wcard);
4651 if (!NT_STATUS_IS_OK(status)) {
4653 return ERROR_NT(status);
4656 p += srvstr_get_path_wcard(inbuf, newname, p, sizeof(newname), 0, STR_TERMINATE, &status, &path2_contains_wcard);
4657 if (!NT_STATUS_IS_OK(status)) {
4659 return ERROR_NT(status);
4662 RESOLVE_DFSPATH_WCARD(name, conn, inbuf, outbuf);
4663 RESOLVE_DFSPATH_WCARD(newname, conn, inbuf, outbuf);
4665 DEBUG(3,("reply_mv : %s -> %s\n",name,newname));
4667 status = rename_internals(conn, name, newname, attrs, False, path1_contains_wcard);
4668 if (!NT_STATUS_IS_OK(status)) {
4670 if (open_was_deferred(SVAL(inbuf,smb_mid))) {
4671 /* We have re-scheduled this call. */
4674 return ERROR_NT(status);
4678 * Win2k needs a changenotify request response before it will
4679 * update after a rename..
4681 process_pending_change_notify_queue((time_t)0);
4682 outsize = set_message(outbuf,0,0,False);
4688 /*******************************************************************
4689 Copy a file as part of a reply_copy.
4690 ******************************************************************/
4693 * TODO: check error codes on all callers
4696 NTSTATUS copy_file(char *src, char *dest1,connection_struct *conn, int ofun,
4697 int count, BOOL target_is_directory)
4699 SMB_STRUCT_STAT src_sbuf, sbuf2;
4701 files_struct *fsp1,*fsp2;
4704 uint32 new_create_disposition;
4708 pstrcpy(dest,dest1);
4709 if (target_is_directory) {
4710 char *p = strrchr_m(src,'/');
4720 if (!vfs_file_exist(conn,src,&src_sbuf)) {
4721 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
4724 if (!target_is_directory && count) {
4725 new_create_disposition = FILE_OPEN;
4727 if (!map_open_params_to_ntcreate(dest1,0,ofun,
4728 NULL, NULL, &new_create_disposition, NULL)) {
4729 return NT_STATUS_INVALID_PARAMETER;
4733 status = open_file_ntcreate(conn,src,&src_sbuf,
4735 FILE_SHARE_READ|FILE_SHARE_WRITE,
4738 FILE_ATTRIBUTE_NORMAL,
4742 if (!NT_STATUS_IS_OK(status)) {
4746 dosattrs = dos_mode(conn, src, &src_sbuf);
4747 if (SMB_VFS_STAT(conn,dest,&sbuf2) == -1) {
4748 ZERO_STRUCTP(&sbuf2);
4751 status = open_file_ntcreate(conn,dest,&sbuf2,
4753 FILE_SHARE_READ|FILE_SHARE_WRITE,
4754 new_create_disposition,
4760 if (!NT_STATUS_IS_OK(status)) {
4761 close_file(fsp1,ERROR_CLOSE);
4765 if ((ofun&3) == 1) {
4766 if(SMB_VFS_LSEEK(fsp2,fsp2->fh->fd,0,SEEK_END) == -1) {
4767 DEBUG(0,("copy_file: error - vfs lseek returned error %s\n", strerror(errno) ));
4769 * Stop the copy from occurring.
4772 src_sbuf.st_size = 0;
4776 if (src_sbuf.st_size) {
4777 ret = vfs_transfer_file(fsp1, fsp2, src_sbuf.st_size);
4780 close_file(fsp1,NORMAL_CLOSE);
4782 /* Ensure the modtime is set correctly on the destination file. */
4783 fsp_set_pending_modtime( fsp2, src_sbuf.st_mtime);
4786 * As we are opening fsp1 read-only we only expect
4787 * an error on close on fsp2 if we are out of space.
4788 * Thus we don't look at the error return from the
4791 close_err = close_file(fsp2,NORMAL_CLOSE);
4793 if (close_err != 0) {
4794 return map_nt_error_from_unix(close_err);
4797 if (ret != (SMB_OFF_T)src_sbuf.st_size) {
4798 return NT_STATUS_DISK_FULL;
4801 return NT_STATUS_OK;
4804 /****************************************************************************
4805 Reply to a file copy.
4806 ****************************************************************************/
4808 int reply_copy(connection_struct *conn, char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
4813 pstring mask,newname;
4816 int error = ERRnoaccess;
4820 int tid2 = SVAL(inbuf,smb_vwv0);
4821 int ofun = SVAL(inbuf,smb_vwv1);
4822 int flags = SVAL(inbuf,smb_vwv2);
4823 BOOL target_is_directory=False;
4824 BOOL bad_path1 = False;
4825 BOOL bad_path2 = False;
4826 BOOL path_contains_wcard1 = False;
4827 BOOL path_contains_wcard2 = False;
4829 SMB_STRUCT_STAT sbuf1, sbuf2;
4831 START_PROFILE(SMBcopy);
4833 *directory = *mask = 0;
4836 p += srvstr_get_path_wcard(inbuf, name, p, sizeof(name), 0, STR_TERMINATE, &status, &path_contains_wcard1);
4837 if (!NT_STATUS_IS_OK(status)) {
4838 END_PROFILE(SMBcopy);
4839 return ERROR_NT(status);
4841 p += srvstr_get_path_wcard(inbuf, newname, p, sizeof(newname), 0, STR_TERMINATE, &status, &path_contains_wcard2);
4842 if (!NT_STATUS_IS_OK(status)) {
4843 END_PROFILE(SMBcopy);
4844 return ERROR_NT(status);
4847 DEBUG(3,("reply_copy : %s -> %s\n",name,newname));
4849 if (tid2 != conn->cnum) {
4850 /* can't currently handle inter share copies XXXX */
4851 DEBUG(3,("Rejecting inter-share copy\n"));
4852 END_PROFILE(SMBcopy);
4853 return ERROR_DOS(ERRSRV,ERRinvdevice);
4856 RESOLVE_DFSPATH_WCARD(name, conn, inbuf, outbuf);
4857 RESOLVE_DFSPATH_WCARD(newname, conn, inbuf, outbuf);
4859 rc = unix_convert(name,conn,0,&bad_path1,&sbuf1);
4860 unix_convert(newname,conn,0,&bad_path2,&sbuf2);
4862 target_is_directory = VALID_STAT_OF_DIR(sbuf2);
4864 if ((flags&1) && target_is_directory) {
4865 END_PROFILE(SMBcopy);
4866 return ERROR_DOS(ERRDOS,ERRbadfile);
4869 if ((flags&2) && !target_is_directory) {
4870 END_PROFILE(SMBcopy);
4871 return ERROR_DOS(ERRDOS,ERRbadpath);
4874 if ((flags&(1<<5)) && VALID_STAT_OF_DIR(sbuf1)) {
4875 /* wants a tree copy! XXXX */
4876 DEBUG(3,("Rejecting tree copy\n"));
4877 END_PROFILE(SMBcopy);
4878 return ERROR_DOS(ERRSRV,ERRerror);
4881 p = strrchr_m(name,'/');
4883 pstrcpy(directory,"./");
4887 pstrcpy(directory,name);
4892 * We should only check the mangled cache
4893 * here if unix_convert failed. This means
4894 * that the path in 'mask' doesn't exist
4895 * on the file system and so we need to look
4896 * for a possible mangle. This patch from
4897 * Tine Smukavec <valentin.smukavec@hermes.si>.
4900 if (!rc && mangle_is_mangled(mask, conn->params))
4901 mangle_check_cache( mask, sizeof(pstring)-1, conn->params );
4903 has_wild = path_contains_wcard1;
4906 pstrcat(directory,"/");
4907 pstrcat(directory,mask);
4908 if (resolve_wildcards(directory,newname)
4909 && NT_STATUS_IS_OK(status = copy_file(
4910 directory,newname,conn,ofun,
4911 count,target_is_directory)))
4913 if(!count && !NT_STATUS_IS_OK(status)) {
4914 END_PROFILE(SMBcopy);
4915 return ERROR_NT(status);
4918 exists = vfs_file_exist(conn,directory,NULL);
4921 struct smb_Dir *dir_hnd = NULL;
4925 if (strequal(mask,"????????.???"))
4928 if (check_name(directory,conn))
4929 dir_hnd = OpenDir(conn, directory, mask, 0);
4935 while ((dname = ReadDirName(dir_hnd, &offset))) {
4937 pstrcpy(fname,dname);
4939 if (!is_visible_file(conn, directory, dname, &sbuf1, False))
4942 if(!mask_match(fname, mask, conn->case_sensitive))
4945 error = ERRnoaccess;
4946 slprintf(fname,sizeof(fname)-1, "%s/%s",directory,dname);
4947 pstrcpy(destname,newname);
4948 if (resolve_wildcards(fname,destname)
4949 && NT_STATUS_IS_OK(status = copy_file(
4950 fname,destname,conn,ofun,
4951 count,target_is_directory)))
4953 DEBUG(3,("reply_copy : doing copy on %s -> %s\n",fname,destname));
4961 /* Error on close... */
4963 END_PROFILE(SMBcopy);
4964 return(UNIXERROR(ERRHRD,ERRgeneral));
4968 END_PROFILE(SMBcopy);
4969 return ERROR_DOS(ERRDOS,error);
4971 if((errno == ENOENT) && (bad_path1 || bad_path2) &&
4973 /* Samba 3.0.22 has ERRDOS/ERRbadpath in the
4974 * DOS error code case
4976 return ERROR_DOS(ERRDOS, ERRbadpath);
4978 END_PROFILE(SMBcopy);
4979 return(UNIXERROR(ERRDOS,error));
4983 outsize = set_message(outbuf,1,0,True);
4984 SSVAL(outbuf,smb_vwv0,count);
4986 END_PROFILE(SMBcopy);
4990 /****************************************************************************
4992 ****************************************************************************/
4994 int reply_setdir(connection_struct *conn, char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
5002 START_PROFILE(pathworks_setdir);
5005 if (!CAN_SETDIR(snum)) {
5006 END_PROFILE(pathworks_setdir);
5007 return ERROR_DOS(ERRDOS,ERRnoaccess);
5010 srvstr_get_path(inbuf, newdir, smb_buf(inbuf) + 1, sizeof(newdir), 0, STR_TERMINATE, &status);
5011 if (!NT_STATUS_IS_OK(status)) {
5012 END_PROFILE(pathworks_setdir);
5013 return ERROR_NT(status);
5016 RESOLVE_DFSPATH(newdir, conn, inbuf, outbuf);
5018 if (strlen(newdir) == 0) {
5021 ok = vfs_directory_exist(conn,newdir,NULL);
5023 set_conn_connectpath(conn,newdir);
5027 END_PROFILE(pathworks_setdir);
5028 return ERROR_DOS(ERRDOS,ERRbadpath);
5031 outsize = set_message(outbuf,0,0,False);
5032 SCVAL(outbuf,smb_reh,CVAL(inbuf,smb_reh));
5034 DEBUG(3,("setdir %s\n", newdir));
5036 END_PROFILE(pathworks_setdir);
5041 #define DBGC_CLASS DBGC_LOCKING
5043 /****************************************************************************
5044 Get a lock pid, dealing with large count requests.
5045 ****************************************************************************/
5047 uint32 get_lock_pid( char *data, int data_offset, BOOL large_file_format)
5049 if(!large_file_format)
5050 return (uint32)SVAL(data,SMB_LPID_OFFSET(data_offset));
5052 return (uint32)SVAL(data,SMB_LARGE_LPID_OFFSET(data_offset));
5055 /****************************************************************************
5056 Get a lock count, dealing with large count requests.
5057 ****************************************************************************/
5059 SMB_BIG_UINT get_lock_count( char *data, int data_offset, BOOL large_file_format)
5061 SMB_BIG_UINT count = 0;
5063 if(!large_file_format) {
5064 count = (SMB_BIG_UINT)IVAL(data,SMB_LKLEN_OFFSET(data_offset));
5067 #if defined(HAVE_LONGLONG)
5068 count = (((SMB_BIG_UINT) IVAL(data,SMB_LARGE_LKLEN_OFFSET_HIGH(data_offset))) << 32) |
5069 ((SMB_BIG_UINT) IVAL(data,SMB_LARGE_LKLEN_OFFSET_LOW(data_offset)));
5070 #else /* HAVE_LONGLONG */
5073 * NT4.x seems to be broken in that it sends large file (64 bit)
5074 * lockingX calls even if the CAP_LARGE_FILES was *not*
5075 * negotiated. For boxes without large unsigned ints truncate the
5076 * lock count by dropping the top 32 bits.
5079 if(IVAL(data,SMB_LARGE_LKLEN_OFFSET_HIGH(data_offset)) != 0) {
5080 DEBUG(3,("get_lock_count: truncating lock count (high)0x%x (low)0x%x to just low count.\n",
5081 (unsigned int)IVAL(data,SMB_LARGE_LKLEN_OFFSET_HIGH(data_offset)),
5082 (unsigned int)IVAL(data,SMB_LARGE_LKLEN_OFFSET_LOW(data_offset)) ));
5083 SIVAL(data,SMB_LARGE_LKLEN_OFFSET_HIGH(data_offset),0);
5086 count = (SMB_BIG_UINT)IVAL(data,SMB_LARGE_LKLEN_OFFSET_LOW(data_offset));
5087 #endif /* HAVE_LONGLONG */
5093 #if !defined(HAVE_LONGLONG)
5094 /****************************************************************************
5095 Pathetically try and map a 64 bit lock offset into 31 bits. I hate Windows :-).
5096 ****************************************************************************/
5098 static uint32 map_lock_offset(uint32 high, uint32 low)
5102 uint32 highcopy = high;
5105 * Try and find out how many significant bits there are in high.
5108 for(i = 0; highcopy; i++)
5112 * We use 31 bits not 32 here as POSIX
5113 * lock offsets may not be negative.
5116 mask = (~0) << (31 - i);
5119 return 0; /* Fail. */
5125 #endif /* !defined(HAVE_LONGLONG) */
5127 /****************************************************************************
5128 Get a lock offset, dealing with large offset requests.
5129 ****************************************************************************/
5131 SMB_BIG_UINT get_lock_offset( char *data, int data_offset, BOOL large_file_format, BOOL *err)
5133 SMB_BIG_UINT offset = 0;
5137 if(!large_file_format) {
5138 offset = (SMB_BIG_UINT)IVAL(data,SMB_LKOFF_OFFSET(data_offset));
5141 #if defined(HAVE_LONGLONG)
5142 offset = (((SMB_BIG_UINT) IVAL(data,SMB_LARGE_LKOFF_OFFSET_HIGH(data_offset))) << 32) |
5143 ((SMB_BIG_UINT) IVAL(data,SMB_LARGE_LKOFF_OFFSET_LOW(data_offset)));
5144 #else /* HAVE_LONGLONG */
5147 * NT4.x seems to be broken in that it sends large file (64 bit)
5148 * lockingX calls even if the CAP_LARGE_FILES was *not*
5149 * negotiated. For boxes without large unsigned ints mangle the
5150 * lock offset by mapping the top 32 bits onto the lower 32.
5153 if(IVAL(data,SMB_LARGE_LKOFF_OFFSET_HIGH(data_offset)) != 0) {
5154 uint32 low = IVAL(data,SMB_LARGE_LKOFF_OFFSET_LOW(data_offset));
5155 uint32 high = IVAL(data,SMB_LARGE_LKOFF_OFFSET_HIGH(data_offset));
5158 if((new_low = map_lock_offset(high, low)) == 0) {
5160 return (SMB_BIG_UINT)-1;
5163 DEBUG(3,("get_lock_offset: truncating lock offset (high)0x%x (low)0x%x to offset 0x%x.\n",
5164 (unsigned int)high, (unsigned int)low, (unsigned int)new_low ));
5165 SIVAL(data,SMB_LARGE_LKOFF_OFFSET_HIGH(data_offset),0);
5166 SIVAL(data,SMB_LARGE_LKOFF_OFFSET_LOW(data_offset),new_low);
5169 offset = (SMB_BIG_UINT)IVAL(data,SMB_LARGE_LKOFF_OFFSET_LOW(data_offset));
5170 #endif /* HAVE_LONGLONG */
5176 /****************************************************************************
5177 Reply to a lockingX request.
5178 ****************************************************************************/
5180 int reply_lockingX(connection_struct *conn, char *inbuf, char *outbuf,
5181 int length, int bufsize)
5183 files_struct *fsp = file_fsp(inbuf,smb_vwv2);
5184 unsigned char locktype = CVAL(inbuf,smb_vwv3);
5185 unsigned char oplocklevel = CVAL(inbuf,smb_vwv3+1);
5186 uint16 num_ulocks = SVAL(inbuf,smb_vwv6);
5187 uint16 num_locks = SVAL(inbuf,smb_vwv7);
5188 SMB_BIG_UINT count = 0, offset = 0;
5190 int32 lock_timeout = IVAL(inbuf,smb_vwv4);
5193 BOOL large_file_format =
5194 (locktype & LOCKING_ANDX_LARGE_FILES)?True:False;
5196 NTSTATUS status = NT_STATUS_UNSUCCESSFUL;
5198 START_PROFILE(SMBlockingX);
5200 CHECK_FSP(fsp,conn);
5202 data = smb_buf(inbuf);
5204 if (locktype & LOCKING_ANDX_CHANGE_LOCKTYPE) {
5205 /* we don't support these - and CANCEL_LOCK makes w2k
5206 and XP reboot so I don't really want to be
5207 compatible! (tridge) */
5208 return ERROR_NT(NT_STATUS_DOS(ERRDOS, ERRnoatomiclocks));
5211 /* Check if this is an oplock break on a file
5212 we have granted an oplock on.
5214 if ((locktype & LOCKING_ANDX_OPLOCK_RELEASE)) {
5215 /* Client can insist on breaking to none. */
5216 BOOL break_to_none = (oplocklevel == 0);
5219 DEBUG(5,("reply_lockingX: oplock break reply (%u) from client "
5220 "for fnum = %d\n", (unsigned int)oplocklevel,
5224 * Make sure we have granted an exclusive or batch oplock on
5228 if (fsp->oplock_type == 0) {
5230 /* The Samba4 nbench simulator doesn't understand
5231 the difference between break to level2 and break
5232 to none from level2 - it sends oplock break
5233 replies in both cases. Don't keep logging an error
5234 message here - just ignore it. JRA. */
5236 DEBUG(5,("reply_lockingX: Error : oplock break from "
5237 "client for fnum = %d (oplock=%d) and no "
5238 "oplock granted on this file (%s).\n",
5239 fsp->fnum, fsp->oplock_type, fsp->fsp_name));
5241 /* if this is a pure oplock break request then don't
5243 if (num_locks == 0 && num_ulocks == 0) {
5244 END_PROFILE(SMBlockingX);
5247 END_PROFILE(SMBlockingX);
5248 return ERROR_DOS(ERRDOS,ERRlock);
5252 if ((fsp->sent_oplock_break == BREAK_TO_NONE_SENT) ||
5254 result = remove_oplock(fsp);
5256 result = downgrade_oplock(fsp);
5260 DEBUG(0, ("reply_lockingX: error in removing "
5261 "oplock on file %s\n", fsp->fsp_name));
5262 /* Hmmm. Is this panic justified? */
5263 smb_panic("internal tdb error");
5266 reply_to_oplock_break_requests(fsp);
5268 /* if this is a pure oplock break request then don't send a
5270 if (num_locks == 0 && num_ulocks == 0) {
5271 /* Sanity check - ensure a pure oplock break is not a
5273 if(CVAL(inbuf,smb_vwv0) != 0xff)
5274 DEBUG(0,("reply_lockingX: Error : pure oplock "
5275 "break is a chained %d request !\n",
5276 (unsigned int)CVAL(inbuf,smb_vwv0) ));
5277 END_PROFILE(SMBlockingX);
5283 * We do this check *after* we have checked this is not a oplock break
5284 * response message. JRA.
5287 release_level_2_oplocks_on_change(fsp);
5289 /* Data now points at the beginning of the list
5290 of smb_unlkrng structs */
5291 for(i = 0; i < (int)num_ulocks; i++) {
5292 lock_pid = get_lock_pid( data, i, large_file_format);
5293 count = get_lock_count( data, i, large_file_format);
5294 offset = get_lock_offset( data, i, large_file_format, &err);
5297 * There is no error code marked "stupid client bug".... :-).
5300 END_PROFILE(SMBlockingX);
5301 return ERROR_DOS(ERRDOS,ERRnoaccess);
5304 DEBUG(10,("reply_lockingX: unlock start=%.0f, len=%.0f for "
5305 "pid %u, file %s\n", (double)offset, (double)count,
5306 (unsigned int)lock_pid, fsp->fsp_name ));
5308 status = do_unlock(fsp,
5314 if (NT_STATUS_V(status)) {
5315 END_PROFILE(SMBlockingX);
5316 return ERROR_NT(status);
5320 /* Setup the timeout in seconds. */
5322 if (!lp_blocking_locks(SNUM(conn))) {
5326 /* Now do any requested locks */
5327 data += ((large_file_format ? 20 : 10)*num_ulocks);
5329 /* Data now points at the beginning of the list
5330 of smb_lkrng structs */
5332 for(i = 0; i < (int)num_locks; i++) {
5333 enum brl_type lock_type = ((locktype & LOCKING_ANDX_SHARED_LOCK) ?
5334 READ_LOCK:WRITE_LOCK);
5335 lock_pid = get_lock_pid( data, i, large_file_format);
5336 count = get_lock_count( data, i, large_file_format);
5337 offset = get_lock_offset( data, i, large_file_format, &err);
5340 * There is no error code marked "stupid client bug".... :-).
5343 END_PROFILE(SMBlockingX);
5344 return ERROR_DOS(ERRDOS,ERRnoaccess);
5347 DEBUG(10,("reply_lockingX: lock start=%.0f, len=%.0f for pid "
5348 "%u, file %s timeout = %d\n", (double)offset,
5349 (double)count, (unsigned int)lock_pid,
5350 fsp->fsp_name, (int)lock_timeout ));
5352 if (locktype & LOCKING_ANDX_CANCEL_LOCK) {
5353 if (lp_blocking_locks(SNUM(conn))) {
5355 /* Schedule a message to ourselves to
5356 remove the blocking lock record and
5357 return the right error. */
5359 if (!blocking_lock_cancel(fsp,
5365 NT_STATUS_FILE_LOCK_CONFLICT)) {
5366 END_PROFILE(SMBlockingX);
5367 return ERROR_NT(NT_STATUS_DOS(ERRDOS, ERRcancelviolation));
5370 /* Remove a matching pending lock. */
5371 status = do_lock_cancel(fsp,
5377 BOOL blocking_lock = lock_timeout ? True : False;
5378 BOOL defer_lock = False;
5379 struct byte_range_lock *br_lck;
5381 br_lck = do_lock(fsp,
5390 if (br_lck && blocking_lock && ERROR_WAS_LOCK_DENIED(status)) {
5391 /* Windows internal resolution for blocking locks seems
5392 to be about 200ms... Don't wait for less than that. JRA. */
5393 if (lock_timeout != -1 && lock_timeout < lp_lock_spin_time()) {
5394 lock_timeout = lp_lock_spin_time();
5399 /* This heuristic seems to match W2K3 very well. If a
5400 lock sent with timeout of zero would fail with NT_STATUS_FILE_LOCK_CONFLICT
5401 it pretends we asked for a timeout of between 150 - 300 milliseconds as
5402 far as I can tell. Replacement for do_lock_spin(). JRA. */
5404 if (br_lck && lp_blocking_locks(SNUM(conn)) && !blocking_lock &&
5405 NT_STATUS_EQUAL((status), NT_STATUS_FILE_LOCK_CONFLICT)) {
5407 lock_timeout = lp_lock_spin_time();
5410 if (br_lck && defer_lock) {
5412 * A blocking lock was requested. Package up
5413 * this smb into a queued request and push it
5414 * onto the blocking lock queue.
5416 if(push_blocking_lock_request(br_lck,
5426 TALLOC_FREE(br_lck);
5427 END_PROFILE(SMBlockingX);
5432 TALLOC_FREE(br_lck);
5435 if (NT_STATUS_V(status)) {
5436 END_PROFILE(SMBlockingX);
5437 return ERROR_NT(status);
5441 /* If any of the above locks failed, then we must unlock
5442 all of the previous locks (X/Open spec). */
5444 if (!(locktype & LOCKING_ANDX_CANCEL_LOCK) &&
5448 * Ensure we don't do a remove on the lock that just failed,
5449 * as under POSIX rules, if we have a lock already there, we
5450 * will delete it (and we shouldn't) .....
5452 for(i--; i >= 0; i--) {
5453 lock_pid = get_lock_pid( data, i, large_file_format);
5454 count = get_lock_count( data, i, large_file_format);
5455 offset = get_lock_offset( data, i, large_file_format,
5459 * There is no error code marked "stupid client
5463 END_PROFILE(SMBlockingX);
5464 return ERROR_DOS(ERRDOS,ERRnoaccess);
5473 END_PROFILE(SMBlockingX);
5474 return ERROR_NT(status);
5477 set_message(outbuf,2,0,True);
5479 DEBUG(3, ("lockingX fnum=%d type=%d num_locks=%d num_ulocks=%d\n",
5480 fsp->fnum, (unsigned int)locktype, num_locks, num_ulocks));
5482 END_PROFILE(SMBlockingX);
5483 return chain_reply(inbuf,outbuf,length,bufsize);
5487 #define DBGC_CLASS DBGC_ALL
5489 /****************************************************************************
5490 Reply to a SMBreadbmpx (read block multiplex) request.
5491 ****************************************************************************/
5493 int reply_readbmpx(connection_struct *conn, char *inbuf,char *outbuf,int length,int bufsize)
5504 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
5505 START_PROFILE(SMBreadBmpx);
5507 /* this function doesn't seem to work - disable by default */
5508 if (!lp_readbmpx()) {
5509 END_PROFILE(SMBreadBmpx);
5510 return ERROR_DOS(ERRSRV,ERRuseSTD);
5513 outsize = set_message(outbuf,8,0,True);
5515 CHECK_FSP(fsp,conn);
5516 if (!CHECK_READ(fsp,inbuf)) {
5517 return(ERROR_DOS(ERRDOS,ERRbadaccess));
5520 startpos = IVAL_TO_SMB_OFF_T(inbuf,smb_vwv1);
5521 maxcount = SVAL(inbuf,smb_vwv3);
5523 data = smb_buf(outbuf);
5524 pad = ((long)data)%4;
5529 max_per_packet = bufsize-(outsize+pad);
5533 if (is_locked(fsp,(uint32)SVAL(inbuf,smb_pid),(SMB_BIG_UINT)maxcount,(SMB_BIG_UINT)startpos, READ_LOCK)) {
5534 END_PROFILE(SMBreadBmpx);
5535 return ERROR_DOS(ERRDOS,ERRlock);
5539 size_t N = MIN(max_per_packet,tcount-total_read);
5541 nread = read_file(fsp,data,startpos,N);
5546 if (nread < (ssize_t)N)
5547 tcount = total_read + nread;
5549 set_message(outbuf,8,nread+pad,False);
5550 SIVAL(outbuf,smb_vwv0,startpos);
5551 SSVAL(outbuf,smb_vwv2,tcount);
5552 SSVAL(outbuf,smb_vwv6,nread);
5553 SSVAL(outbuf,smb_vwv7,smb_offset(data,outbuf));
5556 if (!send_smb(smbd_server_fd(),outbuf))
5557 exit_server_cleanly("reply_readbmpx: send_smb failed.");
5559 total_read += nread;
5561 } while (total_read < (ssize_t)tcount);
5563 END_PROFILE(SMBreadBmpx);
5567 /****************************************************************************
5568 Reply to a SMBsetattrE.
5569 ****************************************************************************/
5571 int reply_setattrE(connection_struct *conn, char *inbuf,char *outbuf, int size, int dum_buffsize)
5573 struct utimbuf unix_times;
5575 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
5576 START_PROFILE(SMBsetattrE);
5578 outsize = set_message(outbuf,0,0,False);
5580 if(!fsp || (fsp->conn != conn)) {
5581 END_PROFILE(SMBsetattrE);
5582 return ERROR_DOS(ERRDOS,ERRbadfid);
5586 * Convert the DOS times into unix times. Ignore create
5587 * time as UNIX can't set this.
5590 unix_times.actime = srv_make_unix_date2(inbuf+smb_vwv3);
5591 unix_times.modtime = srv_make_unix_date2(inbuf+smb_vwv5);
5594 * Patch from Ray Frush <frush@engr.colostate.edu>
5595 * Sometimes times are sent as zero - ignore them.
5598 if (null_mtime(unix_times.actime) && null_mtime(unix_times.modtime)) {
5599 /* Ignore request */
5600 if( DEBUGLVL( 3 ) ) {
5601 dbgtext( "reply_setattrE fnum=%d ", fsp->fnum);
5602 dbgtext( "ignoring zero request - not setting timestamps of 0\n" );
5604 END_PROFILE(SMBsetattrE);
5606 } else if (!null_mtime(unix_times.actime) && null_mtime(unix_times.modtime)) {
5607 /* set modify time = to access time if modify time was unset */
5608 unix_times.modtime = unix_times.actime;
5611 /* Set the date on this file */
5612 /* Should we set pending modtime here ? JRA */
5613 if(file_utime(conn, fsp->fsp_name, &unix_times)) {
5614 END_PROFILE(SMBsetattrE);
5615 return ERROR_DOS(ERRDOS,ERRnoaccess);
5618 DEBUG( 3, ( "reply_setattrE fnum=%d actime=%d modtime=%d\n",
5619 fsp->fnum, (int)unix_times.actime, (int)unix_times.modtime ) );
5621 END_PROFILE(SMBsetattrE);
5626 /* Back from the dead for OS/2..... JRA. */
5628 /****************************************************************************
5629 Reply to a SMBwritebmpx (write block multiplex primary) request.
5630 ****************************************************************************/
5632 int reply_writebmpx(connection_struct *conn, char *inbuf,char *outbuf, int size, int dum_buffsize)
5635 ssize_t nwritten = -1;
5642 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
5643 START_PROFILE(SMBwriteBmpx);
5645 CHECK_FSP(fsp,conn);
5646 if (!CHECK_WRITE(fsp)) {
5647 return(ERROR_DOS(ERRDOS,ERRbadaccess));
5649 if (HAS_CACHED_ERROR(fsp)) {
5650 return(CACHED_ERROR(fsp));
5653 tcount = SVAL(inbuf,smb_vwv1);
5654 startpos = IVAL_TO_SMB_OFF_T(inbuf,smb_vwv3);
5655 write_through = BITSETW(inbuf+smb_vwv7,0);
5656 numtowrite = SVAL(inbuf,smb_vwv10);
5657 smb_doff = SVAL(inbuf,smb_vwv11);
5659 data = smb_base(inbuf) + smb_doff;
5661 /* If this fails we need to send an SMBwriteC response,
5662 not an SMBwritebmpx - set this up now so we don't forget */
5663 SCVAL(outbuf,smb_com,SMBwritec);
5665 if (is_locked(fsp,(uint32)SVAL(inbuf,smb_pid),(SMB_BIG_UINT)tcount,(SMB_BIG_UINT)startpos,WRITE_LOCK)) {
5666 END_PROFILE(SMBwriteBmpx);
5667 return(ERROR_DOS(ERRDOS,ERRlock));
5670 nwritten = write_file(fsp,data,startpos,numtowrite);
5672 sync_file(conn, fsp, write_through);
5674 if(nwritten < (ssize_t)numtowrite) {
5675 END_PROFILE(SMBwriteBmpx);
5676 return(UNIXERROR(ERRHRD,ERRdiskfull));
5679 /* If the maximum to be written to this file
5680 is greater than what we just wrote then set
5681 up a secondary struct to be attached to this
5682 fd, we will use this to cache error messages etc. */
5684 if((ssize_t)tcount > nwritten) {
5685 write_bmpx_struct *wbms;
5686 if(fsp->wbmpx_ptr != NULL)
5687 wbms = fsp->wbmpx_ptr; /* Use an existing struct */
5689 wbms = SMB_MALLOC_P(write_bmpx_struct);
5691 DEBUG(0,("Out of memory in reply_readmpx\n"));
5692 END_PROFILE(SMBwriteBmpx);
5693 return(ERROR_DOS(ERRSRV,ERRnoresource));
5695 wbms->wr_mode = write_through;
5696 wbms->wr_discard = False; /* No errors yet */
5697 wbms->wr_total_written = nwritten;
5698 wbms->wr_errclass = 0;
5700 fsp->wbmpx_ptr = wbms;
5703 /* We are returning successfully, set the message type back to
5705 SCVAL(outbuf,smb_com,SMBwriteBmpx);
5707 outsize = set_message(outbuf,1,0,True);
5709 SSVALS(outbuf,smb_vwv0,-1); /* We don't support smb_remaining */
5711 DEBUG( 3, ( "writebmpx fnum=%d num=%d wrote=%d\n",
5712 fsp->fnum, (int)numtowrite, (int)nwritten ) );
5714 if (write_through && tcount==nwritten) {
5715 /* We need to send both a primary and a secondary response */
5716 smb_setlen(outbuf,outsize - 4);
5718 if (!send_smb(smbd_server_fd(),outbuf))
5719 exit_server_cleanly("reply_writebmpx: send_smb failed.");
5721 /* Now the secondary */
5722 outsize = set_message(outbuf,1,0,True);
5723 SCVAL(outbuf,smb_com,SMBwritec);
5724 SSVAL(outbuf,smb_vwv0,nwritten);
5727 END_PROFILE(SMBwriteBmpx);
5731 /****************************************************************************
5732 Reply to a SMBwritebs (write block multiplex secondary) request.
5733 ****************************************************************************/
5735 int reply_writebs(connection_struct *conn, char *inbuf,char *outbuf, int dum_size, int dum_buffsize)
5738 ssize_t nwritten = -1;
5745 write_bmpx_struct *wbms;
5746 BOOL send_response = False;
5747 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
5748 START_PROFILE(SMBwriteBs);
5750 CHECK_FSP(fsp,conn);
5751 if (!CHECK_WRITE(fsp)) {
5752 return(ERROR_DOS(ERRDOS,ERRbadaccess));
5755 tcount = SVAL(inbuf,smb_vwv1);
5756 startpos = IVAL_TO_SMB_OFF_T(inbuf,smb_vwv2);
5757 numtowrite = SVAL(inbuf,smb_vwv6);
5758 smb_doff = SVAL(inbuf,smb_vwv7);
5760 data = smb_base(inbuf) + smb_doff;
5762 /* We need to send an SMBwriteC response, not an SMBwritebs */
5763 SCVAL(outbuf,smb_com,SMBwritec);
5765 /* This fd should have an auxiliary struct attached,
5766 check that it does */
5767 wbms = fsp->wbmpx_ptr;
5769 END_PROFILE(SMBwriteBs);
5773 /* If write through is set we can return errors, else we must cache them */
5774 write_through = wbms->wr_mode;
5776 /* Check for an earlier error */
5777 if(wbms->wr_discard) {
5778 END_PROFILE(SMBwriteBs);
5779 return -1; /* Just discard the packet */
5782 nwritten = write_file(fsp,data,startpos,numtowrite);
5784 sync_file(conn, fsp, write_through);
5786 if (nwritten < (ssize_t)numtowrite) {
5788 /* We are returning an error - we can delete the aux struct */
5791 fsp->wbmpx_ptr = NULL;
5792 END_PROFILE(SMBwriteBs);
5793 return(ERROR_DOS(ERRHRD,ERRdiskfull));
5795 wbms->wr_errclass = ERRHRD;
5796 wbms->wr_error = ERRdiskfull;
5797 wbms->wr_status = NT_STATUS_DISK_FULL;
5798 wbms->wr_discard = True;
5799 END_PROFILE(SMBwriteBs);
5803 /* Increment the total written, if this matches tcount
5804 we can discard the auxiliary struct (hurrah !) and return a writeC */
5805 wbms->wr_total_written += nwritten;
5806 if(wbms->wr_total_written >= tcount) {
5807 if (write_through) {
5808 outsize = set_message(outbuf,1,0,True);
5809 SSVAL(outbuf,smb_vwv0,wbms->wr_total_written);
5810 send_response = True;
5814 fsp->wbmpx_ptr = NULL;
5818 END_PROFILE(SMBwriteBs);
5822 END_PROFILE(SMBwriteBs);
5826 /****************************************************************************
5827 Reply to a SMBgetattrE.
5828 ****************************************************************************/
5830 int reply_getattrE(connection_struct *conn, char *inbuf,char *outbuf, int size, int dum_buffsize)
5832 SMB_STRUCT_STAT sbuf;
5835 files_struct *fsp = file_fsp(inbuf,smb_vwv0);
5836 START_PROFILE(SMBgetattrE);
5838 outsize = set_message(outbuf,11,0,True);
5840 if(!fsp || (fsp->conn != conn)) {
5841 END_PROFILE(SMBgetattrE);
5842 return ERROR_DOS(ERRDOS,ERRbadfid);
5845 /* Do an fstat on this file */
5846 if(fsp_stat(fsp, &sbuf)) {
5847 END_PROFILE(SMBgetattrE);
5848 return(UNIXERROR(ERRDOS,ERRnoaccess));
5851 mode = dos_mode(conn,fsp->fsp_name,&sbuf);
5854 * Convert the times into dos times. Set create
5855 * date to be last modify date as UNIX doesn't save
5859 srv_put_dos_date2(outbuf,smb_vwv0,get_create_time(&sbuf,lp_fake_dir_create_times(SNUM(conn))));
5860 srv_put_dos_date2(outbuf,smb_vwv2,sbuf.st_atime);
5861 /* Should we check pending modtime here ? JRA */
5862 srv_put_dos_date2(outbuf,smb_vwv4,sbuf.st_mtime);
5865 SIVAL(outbuf,smb_vwv6,0);
5866 SIVAL(outbuf,smb_vwv8,0);
5868 uint32 allocation_size = get_allocation_size(conn,fsp, &sbuf);
5869 SIVAL(outbuf,smb_vwv6,(uint32)sbuf.st_size);
5870 SIVAL(outbuf,smb_vwv8,allocation_size);
5872 SSVAL(outbuf,smb_vwv10, mode);
5874 DEBUG( 3, ( "reply_getattrE fnum=%d\n", fsp->fnum));
5876 END_PROFILE(SMBgetattrE);