?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
tdb: Factor out tdb_lock_covered_by_allrecord_lock from tdb_lock_list
[Samba/gebeck_regimport.git] / source3 / smbd / reply.c
blob8db9c623f779bc374774a6fb41af83cdf01ca3bd
1 /*
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-2007.
7 Copyright (C) Volker Lendecke 2007
8
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 3 of the License, or
12 (at your option) any later version.
13
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
18
19 You should have received a copy of the GNU General Public License
20 along with this program. If not, see <http://www.gnu.org/licenses/>.
21 */
22 /*
23 This file handles most of the reply_ calls that the server
24 makes to handle specific protocols
25 */
26
27 #include "includes.h"
28 #include "system/filesys.h"
29 #include "printing.h"
30 #include "smbd/smbd.h"
31 #include "smbd/globals.h"
32 #include "fake_file.h"
33 #include "rpc_client/rpc_client.h"
34 #include "../librpc/gen_ndr/ndr_spoolss_c.h"
35 #include "../librpc/gen_ndr/open_files.h"
36 #include "rpc_client/cli_spoolss.h"
37 #include "rpc_client/init_spoolss.h"
38 #include "rpc_server/rpc_ncacn_np.h"
39 #include "libcli/security/security.h"
40 #include "libsmb/nmblib.h"
41 #include "auth.h"
42 #include "smbprofile.h"
43 #include "../lib/tsocket/tsocket.h"
44 #include "lib/tevent_wait.h"
45 #include "libcli/smb/smb_signing.h"
46
47 /****************************************************************************
48 Ensure we check the path in *exactly* the same way as W2K for a findfirst/findnext
49 path or anything including wildcards.
50 We're assuming here that '/' is not the second byte in any multibyte char
51 set (a safe assumption). '\\' *may* be the second byte in a multibyte char
52 set.
53 ****************************************************************************/
54
55 /* Custom version for processing POSIX paths. */
56 #define IS_PATH_SEP(c,posix_only) ((c) == '/' || (!(posix_only) && (c) == '\\'))
57
58 static NTSTATUS check_path_syntax_internal(char *path,
59 bool posix_path,
60 bool *p_last_component_contains_wcard)
61 {
62 char *d = path;
63 const char *s = path;
64 NTSTATUS ret = NT_STATUS_OK;
65 bool start_of_name_component = True;
66 bool stream_started = false;
67
68 *p_last_component_contains_wcard = False;
69
70 while (*s) {
71 if (stream_started) {
72 switch (*s) {
73 case '/':
74 case '\\':
75 return NT_STATUS_OBJECT_NAME_INVALID;
76 case ':':
77 if (s[1] == '\0') {
78 return NT_STATUS_OBJECT_NAME_INVALID;
79 }
80 if (strchr_m(&s[1], ':')) {
81 return NT_STATUS_OBJECT_NAME_INVALID;
82 }
83 break;
84 }
85 }
86
87 if ((*s == ':') && !posix_path && !stream_started) {
88 if (*p_last_component_contains_wcard) {
89 return NT_STATUS_OBJECT_NAME_INVALID;
90 }
91 /* Stream names allow more characters than file names.
92 We're overloading posix_path here to allow a wider
93 range of characters. If stream_started is true this
94 is still a Windows path even if posix_path is true.
95 JRA.
96 */
97 stream_started = true;
98 start_of_name_component = false;
99 posix_path = true;
100
101 if (s[1] == '\0') {
102 return NT_STATUS_OBJECT_NAME_INVALID;
103 }
104 }
105
106 if (!stream_started && IS_PATH_SEP(*s,posix_path)) {
107 /*
108 * Safe to assume is not the second part of a mb char
109 * as this is handled below.
110 */
111 /* Eat multiple '/' or '\\' */
112 while (IS_PATH_SEP(*s,posix_path)) {
113 s++;
114 }
115 if ((d != path) && (*s != '\0')) {
116 /* We only care about non-leading or trailing '/' or '\\' */
117 *d++ = '/';
118 }
119
120 start_of_name_component = True;
121 /* New component. */
122 *p_last_component_contains_wcard = False;
123 continue;
124 }
125
126 if (start_of_name_component) {
127 if ((s[0] == '.') && (s[1] == '.') && (IS_PATH_SEP(s[2],posix_path) || s[2] == '\0')) {
128 /* Uh oh - "/../" or "\\..\\" or "/..\0" or "\\..\0" ! */
129
130 /*
131 * No mb char starts with '.' so we're safe checking the directory separator here.
132 */
133
134 /* If we just added a '/' - delete it */
135 if ((d > path) && (*(d-1) == '/')) {
136 *(d-1) = '\0';
137 d--;
138 }
139
140 /* Are we at the start ? Can't go back further if so. */
141 if (d <= path) {
142 ret = NT_STATUS_OBJECT_PATH_SYNTAX_BAD;
143 break;
144 }
145 /* Go back one level... */
146 /* We know this is safe as '/' cannot be part of a mb sequence. */
147 /* NOTE - if this assumption is invalid we are not in good shape... */
148 /* Decrement d first as d points to the *next* char to write into. */
149 for (d--; d > path; d--) {
150 if (*d == '/')
151 break;
152 }
153 s += 2; /* Else go past the .. */
154 /* We're still at the start of a name component, just the previous one. */
155 continue;
156
157 } else if ((s[0] == '.') && ((s[1] == '\0') || IS_PATH_SEP(s[1],posix_path))) {
158 if (posix_path) {
159 /* Eat the '.' */
160 s++;
161 continue;
162 }
163 }
164
165 }
166
167 if (!(*s & 0x80)) {
168 if (!posix_path) {
169 if (*s <= 0x1f || *s == '|') {
170 return NT_STATUS_OBJECT_NAME_INVALID;
171 }
172 switch (*s) {
173 case '*':
174 case '?':
175 case '<':
176 case '>':
177 case '"':
178 *p_last_component_contains_wcard = True;
179 break;
180 default:
181 break;
182 }
183 }
184 *d++ = *s++;
185 } else {
186 size_t siz;
187 /* Get the size of the next MB character. */
188 next_codepoint(s,&siz);
189 switch(siz) {
190 case 5:
191 *d++ = *s++;
192 /*fall through*/
193 case 4:
194 *d++ = *s++;
195 /*fall through*/
196 case 3:
197 *d++ = *s++;
198 /*fall through*/
199 case 2:
200 *d++ = *s++;
201 /*fall through*/
202 case 1:
203 *d++ = *s++;
204 break;
205 default:
206 DEBUG(0,("check_path_syntax_internal: character length assumptions invalid !\n"));
207 *d = '\0';
208 return NT_STATUS_INVALID_PARAMETER;
209 }
210 }
211 start_of_name_component = False;
212 }
213
214 *d = '\0';
215
216 return ret;
217 }
218
219 /****************************************************************************
220 Ensure we check the path in *exactly* the same way as W2K for regular pathnames.
221 No wildcards allowed.
222 ****************************************************************************/
223
224 NTSTATUS check_path_syntax(char *path)
225 {
226 bool ignore;
227 return check_path_syntax_internal(path, False, &ignore);
228 }
229
230 /****************************************************************************
231 Ensure we check the path in *exactly* the same way as W2K for regular pathnames.
232 Wildcards allowed - p_contains_wcard returns true if the last component contained
233 a wildcard.
234 ****************************************************************************/
235
236 NTSTATUS check_path_syntax_wcard(char *path, bool *p_contains_wcard)
237 {
238 return check_path_syntax_internal(path, False, p_contains_wcard);
239 }
240
241 /****************************************************************************
242 Check the path for a POSIX client.
243 We're assuming here that '/' is not the second byte in any multibyte char
244 set (a safe assumption).
245 ****************************************************************************/
246
247 NTSTATUS check_path_syntax_posix(char *path)
248 {
249 bool ignore;
250 return check_path_syntax_internal(path, True, &ignore);
251 }
252
253 /****************************************************************************
254 Pull a string and check the path allowing a wilcard - provide for error return.
255 ****************************************************************************/
256
257 size_t srvstr_get_path_wcard(TALLOC_CTX *ctx,
258 const char *base_ptr,
259 uint16 smb_flags2,
260 char **pp_dest,
261 const char *src,
262 size_t src_len,
263 int flags,
264 NTSTATUS *err,
265 bool *contains_wcard)
266 {
267 size_t ret;
268
269 *pp_dest = NULL;
270
271 ret = srvstr_pull_talloc(ctx, base_ptr, smb_flags2, pp_dest, src,
272 src_len, flags);
273
274 if (!*pp_dest) {
275 *err = NT_STATUS_INVALID_PARAMETER;
276 return ret;
277 }
278
279 *contains_wcard = False;
280
281 if (smb_flags2 & FLAGS2_DFS_PATHNAMES) {
282 /*
283 * For a DFS path the function parse_dfs_path()
284 * will do the path processing, just make a copy.
285 */
286 *err = NT_STATUS_OK;
287 return ret;
288 }
289
290 if (lp_posix_pathnames()) {
291 *err = check_path_syntax_posix(*pp_dest);
292 } else {
293 *err = check_path_syntax_wcard(*pp_dest, contains_wcard);
294 }
295
296 return ret;
297 }
298
299 /****************************************************************************
300 Pull a string and check the path - provide for error return.
301 ****************************************************************************/
302
303 size_t srvstr_get_path(TALLOC_CTX *ctx,
304 const char *base_ptr,
305 uint16 smb_flags2,
306 char **pp_dest,
307 const char *src,
308 size_t src_len,
309 int flags,
310 NTSTATUS *err)
311 {
312 bool ignore;
313 return srvstr_get_path_wcard(ctx, base_ptr, smb_flags2, pp_dest, src,
314 src_len, flags, err, &ignore);
315 }
316
317 size_t srvstr_get_path_req_wcard(TALLOC_CTX *mem_ctx, struct smb_request *req,
318 char **pp_dest, const char *src, int flags,
319 NTSTATUS *err, bool *contains_wcard)
320 {
321 return srvstr_get_path_wcard(mem_ctx, (const char *)req->inbuf, req->flags2,
322 pp_dest, src, smbreq_bufrem(req, src),
323 flags, err, contains_wcard);
324 }
325
326 size_t srvstr_get_path_req(TALLOC_CTX *mem_ctx, struct smb_request *req,
327 char **pp_dest, const char *src, int flags,
328 NTSTATUS *err)
329 {
330 bool ignore;
331 return srvstr_get_path_req_wcard(mem_ctx, req, pp_dest, src,
332 flags, err, &ignore);
333 }
334
335 /****************************************************************************
336 Check if we have a correct fsp pointing to a file. Basic check for open fsp.
337 ****************************************************************************/
338
339 bool check_fsp_open(connection_struct *conn, struct smb_request *req,
340 files_struct *fsp)
341 {
342 if ((fsp == NULL) || (conn == NULL)) {
343 reply_nterror(req, NT_STATUS_INVALID_HANDLE);
344 return False;
345 }
346 if ((conn != fsp->conn) || (req->vuid != fsp->vuid)) {
347 reply_nterror(req, NT_STATUS_INVALID_HANDLE);
348 return False;
349 }
350 return True;
351 }
352
353 /****************************************************************************
354 Check if we have a correct fsp pointing to a file.
355 ****************************************************************************/
356
357 bool check_fsp(connection_struct *conn, struct smb_request *req,
358 files_struct *fsp)
359 {
360 if (!check_fsp_open(conn, req, fsp)) {
361 return False;
362 }
363 if (fsp->is_directory) {
364 reply_nterror(req, NT_STATUS_INVALID_DEVICE_REQUEST);
365 return False;
366 }
367 if (fsp->fh->fd == -1) {
368 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
369 return False;
370 }
371 fsp->num_smb_operations++;
372 return True;
373 }
374
375 /****************************************************************************
376 Check if we have a correct fsp pointing to a quota fake file. Replacement for
377 the CHECK_NTQUOTA_HANDLE_OK macro.
378 ****************************************************************************/
379
380 bool check_fsp_ntquota_handle(connection_struct *conn, struct smb_request *req,
381 files_struct *fsp)
382 {
383 if (!check_fsp_open(conn, req, fsp)) {
384 return false;
385 }
386
387 if (fsp->is_directory) {
388 return false;
389 }
390
391 if (fsp->fake_file_handle == NULL) {
392 return false;
393 }
394
395 if (fsp->fake_file_handle->type != FAKE_FILE_TYPE_QUOTA) {
396 return false;
397 }
398
399 if (fsp->fake_file_handle->private_data == NULL) {
400 return false;
401 }
402
403 return true;
404 }
405
406 static bool netbios_session_retarget(struct smbd_server_connection *sconn,
407 const char *name, int name_type)
408 {
409 char *trim_name;
410 char *trim_name_type;
411 const char *retarget_parm;
412 char *retarget;
413 char *p;
414 int retarget_type = 0x20;
415 int retarget_port = NBT_SMB_PORT;
416 struct sockaddr_storage retarget_addr;
417 struct sockaddr_in *in_addr;
418 bool ret = false;
419 uint8_t outbuf[10];
420
421 if (get_socket_port(sconn->sock) != NBT_SMB_PORT) {
422 return false;
423 }
424
425 trim_name = talloc_strdup(talloc_tos(), name);
426 if (trim_name == NULL) {
427 goto fail;
428 }
429 trim_char(trim_name, ' ', ' ');
430
431 trim_name_type = talloc_asprintf(trim_name, "%s#%2.2x", trim_name,
432 name_type);
433 if (trim_name_type == NULL) {
434 goto fail;
435 }
436
437 retarget_parm = lp_parm_const_string(-1, "netbios retarget",
438 trim_name_type, NULL);
439 if (retarget_parm == NULL) {
440 retarget_parm = lp_parm_const_string(-1, "netbios retarget",
441 trim_name, NULL);
442 }
443 if (retarget_parm == NULL) {
444 goto fail;
445 }
446
447 retarget = talloc_strdup(trim_name, retarget_parm);
448 if (retarget == NULL) {
449 goto fail;
450 }
451
452 DEBUG(10, ("retargeting %s to %s\n", trim_name_type, retarget));
453
454 p = strchr(retarget, ':');
455 if (p != NULL) {
456 *p++ = '\0';
457 retarget_port = atoi(p);
458 }
459
460 p = strchr_m(retarget, '#');
461 if (p != NULL) {
462 *p++ = '\0';
463 if (sscanf(p, "%x", &retarget_type) != 1) {
464 goto fail;
465 }
466 }
467
468 ret = resolve_name(retarget, &retarget_addr, retarget_type, false);
469 if (!ret) {
470 DEBUG(10, ("could not resolve %s\n", retarget));
471 goto fail;
472 }
473
474 if (retarget_addr.ss_family != AF_INET) {
475 DEBUG(10, ("Retarget target not an IPv4 addr\n"));
476 goto fail;
477 }
478
479 in_addr = (struct sockaddr_in *)(void *)&retarget_addr;
480
481 _smb_setlen(outbuf, 6);
482 SCVAL(outbuf, 0, 0x84);
483 *(uint32_t *)(outbuf+4) = in_addr->sin_addr.s_addr;
484 *(uint16_t *)(outbuf+8) = htons(retarget_port);
485
486 if (!srv_send_smb(sconn, (char *)outbuf, false, 0, false,
487 NULL)) {
488 exit_server_cleanly("netbios_session_retarget: srv_send_smb "
489 "failed.");
490 }
491
492 ret = true;
493 fail:
494 TALLOC_FREE(trim_name);
495 return ret;
496 }
497
498 static void reply_called_name_not_present(char *outbuf)
499 {
500 smb_setlen(outbuf, 1);
501 SCVAL(outbuf, 0, 0x83);
502 SCVAL(outbuf, 4, 0x82);
503 }
504
505 /****************************************************************************
506 Reply to a (netbios-level) special message.
507 ****************************************************************************/
508
509 void reply_special(struct smbd_server_connection *sconn, char *inbuf, size_t inbuf_size)
510 {
511 int msg_type = CVAL(inbuf,0);
512 int msg_flags = CVAL(inbuf,1);
513 /*
514 * We only really use 4 bytes of the outbuf, but for the smb_setlen
515 * calculation & friends (srv_send_smb uses that) we need the full smb
516 * header.
517 */
518 char outbuf[smb_size];
519
520 memset(outbuf, '\0', sizeof(outbuf));
521
522 smb_setlen(outbuf,0);
523
524 switch (msg_type) {
525 case NBSSrequest: /* session request */
526 {
527 /* inbuf_size is guarenteed to be at least 4. */
528 fstring name1,name2;
529 int name_type1, name_type2;
530 int name_len1, name_len2;
531
532 *name1 = *name2 = 0;
533
534 if (sconn->nbt.got_session) {
535 exit_server_cleanly("multiple session request not permitted");
536 }
537
538 SCVAL(outbuf,0,NBSSpositive);
539 SCVAL(outbuf,3,0);
540
541 /* inbuf_size is guaranteed to be at least 4. */
542 name_len1 = name_len((unsigned char *)(inbuf+4),inbuf_size - 4);
543 if (name_len1 <= 0 || name_len1 > inbuf_size - 4) {
544 DEBUG(0,("Invalid name length in session request\n"));
545 reply_called_name_not_present(outbuf);
546 break;
547 }
548 name_len2 = name_len((unsigned char *)(inbuf+4+name_len1),inbuf_size - 4 - name_len1);
549 if (name_len2 <= 0 || name_len2 > inbuf_size - 4 - name_len1) {
550 DEBUG(0,("Invalid name length in session request\n"));
551 reply_called_name_not_present(outbuf);
552 break;
553 }
554
555 name_type1 = name_extract((unsigned char *)inbuf,
556 inbuf_size,(unsigned int)4,name1);
557 name_type2 = name_extract((unsigned char *)inbuf,
558 inbuf_size,(unsigned int)(4 + name_len1),name2);
559
560 if (name_type1 == -1 || name_type2 == -1) {
561 DEBUG(0,("Invalid name type in session request\n"));
562 reply_called_name_not_present(outbuf);
563 break;
564 }
565
566 DEBUG(2,("netbios connect: name1=%s0x%x name2=%s0x%x\n",
567 name1, name_type1, name2, name_type2));
568
569 if (netbios_session_retarget(sconn, name1, name_type1)) {
570 exit_server_cleanly("retargeted client");
571 }
572
573 /*
574 * Windows NT/2k uses "*SMBSERVER" and XP uses
575 * "*SMBSERV" arrggg!!!
576 */
577 if (strequal(name1, "*SMBSERVER ")
578 || strequal(name1, "*SMBSERV ")) {
579 char *raddr;
580
581 raddr = tsocket_address_inet_addr_string(sconn->remote_address,
582 talloc_tos());
583 if (raddr == NULL) {
584 exit_server_cleanly("could not allocate raddr");
585 }
586
587 fstrcpy(name1, raddr);
588 }
589
590 set_local_machine_name(name1, True);
591 set_remote_machine_name(name2, True);
592
593 if (is_ipaddress(sconn->remote_hostname)) {
594 char *p = discard_const_p(char, sconn->remote_hostname);
595
596 talloc_free(p);
597
598 sconn->remote_hostname = talloc_strdup(sconn,
599 get_remote_machine_name());
600 if (sconn->remote_hostname == NULL) {
601 exit_server_cleanly("could not copy remote name");
602 }
603 sconn->conn->remote_hostname = sconn->remote_hostname;
604 }
605
606 DEBUG(2,("netbios connect: local=%s remote=%s, name type = %x\n",
607 get_local_machine_name(), get_remote_machine_name(),
608 name_type2));
609
610 if (name_type2 == 'R') {
611 /* We are being asked for a pathworks session ---
612 no thanks! */
613 reply_called_name_not_present(outbuf);
614 break;
615 }
616
617 reload_services(sconn, conn_snum_used, true);
618 reopen_logs();
619
620 sconn->nbt.got_session = true;
621 break;
622 }
623
624 case 0x89: /* session keepalive request
625 (some old clients produce this?) */
626 SCVAL(outbuf,0,NBSSkeepalive);
627 SCVAL(outbuf,3,0);
628 break;
629
630 case NBSSpositive: /* positive session response */
631 case NBSSnegative: /* negative session response */
632 case NBSSretarget: /* retarget session response */
633 DEBUG(0,("Unexpected session response\n"));
634 break;
635
636 case NBSSkeepalive: /* session keepalive */
637 default:
638 return;
639 }
640
641 DEBUG(5,("init msg_type=0x%x msg_flags=0x%x\n",
642 msg_type, msg_flags));
643
644 srv_send_smb(sconn, outbuf, false, 0, false, NULL);
645
646 if (CVAL(outbuf, 0) != 0x82) {
647 exit_server_cleanly("invalid netbios session");
648 }
649 return;
650 }
651
652 /****************************************************************************
653 Reply to a tcon.
654 conn POINTER CAN BE NULL HERE !
655 ****************************************************************************/
656
657 void reply_tcon(struct smb_request *req)
658 {
659 connection_struct *conn = req->conn;
660 const char *service;
661 char *service_buf = NULL;
662 char *password = NULL;
663 char *dev = NULL;
664 int pwlen=0;
665 NTSTATUS nt_status;
666 const char *p;
667 TALLOC_CTX *ctx = talloc_tos();
668 struct smbd_server_connection *sconn = req->sconn;
669 NTTIME now = timeval_to_nttime(&req->request_time);
670
671 START_PROFILE(SMBtcon);
672
673 if (req->buflen < 4) {
674 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
675 END_PROFILE(SMBtcon);
676 return;
677 }
678
679 p = (const char *)req->buf + 1;
680 p += srvstr_pull_req_talloc(ctx, req, &service_buf, p, STR_TERMINATE);
681 p += 1;
682 pwlen = srvstr_pull_req_talloc(ctx, req, &password, p, STR_TERMINATE);
683 p += pwlen+1;
684 p += srvstr_pull_req_talloc(ctx, req, &dev, p, STR_TERMINATE);
685 p += 1;
686
687 if (service_buf == NULL || password == NULL || dev == NULL) {
688 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
689 END_PROFILE(SMBtcon);
690 return;
691 }
692 p = strrchr_m(service_buf,'\\');
693 if (p) {
694 service = p+1;
695 } else {
696 service = service_buf;
697 }
698
699 conn = make_connection(sconn, now, service, dev,
700 req->vuid,&nt_status);
701 req->conn = conn;
702
703 if (!conn) {
704 reply_nterror(req, nt_status);
705 END_PROFILE(SMBtcon);
706 return;
707 }
708
709 reply_outbuf(req, 2, 0);
710 SSVAL(req->outbuf,smb_vwv0,sconn->smb1.negprot.max_recv);
711 SSVAL(req->outbuf,smb_vwv1,conn->cnum);
712 SSVAL(req->outbuf,smb_tid,conn->cnum);
713
714 DEBUG(3,("tcon service=%s cnum=%d\n",
715 service, conn->cnum));
716
717 END_PROFILE(SMBtcon);
718 return;
719 }
720
721 /****************************************************************************
722 Reply to a tcon and X.
723 conn POINTER CAN BE NULL HERE !
724 ****************************************************************************/
725
726 void reply_tcon_and_X(struct smb_request *req)
727 {
728 connection_struct *conn = req->conn;
729 const char *service = NULL;
730 TALLOC_CTX *ctx = talloc_tos();
731 /* what the cleint thinks the device is */
732 char *client_devicetype = NULL;
733 /* what the server tells the client the share represents */
734 const char *server_devicetype;
735 NTSTATUS nt_status;
736 int passlen;
737 char *path = NULL;
738 const char *p, *q;
739 uint16_t tcon_flags;
740 struct smbXsrv_session *session = NULL;
741 NTTIME now = timeval_to_nttime(&req->request_time);
742 bool session_key_updated = false;
743 uint16_t optional_support = 0;
744 struct smbd_server_connection *sconn = req->sconn;
745
746 START_PROFILE(SMBtconX);
747
748 if (req->wct < 4) {
749 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
750 END_PROFILE(SMBtconX);
751 return;
752 }
753
754 passlen = SVAL(req->vwv+3, 0);
755 tcon_flags = SVAL(req->vwv+2, 0);
756
757 /* we might have to close an old one */
758 if ((tcon_flags & TCONX_FLAG_DISCONNECT_TID) && conn) {
759 struct smbXsrv_tcon *tcon;
760 NTSTATUS status;
761
762 tcon = conn->tcon;
763 req->conn = NULL;
764 conn = NULL;
765
766 /*
767 * TODO: cancel all outstanding requests on the tcon
768 */
769 status = smbXsrv_tcon_disconnect(tcon, req->vuid);
770 if (!NT_STATUS_IS_OK(status)) {
771 DEBUG(0, ("reply_tcon_and_X: "
772 "smbXsrv_tcon_disconnect() failed: %s\n",
773 nt_errstr(status)));
774 /*
775 * If we hit this case, there is something completely
776 * wrong, so we better disconnect the transport connection.
777 */
778 END_PROFILE(SMBtconX);
779 exit_server(__location__ ": smbXsrv_tcon_disconnect failed");
780 return;
781 }
782
783 TALLOC_FREE(tcon);
784 }
785
786 if ((passlen > MAX_PASS_LEN) || (passlen >= req->buflen)) {
787 reply_force_doserror(req, ERRDOS, ERRbuftoosmall);
788 END_PROFILE(SMBtconX);
789 return;
790 }
791
792 if (sconn->smb1.negprot.encrypted_passwords) {
793 p = (const char *)req->buf + passlen;
794 } else {
795 p = (const char *)req->buf + passlen + 1;
796 }
797
798 p += srvstr_pull_req_talloc(ctx, req, &path, p, STR_TERMINATE);
799
800 if (path == NULL) {
801 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
802 END_PROFILE(SMBtconX);
803 return;
804 }
805
806 /*
807 * the service name can be either: \\server\share
808 * or share directly like on the DELL PowerVault 705
809 */
810 if (*path=='\\') {
811 q = strchr_m(path+2,'\\');
812 if (!q) {
813 reply_nterror(req, NT_STATUS_BAD_NETWORK_NAME);
814 END_PROFILE(SMBtconX);
815 return;
816 }
817 service = q+1;
818 } else {
819 service = path;
820 }
821
822 p += srvstr_pull_talloc(ctx, req->inbuf, req->flags2,
823 &client_devicetype, p,
824 MIN(6, smbreq_bufrem(req, p)), STR_ASCII);
825
826 if (client_devicetype == NULL) {
827 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
828 END_PROFILE(SMBtconX);
829 return;
830 }
831
832 DEBUG(4,("Client requested device type [%s] for share [%s]\n", client_devicetype, service));
833
834 nt_status = smb1srv_session_lookup(req->sconn->conn,
835 req->vuid, now, &session);
836 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_USER_SESSION_DELETED)) {
837 reply_force_doserror(req, ERRSRV, ERRbaduid);
838 END_PROFILE(SMBtconX);
839 return;
840 }
841 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_NETWORK_SESSION_EXPIRED)) {
842 reply_nterror(req, nt_status);
843 END_PROFILE(SMBtconX);
844 return;
845 }
846 if (!NT_STATUS_IS_OK(nt_status)) {
847 reply_nterror(req, NT_STATUS_INVALID_HANDLE);
848 END_PROFILE(SMBtconX);
849 return;
850 }
851
852 if (session->global->auth_session_info == NULL) {
853 reply_nterror(req, NT_STATUS_INVALID_HANDLE);
854 END_PROFILE(SMBtconX);
855 return;
856 }
857
858 /*
859 * If there is no application key defined yet
860 * we create one.
861 *
862 * This means we setup the application key on the
863 * first tcon that happens via the given session.
864 *
865 * Once the application key is defined, it does not
866 * change any more.
867 */
868 if (session->global->application_key.length == 0 &&
869 session->global->signing_key.length > 0)
870 {
871 struct smbXsrv_session *x = session;
872 struct auth_session_info *session_info =
873 session->global->auth_session_info;
874 uint8_t session_key[16];
875
876 ZERO_STRUCT(session_key);
877 memcpy(session_key, x->global->signing_key.data,
878 MIN(x->global->signing_key.length, sizeof(session_key)));
879
880 /*
881 * The application key is truncated/padded to 16 bytes
882 */
883 x->global->application_key = data_blob_talloc(x->global,
884 session_key,
885 sizeof(session_key));
886 ZERO_STRUCT(session_key);
887 if (x->global->application_key.data == NULL) {
888 reply_nterror(req, NT_STATUS_NO_MEMORY);
889 END_PROFILE(SMBtconX);
890 return;
891 }
892
893 if (tcon_flags & TCONX_FLAG_EXTENDED_SIGNATURES) {
894 smb_key_derivation(x->global->application_key.data,
895 x->global->application_key.length,
896 x->global->application_key.data);
897 optional_support |= SMB_EXTENDED_SIGNATURES;
898 }
899
900 /*
901 * Place the application key into the session_info
902 */
903 data_blob_clear_free(&session_info->session_key);
904 session_info->session_key = data_blob_dup_talloc(session_info,
905 x->global->application_key);
906 if (session_info->session_key.data == NULL) {
907 data_blob_clear_free(&x->global->application_key);
908 reply_nterror(req, NT_STATUS_NO_MEMORY);
909 END_PROFILE(SMBtconX);
910 return;
911 }
912 session_key_updated = true;
913 }
914
915 conn = make_connection(sconn, now, service, client_devicetype,
916 req->vuid, &nt_status);
917 req->conn =conn;
918
919 if (!conn) {
920 if (session_key_updated) {
921 struct smbXsrv_session *x = session;
922 struct auth_session_info *session_info =
923 session->global->auth_session_info;
924 data_blob_clear_free(&x->global->application_key);
925 data_blob_clear_free(&session_info->session_key);
926 }
927 reply_nterror(req, nt_status);
928 END_PROFILE(SMBtconX);
929 return;
930 }
931
932 if ( IS_IPC(conn) )
933 server_devicetype = "IPC";
934 else if ( IS_PRINT(conn) )
935 server_devicetype = "LPT1:";
936 else
937 server_devicetype = "A:";
938
939 if (get_Protocol() < PROTOCOL_NT1) {
940 reply_outbuf(req, 2, 0);
941 if (message_push_string(&req->outbuf, server_devicetype,
942 STR_TERMINATE|STR_ASCII) == -1) {
943 reply_nterror(req, NT_STATUS_NO_MEMORY);
944 END_PROFILE(SMBtconX);
945 return;
946 }
947 } else {
948 /* NT sets the fstype of IPC$ to the null string */
949 const char *fstype = IS_IPC(conn) ? "" : lp_fstype(ctx, SNUM(conn));
950
951 if (tcon_flags & TCONX_FLAG_EXTENDED_RESPONSE) {
952 /* Return permissions. */
953 uint32 perm1 = 0;
954 uint32 perm2 = 0;
955
956 reply_outbuf(req, 7, 0);
957
958 if (IS_IPC(conn)) {
959 perm1 = FILE_ALL_ACCESS;
960 perm2 = FILE_ALL_ACCESS;
961 } else {
962 perm1 = conn->share_access;
963 }
964
965 SIVAL(req->outbuf, smb_vwv3, perm1);
966 SIVAL(req->outbuf, smb_vwv5, perm2);
967 } else {
968 reply_outbuf(req, 3, 0);
969 }
970
971 if ((message_push_string(&req->outbuf, server_devicetype,
972 STR_TERMINATE|STR_ASCII) == -1)
973 || (message_push_string(&req->outbuf, fstype,
974 STR_TERMINATE) == -1)) {
975 reply_nterror(req, NT_STATUS_NO_MEMORY);
976 END_PROFILE(SMBtconX);
977 return;
978 }
979
980 /* what does setting this bit do? It is set by NT4 and
981 may affect the ability to autorun mounted cdroms */
982 optional_support |= SMB_SUPPORT_SEARCH_BITS;
983 optional_support |=
984 (lp_csc_policy(SNUM(conn)) << SMB_CSC_POLICY_SHIFT);
985
986 if (lp_msdfs_root(SNUM(conn)) && lp_host_msdfs()) {
987 DEBUG(2,("Serving %s as a Dfs root\n",
988 lp_servicename(ctx, SNUM(conn)) ));
989 optional_support |= SMB_SHARE_IN_DFS;
990 }
991
992 SSVAL(req->outbuf, smb_vwv2, optional_support);
993 }
994
995 SSVAL(req->outbuf, smb_vwv0, 0xff); /* andx chain ends */
996 SSVAL(req->outbuf, smb_vwv1, 0); /* no andx offset */
997
998 DEBUG(3,("tconX service=%s \n",
999 service));
1000
1001 /* set the incoming and outgoing tid to the just created one */
1002 SSVAL(discard_const_p(uint8_t, req->inbuf),smb_tid,conn->cnum);
1003 SSVAL(req->outbuf,smb_tid,conn->cnum);
1004
1005 END_PROFILE(SMBtconX);
1006
1007 req->tid = conn->cnum;
1008 }
1009
1010 /****************************************************************************
1011 Reply to an unknown type.
1012 ****************************************************************************/
1013
1014 void reply_unknown_new(struct smb_request *req, uint8 type)
1015 {
1016 DEBUG(0, ("unknown command type (%s): type=%d (0x%X)\n",
1017 smb_fn_name(type), type, type));
1018 reply_force_doserror(req, ERRSRV, ERRunknownsmb);
1019 return;
1020 }
1021
1022 /****************************************************************************
1023 Reply to an ioctl.
1024 conn POINTER CAN BE NULL HERE !
1025 ****************************************************************************/
1026
1027 void reply_ioctl(struct smb_request *req)
1028 {
1029 connection_struct *conn = req->conn;
1030 uint16 device;
1031 uint16 function;
1032 uint32 ioctl_code;
1033 int replysize;
1034 char *p;
1035
1036 START_PROFILE(SMBioctl);
1037
1038 if (req->wct < 3) {
1039 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1040 END_PROFILE(SMBioctl);
1041 return;
1042 }
1043
1044 device = SVAL(req->vwv+1, 0);
1045 function = SVAL(req->vwv+2, 0);
1046 ioctl_code = (device << 16) + function;
1047
1048 DEBUG(4, ("Received IOCTL (code 0x%x)\n", ioctl_code));
1049
1050 switch (ioctl_code) {
1051 case IOCTL_QUERY_JOB_INFO:
1052 replysize = 32;
1053 break;
1054 default:
1055 reply_force_doserror(req, ERRSRV, ERRnosupport);
1056 END_PROFILE(SMBioctl);
1057 return;
1058 }
1059
1060 reply_outbuf(req, 8, replysize+1);
1061 SSVAL(req->outbuf,smb_vwv1,replysize); /* Total data bytes returned */
1062 SSVAL(req->outbuf,smb_vwv5,replysize); /* Data bytes this buffer */
1063 SSVAL(req->outbuf,smb_vwv6,52); /* Offset to data */
1064 p = smb_buf(req->outbuf);
1065 memset(p, '\0', replysize+1); /* valgrind-safe. */
1066 p += 1; /* Allow for alignment */
1067
1068 switch (ioctl_code) {
1069 case IOCTL_QUERY_JOB_INFO:
1070 {
1071 files_struct *fsp = file_fsp(
1072 req, SVAL(req->vwv+0, 0));
1073 if (!fsp) {
1074 reply_nterror(req, NT_STATUS_INVALID_HANDLE);
1075 END_PROFILE(SMBioctl);
1076 return;
1077 }
1078 /* Job number */
1079 SSVAL(p, 0, print_spool_rap_jobid(fsp->print_file));
1080
1081 srvstr_push((char *)req->outbuf, req->flags2, p+2,
1082 lp_netbios_name(), 15,
1083 STR_TERMINATE|STR_ASCII);
1084 if (conn) {
1085 srvstr_push((char *)req->outbuf, req->flags2,
1086 p+18,
1087 lp_servicename(talloc_tos(),
1088 SNUM(conn)),
1089 13, STR_TERMINATE|STR_ASCII);
1090 } else {
1091 memset(p+18, 0, 13);
1092 }
1093 break;
1094 }
1095 }
1096
1097 END_PROFILE(SMBioctl);
1098 return;
1099 }
1100
1101 /****************************************************************************
1102 Strange checkpath NTSTATUS mapping.
1103 ****************************************************************************/
1104
1105 static NTSTATUS map_checkpath_error(uint16_t flags2, NTSTATUS status)
1106 {
1107 /* Strange DOS error code semantics only for checkpath... */
1108 if (!(flags2 & FLAGS2_32_BIT_ERROR_CODES)) {
1109 if (NT_STATUS_EQUAL(NT_STATUS_OBJECT_NAME_INVALID,status)) {
1110 /* We need to map to ERRbadpath */
1111 return NT_STATUS_OBJECT_PATH_NOT_FOUND;
1112 }
1113 }
1114 return status;
1115 }
1116
1117 /****************************************************************************
1118 Reply to a checkpath.
1119 ****************************************************************************/
1120
1121 void reply_checkpath(struct smb_request *req)
1122 {
1123 connection_struct *conn = req->conn;
1124 struct smb_filename *smb_fname = NULL;
1125 char *name = NULL;
1126 NTSTATUS status;
1127 TALLOC_CTX *ctx = talloc_tos();
1128
1129 START_PROFILE(SMBcheckpath);
1130
1131 srvstr_get_path_req(ctx, req, &name, (const char *)req->buf + 1,
1132 STR_TERMINATE, &status);
1133
1134 if (!NT_STATUS_IS_OK(status)) {
1135 status = map_checkpath_error(req->flags2, status);
1136 reply_nterror(req, status);
1137 END_PROFILE(SMBcheckpath);
1138 return;
1139 }
1140
1141 DEBUG(3,("reply_checkpath %s mode=%d\n", name, (int)SVAL(req->vwv+0, 0)));
1142
1143 status = filename_convert(ctx,
1144 conn,
1145 req->flags2 & FLAGS2_DFS_PATHNAMES,
1146 name,
1147 0,
1148 NULL,
1149 &smb_fname);
1150
1151 if (!NT_STATUS_IS_OK(status)) {
1152 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
1153 reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
1154 ERRSRV, ERRbadpath);
1155 END_PROFILE(SMBcheckpath);
1156 return;
1157 }
1158 goto path_err;
1159 }
1160
1161 if (!VALID_STAT(smb_fname->st) &&
1162 (SMB_VFS_STAT(conn, smb_fname) != 0)) {
1163 DEBUG(3,("reply_checkpath: stat of %s failed (%s)\n",
1164 smb_fname_str_dbg(smb_fname), strerror(errno)));
1165 status = map_nt_error_from_unix(errno);
1166 goto path_err;
1167 }
1168
1169 if (!S_ISDIR(smb_fname->st.st_ex_mode)) {
1170 reply_botherror(req, NT_STATUS_NOT_A_DIRECTORY,
1171 ERRDOS, ERRbadpath);
1172 goto out;
1173 }
1174
1175 reply_outbuf(req, 0, 0);
1176
1177 path_err:
1178 /* We special case this - as when a Windows machine
1179 is parsing a path is steps through the components
1180 one at a time - if a component fails it expects
1181 ERRbadpath, not ERRbadfile.
1182 */
1183 status = map_checkpath_error(req->flags2, status);
1184 if (NT_STATUS_EQUAL(status, NT_STATUS_OBJECT_NAME_NOT_FOUND)) {
1185 /*
1186 * Windows returns different error codes if
1187 * the parent directory is valid but not the
1188 * last component - it returns NT_STATUS_OBJECT_NAME_NOT_FOUND
1189 * for that case and NT_STATUS_OBJECT_PATH_NOT_FOUND
1190 * if the path is invalid.
1191 */
1192 reply_botherror(req, NT_STATUS_OBJECT_NAME_NOT_FOUND,
1193 ERRDOS, ERRbadpath);
1194 goto out;
1195 }
1196
1197 reply_nterror(req, status);
1198
1199 out:
1200 TALLOC_FREE(smb_fname);
1201 END_PROFILE(SMBcheckpath);
1202 return;
1203 }
1204
1205 /****************************************************************************
1206 Reply to a getatr.
1207 ****************************************************************************/
1208
1209 void reply_getatr(struct smb_request *req)
1210 {
1211 connection_struct *conn = req->conn;
1212 struct smb_filename *smb_fname = NULL;
1213 char *fname = NULL;
1214 int mode=0;
1215 off_t size=0;
1216 time_t mtime=0;
1217 const char *p;
1218 NTSTATUS status;
1219 TALLOC_CTX *ctx = talloc_tos();
1220 bool ask_sharemode = lp_parm_bool(SNUM(conn), "smbd", "search ask sharemode", true);
1221
1222 START_PROFILE(SMBgetatr);
1223
1224 p = (const char *)req->buf + 1;
1225 p += srvstr_get_path_req(ctx, req, &fname, p, STR_TERMINATE, &status);
1226 if (!NT_STATUS_IS_OK(status)) {
1227 reply_nterror(req, status);
1228 goto out;
1229 }
1230
1231 /* dos smetimes asks for a stat of "" - it returns a "hidden directory"
1232 under WfWg - weird! */
1233 if (*fname == '\0') {
1234 mode = FILE_ATTRIBUTE_HIDDEN | FILE_ATTRIBUTE_DIRECTORY;
1235 if (!CAN_WRITE(conn)) {
1236 mode |= FILE_ATTRIBUTE_READONLY;
1237 }
1238 size = 0;
1239 mtime = 0;
1240 } else {
1241 status = filename_convert(ctx,
1242 conn,
1243 req->flags2 & FLAGS2_DFS_PATHNAMES,
1244 fname,
1245 0,
1246 NULL,
1247 &smb_fname);
1248 if (!NT_STATUS_IS_OK(status)) {
1249 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
1250 reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
1251 ERRSRV, ERRbadpath);
1252 goto out;
1253 }
1254 reply_nterror(req, status);
1255 goto out;
1256 }
1257 if (!VALID_STAT(smb_fname->st) &&
1258 (SMB_VFS_STAT(conn, smb_fname) != 0)) {
1259 DEBUG(3,("reply_getatr: stat of %s failed (%s)\n",
1260 smb_fname_str_dbg(smb_fname),
1261 strerror(errno)));
1262 reply_nterror(req, map_nt_error_from_unix(errno));
1263 goto out;
1264 }
1265
1266 mode = dos_mode(conn, smb_fname);
1267 size = smb_fname->st.st_ex_size;
1268
1269 if (ask_sharemode) {
1270 struct timespec write_time_ts;
1271 struct file_id fileid;
1272
1273 ZERO_STRUCT(write_time_ts);
1274 fileid = vfs_file_id_from_sbuf(conn, &smb_fname->st);
1275 get_file_infos(fileid, 0, NULL, &write_time_ts);
1276 if (!null_timespec(write_time_ts)) {
1277 update_stat_ex_mtime(&smb_fname->st, write_time_ts);
1278 }
1279 }
1280
1281 mtime = convert_timespec_to_time_t(smb_fname->st.st_ex_mtime);
1282 if (mode & FILE_ATTRIBUTE_DIRECTORY) {
1283 size = 0;
1284 }
1285 }
1286
1287 reply_outbuf(req, 10, 0);
1288
1289 SSVAL(req->outbuf,smb_vwv0,mode);
1290 if(lp_dos_filetime_resolution(SNUM(conn)) ) {
1291 srv_put_dos_date3((char *)req->outbuf,smb_vwv1,mtime & ~1);
1292 } else {
1293 srv_put_dos_date3((char *)req->outbuf,smb_vwv1,mtime);
1294 }
1295 SIVAL(req->outbuf,smb_vwv3,(uint32)size);
1296
1297 if (get_Protocol() >= PROTOCOL_NT1) {
1298 SSVAL(req->outbuf, smb_flg2,
1299 SVAL(req->outbuf, smb_flg2) | FLAGS2_IS_LONG_NAME);
1300 }
1301
1302 DEBUG(3,("reply_getatr: name=%s mode=%d size=%u\n",
1303 smb_fname_str_dbg(smb_fname), mode, (unsigned int)size));
1304
1305 out:
1306 TALLOC_FREE(smb_fname);
1307 TALLOC_FREE(fname);
1308 END_PROFILE(SMBgetatr);
1309 return;
1310 }
1311
1312 /****************************************************************************
1313 Reply to a setatr.
1314 ****************************************************************************/
1315
1316 void reply_setatr(struct smb_request *req)
1317 {
1318 struct smb_file_time ft;
1319 connection_struct *conn = req->conn;
1320 struct smb_filename *smb_fname = NULL;
1321 char *fname = NULL;
1322 int mode;
1323 time_t mtime;
1324 const char *p;
1325 NTSTATUS status;
1326 TALLOC_CTX *ctx = talloc_tos();
1327
1328 START_PROFILE(SMBsetatr);
1329
1330 ZERO_STRUCT(ft);
1331
1332 if (req->wct < 2) {
1333 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1334 goto out;
1335 }
1336
1337 p = (const char *)req->buf + 1;
1338 p += srvstr_get_path_req(ctx, req, &fname, p, STR_TERMINATE, &status);
1339 if (!NT_STATUS_IS_OK(status)) {
1340 reply_nterror(req, status);
1341 goto out;
1342 }
1343
1344 status = filename_convert(ctx,
1345 conn,
1346 req->flags2 & FLAGS2_DFS_PATHNAMES,
1347 fname,
1348 0,
1349 NULL,
1350 &smb_fname);
1351 if (!NT_STATUS_IS_OK(status)) {
1352 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
1353 reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
1354 ERRSRV, ERRbadpath);
1355 goto out;
1356 }
1357 reply_nterror(req, status);
1358 goto out;
1359 }
1360
1361 if (smb_fname->base_name[0] == '.' &&
1362 smb_fname->base_name[1] == '\0') {
1363 /*
1364 * Not sure here is the right place to catch this
1365 * condition. Might be moved to somewhere else later -- vl
1366 */
1367 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
1368 goto out;
1369 }
1370
1371 mode = SVAL(req->vwv+0, 0);
1372 mtime = srv_make_unix_date3(req->vwv+1);
1373
1374 if (mode != FILE_ATTRIBUTE_NORMAL) {
1375 if (VALID_STAT_OF_DIR(smb_fname->st))
1376 mode |= FILE_ATTRIBUTE_DIRECTORY;
1377 else
1378 mode &= ~FILE_ATTRIBUTE_DIRECTORY;
1379
1380 status = check_access(conn, NULL, smb_fname,
1381 FILE_WRITE_ATTRIBUTES);
1382 if (!NT_STATUS_IS_OK(status)) {
1383 reply_nterror(req, status);
1384 goto out;
1385 }
1386
1387 if (file_set_dosmode(conn, smb_fname, mode, NULL,
1388 false) != 0) {
1389 reply_nterror(req, map_nt_error_from_unix(errno));
1390 goto out;
1391 }
1392 }
1393
1394 ft.mtime = convert_time_t_to_timespec(mtime);
1395 status = smb_set_file_time(conn, NULL, smb_fname, &ft, true);
1396 if (!NT_STATUS_IS_OK(status)) {
1397 reply_nterror(req, status);
1398 goto out;
1399 }
1400
1401 reply_outbuf(req, 0, 0);
1402
1403 DEBUG(3, ("setatr name=%s mode=%d\n", smb_fname_str_dbg(smb_fname),
1404 mode));
1405 out:
1406 TALLOC_FREE(smb_fname);
1407 END_PROFILE(SMBsetatr);
1408 return;
1409 }
1410
1411 /****************************************************************************
1412 Reply to a dskattr.
1413 ****************************************************************************/
1414
1415 void reply_dskattr(struct smb_request *req)
1416 {
1417 connection_struct *conn = req->conn;
1418 uint64_t dfree,dsize,bsize;
1419 START_PROFILE(SMBdskattr);
1420
1421 if (get_dfree_info(conn,".",True,&bsize,&dfree,&dsize) == (uint64_t)-1) {
1422 reply_nterror(req, map_nt_error_from_unix(errno));
1423 END_PROFILE(SMBdskattr);
1424 return;
1425 }
1426
1427 reply_outbuf(req, 5, 0);
1428
1429 if (get_Protocol() <= PROTOCOL_LANMAN2) {
1430 double total_space, free_space;
1431 /* we need to scale this to a number that DOS6 can handle. We
1432 use floating point so we can handle large drives on systems
1433 that don't have 64 bit integers
1434
1435 we end up displaying a maximum of 2G to DOS systems
1436 */
1437 total_space = dsize * (double)bsize;
1438 free_space = dfree * (double)bsize;
1439
1440 dsize = (uint64_t)((total_space+63*512) / (64*512));
1441 dfree = (uint64_t)((free_space+63*512) / (64*512));
1442
1443 if (dsize > 0xFFFF) dsize = 0xFFFF;
1444 if (dfree > 0xFFFF) dfree = 0xFFFF;
1445
1446 SSVAL(req->outbuf,smb_vwv0,dsize);
1447 SSVAL(req->outbuf,smb_vwv1,64); /* this must be 64 for dos systems */
1448 SSVAL(req->outbuf,smb_vwv2,512); /* and this must be 512 */
1449 SSVAL(req->outbuf,smb_vwv3,dfree);
1450 } else {
1451 SSVAL(req->outbuf,smb_vwv0,dsize);
1452 SSVAL(req->outbuf,smb_vwv1,bsize/512);
1453 SSVAL(req->outbuf,smb_vwv2,512);
1454 SSVAL(req->outbuf,smb_vwv3,dfree);
1455 }
1456
1457 DEBUG(3,("dskattr dfree=%d\n", (unsigned int)dfree));
1458
1459 END_PROFILE(SMBdskattr);
1460 return;
1461 }
1462
1463 /*
1464 * Utility function to split the filename from the directory.
1465 */
1466 static NTSTATUS split_fname_dir_mask(TALLOC_CTX *ctx, const char *fname_in,
1467 char **fname_dir_out,
1468 char **fname_mask_out)
1469 {
1470 const char *p = NULL;
1471 char *fname_dir = NULL;
1472 char *fname_mask = NULL;
1473
1474 p = strrchr_m(fname_in, '/');
1475 if (!p) {
1476 fname_dir = talloc_strdup(ctx, ".");
1477 fname_mask = talloc_strdup(ctx, fname_in);
1478 } else {
1479 fname_dir = talloc_strndup(ctx, fname_in,
1480 PTR_DIFF(p, fname_in));
1481 fname_mask = talloc_strdup(ctx, p+1);
1482 }
1483
1484 if (!fname_dir || !fname_mask) {
1485 TALLOC_FREE(fname_dir);
1486 TALLOC_FREE(fname_mask);
1487 return NT_STATUS_NO_MEMORY;
1488 }
1489
1490 *fname_dir_out = fname_dir;
1491 *fname_mask_out = fname_mask;
1492 return NT_STATUS_OK;
1493 }
1494
1495 /****************************************************************************
1496 Reply to a search.
1497 Can be called from SMBsearch, SMBffirst or SMBfunique.
1498 ****************************************************************************/
1499
1500 void reply_search(struct smb_request *req)
1501 {
1502 connection_struct *conn = req->conn;
1503 char *path = NULL;
1504 const char *mask = NULL;
1505 char *directory = NULL;
1506 struct smb_filename *smb_fname = NULL;
1507 char *fname = NULL;
1508 off_t size;
1509 uint32 mode;
1510 struct timespec date;
1511 uint32 dirtype;
1512 unsigned int numentries = 0;
1513 unsigned int maxentries = 0;
1514 bool finished = False;
1515 const char *p;
1516 int status_len;
1517 char status[21];
1518 int dptr_num= -1;
1519 bool check_descend = False;
1520 bool expect_close = False;
1521 NTSTATUS nt_status;
1522 bool mask_contains_wcard = False;
1523 bool allow_long_path_components = (req->flags2 & FLAGS2_LONG_PATH_COMPONENTS) ? True : False;
1524 TALLOC_CTX *ctx = talloc_tos();
1525 bool ask_sharemode = lp_parm_bool(SNUM(conn), "smbd", "search ask sharemode", true);
1526 struct dptr_struct *dirptr = NULL;
1527 struct smbd_server_connection *sconn = req->sconn;
1528
1529 START_PROFILE(SMBsearch);
1530
1531 if (req->wct < 2) {
1532 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1533 goto out;
1534 }
1535
1536 if (lp_posix_pathnames()) {
1537 reply_unknown_new(req, req->cmd);
1538 goto out;
1539 }
1540
1541 /* If we were called as SMBffirst then we must expect close. */
1542 if(req->cmd == SMBffirst) {
1543 expect_close = True;
1544 }
1545
1546 reply_outbuf(req, 1, 3);
1547 maxentries = SVAL(req->vwv+0, 0);
1548 dirtype = SVAL(req->vwv+1, 0);
1549 p = (const char *)req->buf + 1;
1550 p += srvstr_get_path_req_wcard(ctx, req, &path, p, STR_TERMINATE,
1551 &nt_status, &mask_contains_wcard);
1552 if (!NT_STATUS_IS_OK(nt_status)) {
1553 reply_nterror(req, nt_status);
1554 goto out;
1555 }
1556
1557 p++;
1558 status_len = SVAL(p, 0);
1559 p += 2;
1560
1561 /* dirtype &= ~FILE_ATTRIBUTE_DIRECTORY; */
1562
1563 if (status_len == 0) {
1564 nt_status = filename_convert(ctx, conn,
1565 req->flags2 & FLAGS2_DFS_PATHNAMES,
1566 path,
1567 UCF_ALWAYS_ALLOW_WCARD_LCOMP,
1568 &mask_contains_wcard,
1569 &smb_fname);
1570 if (!NT_STATUS_IS_OK(nt_status)) {
1571 if (NT_STATUS_EQUAL(nt_status,NT_STATUS_PATH_NOT_COVERED)) {
1572 reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
1573 ERRSRV, ERRbadpath);
1574 goto out;
1575 }
1576 reply_nterror(req, nt_status);
1577 goto out;
1578 }
1579
1580 directory = smb_fname->base_name;
1581
1582 p = strrchr_m(directory,'/');
1583 if ((p != NULL) && (*directory != '/')) {
1584 mask = p + 1;
1585 directory = talloc_strndup(ctx, directory,
1586 PTR_DIFF(p, directory));
1587 } else {
1588 mask = directory;
1589 directory = talloc_strdup(ctx,".");
1590 }
1591
1592 if (!directory) {
1593 reply_nterror(req, NT_STATUS_NO_MEMORY);
1594 goto out;
1595 }
1596
1597 memset((char *)status,'\0',21);
1598 SCVAL(status,0,(dirtype & 0x1F));
1599
1600 nt_status = dptr_create(conn,
1601 NULL, /* req */
1602 NULL, /* fsp */
1603 directory,
1604 True,
1605 expect_close,
1606 req->smbpid,
1607 mask,
1608 mask_contains_wcard,
1609 dirtype,
1610 &dirptr);
1611 if (!NT_STATUS_IS_OK(nt_status)) {
1612 reply_nterror(req, nt_status);
1613 goto out;
1614 }
1615 dptr_num = dptr_dnum(dirptr);
1616 } else {
1617 int status_dirtype;
1618 const char *dirpath;
1619
1620 memcpy(status,p,21);
1621 status_dirtype = CVAL(status,0) & 0x1F;
1622 if (status_dirtype != (dirtype & 0x1F)) {
1623 dirtype = status_dirtype;
1624 }
1625
1626 dirptr = dptr_fetch(sconn, status+12,&dptr_num);
1627 if (!dirptr) {
1628 goto SearchEmpty;
1629 }
1630 dirpath = dptr_path(sconn, dptr_num);
1631 directory = talloc_strdup(ctx, dirpath);
1632 if (!directory) {
1633 reply_nterror(req, NT_STATUS_NO_MEMORY);
1634 goto out;
1635 }
1636
1637 mask = dptr_wcard(sconn, dptr_num);
1638 if (!mask) {
1639 goto SearchEmpty;
1640 }
1641 /*
1642 * For a 'continue' search we have no string. So
1643 * check from the initial saved string.
1644 */
1645 mask_contains_wcard = ms_has_wild(mask);
1646 dirtype = dptr_attr(sconn, dptr_num);
1647 }
1648
1649 DEBUG(4,("dptr_num is %d\n",dptr_num));
1650
1651 /* Initialize per SMBsearch/SMBffirst/SMBfunique operation data */
1652 dptr_init_search_op(dirptr);
1653
1654 if ((dirtype&0x1F) == FILE_ATTRIBUTE_VOLUME) {
1655 char buf[DIR_STRUCT_SIZE];
1656 memcpy(buf,status,21);
1657 if (!make_dir_struct(ctx,buf,"???????????",volume_label(ctx, SNUM(conn)),
1658 0,FILE_ATTRIBUTE_VOLUME,0,!allow_long_path_components)) {
1659 reply_nterror(req, NT_STATUS_NO_MEMORY);
1660 goto out;
1661 }
1662 dptr_fill(sconn, buf+12,dptr_num);
1663 if (dptr_zero(buf+12) && (status_len==0)) {
1664 numentries = 1;
1665 } else {
1666 numentries = 0;
1667 }
1668 if (message_push_blob(&req->outbuf,
1669 data_blob_const(buf, sizeof(buf)))
1670 == -1) {
1671 reply_nterror(req, NT_STATUS_NO_MEMORY);
1672 goto out;
1673 }
1674 } else {
1675 unsigned int i;
1676 maxentries = MIN(
1677 maxentries,
1678 ((BUFFER_SIZE -
1679 ((uint8 *)smb_buf(req->outbuf) + 3 - req->outbuf))
1680 /DIR_STRUCT_SIZE));
1681
1682 DEBUG(8,("dirpath=<%s> dontdescend=<%s>\n",
1683 directory,lp_dontdescend(ctx, SNUM(conn))));
1684 if (in_list(directory, lp_dontdescend(ctx, SNUM(conn)),True)) {
1685 check_descend = True;
1686 }
1687
1688 for (i=numentries;(i<maxentries) && !finished;i++) {
1689 finished = !get_dir_entry(ctx,
1690 dirptr,
1691 mask,
1692 dirtype,
1693 &fname,
1694 &size,
1695 &mode,
1696 &date,
1697 check_descend,
1698 ask_sharemode);
1699 if (!finished) {
1700 char buf[DIR_STRUCT_SIZE];
1701 memcpy(buf,status,21);
1702 if (!make_dir_struct(ctx,
1703 buf,
1704 mask,
1705 fname,
1706 size,
1707 mode,
1708 convert_timespec_to_time_t(date),
1709 !allow_long_path_components)) {
1710 reply_nterror(req, NT_STATUS_NO_MEMORY);
1711 goto out;
1712 }
1713 if (!dptr_fill(sconn, buf+12,dptr_num)) {
1714 break;
1715 }
1716 if (message_push_blob(&req->outbuf,
1717 data_blob_const(buf, sizeof(buf)))
1718 == -1) {
1719 reply_nterror(req, NT_STATUS_NO_MEMORY);
1720 goto out;
1721 }
1722 numentries++;
1723 }
1724 }
1725 }
1726
1727 SearchEmpty:
1728
1729 /* If we were called as SMBffirst with smb_search_id == NULL
1730 and no entries were found then return error and close dirptr
1731 (X/Open spec) */
1732
1733 if (numentries == 0) {
1734 dptr_close(sconn, &dptr_num);
1735 } else if(expect_close && status_len == 0) {
1736 /* Close the dptr - we know it's gone */
1737 dptr_close(sconn, &dptr_num);
1738 }
1739
1740 /* If we were called as SMBfunique, then we can close the dirptr now ! */
1741 if(dptr_num >= 0 && req->cmd == SMBfunique) {
1742 dptr_close(sconn, &dptr_num);
1743 }
1744
1745 if ((numentries == 0) && !mask_contains_wcard) {
1746 reply_botherror(req, STATUS_NO_MORE_FILES, ERRDOS, ERRnofiles);
1747 goto out;
1748 }
1749
1750 SSVAL(req->outbuf,smb_vwv0,numentries);
1751 SSVAL(req->outbuf,smb_vwv1,3 + numentries * DIR_STRUCT_SIZE);
1752 SCVAL(smb_buf(req->outbuf),0,5);
1753 SSVAL(smb_buf(req->outbuf),1,numentries*DIR_STRUCT_SIZE);
1754
1755 /* The replies here are never long name. */
1756 SSVAL(req->outbuf, smb_flg2,
1757 SVAL(req->outbuf, smb_flg2) & (~FLAGS2_IS_LONG_NAME));
1758 if (!allow_long_path_components) {
1759 SSVAL(req->outbuf, smb_flg2,
1760 SVAL(req->outbuf, smb_flg2)
1761 & (~FLAGS2_LONG_PATH_COMPONENTS));
1762 }
1763
1764 /* This SMB *always* returns ASCII names. Remove the unicode bit in flags2. */
1765 SSVAL(req->outbuf, smb_flg2,
1766 (SVAL(req->outbuf, smb_flg2) & (~FLAGS2_UNICODE_STRINGS)));
1767
1768 DEBUG(4,("%s mask=%s path=%s dtype=%d nument=%u of %u\n",
1769 smb_fn_name(req->cmd),
1770 mask,
1771 directory,
1772 dirtype,
1773 numentries,
1774 maxentries ));
1775 out:
1776 TALLOC_FREE(directory);
1777 TALLOC_FREE(smb_fname);
1778 END_PROFILE(SMBsearch);
1779 return;
1780 }
1781
1782 /****************************************************************************
1783 Reply to a fclose (stop directory search).
1784 ****************************************************************************/
1785
1786 void reply_fclose(struct smb_request *req)
1787 {
1788 int status_len;
1789 char status[21];
1790 int dptr_num= -2;
1791 const char *p;
1792 char *path = NULL;
1793 NTSTATUS err;
1794 bool path_contains_wcard = False;
1795 TALLOC_CTX *ctx = talloc_tos();
1796 struct smbd_server_connection *sconn = req->sconn;
1797
1798 START_PROFILE(SMBfclose);
1799
1800 if (lp_posix_pathnames()) {
1801 reply_unknown_new(req, req->cmd);
1802 END_PROFILE(SMBfclose);
1803 return;
1804 }
1805
1806 p = (const char *)req->buf + 1;
1807 p += srvstr_get_path_req_wcard(ctx, req, &path, p, STR_TERMINATE,
1808 &err, &path_contains_wcard);
1809 if (!NT_STATUS_IS_OK(err)) {
1810 reply_nterror(req, err);
1811 END_PROFILE(SMBfclose);
1812 return;
1813 }
1814 p++;
1815 status_len = SVAL(p,0);
1816 p += 2;
1817
1818 if (status_len == 0) {
1819 reply_force_doserror(req, ERRSRV, ERRsrverror);
1820 END_PROFILE(SMBfclose);
1821 return;
1822 }
1823
1824 memcpy(status,p,21);
1825
1826 if(dptr_fetch(sconn, status+12,&dptr_num)) {
1827 /* Close the dptr - we know it's gone */
1828 dptr_close(sconn, &dptr_num);
1829 }
1830
1831 reply_outbuf(req, 1, 0);
1832 SSVAL(req->outbuf,smb_vwv0,0);
1833
1834 DEBUG(3,("search close\n"));
1835
1836 END_PROFILE(SMBfclose);
1837 return;
1838 }
1839
1840 /****************************************************************************
1841 Reply to an open.
1842 ****************************************************************************/
1843
1844 void reply_open(struct smb_request *req)
1845 {
1846 connection_struct *conn = req->conn;
1847 struct smb_filename *smb_fname = NULL;
1848 char *fname = NULL;
1849 uint32 fattr=0;
1850 off_t size = 0;
1851 time_t mtime=0;
1852 int info;
1853 files_struct *fsp;
1854 int oplock_request;
1855 int deny_mode;
1856 uint32 dos_attr;
1857 uint32 access_mask;
1858 uint32 share_mode;
1859 uint32 create_disposition;
1860 uint32 create_options = 0;
1861 uint32_t private_flags = 0;
1862 NTSTATUS status;
1863 bool ask_sharemode = lp_parm_bool(SNUM(conn), "smbd", "search ask sharemode", true);
1864 TALLOC_CTX *ctx = talloc_tos();
1865
1866 START_PROFILE(SMBopen);
1867
1868 if (req->wct < 2) {
1869 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1870 goto out;
1871 }
1872
1873 oplock_request = CORE_OPLOCK_REQUEST(req->inbuf);
1874 deny_mode = SVAL(req->vwv+0, 0);
1875 dos_attr = SVAL(req->vwv+1, 0);
1876
1877 srvstr_get_path_req(ctx, req, &fname, (const char *)req->buf+1,
1878 STR_TERMINATE, &status);
1879 if (!NT_STATUS_IS_OK(status)) {
1880 reply_nterror(req, status);
1881 goto out;
1882 }
1883
1884 status = filename_convert(ctx,
1885 conn,
1886 req->flags2 & FLAGS2_DFS_PATHNAMES,
1887 fname,
1888 0,
1889 NULL,
1890 &smb_fname);
1891 if (!NT_STATUS_IS_OK(status)) {
1892 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
1893 reply_botherror(req,
1894 NT_STATUS_PATH_NOT_COVERED,
1895 ERRSRV, ERRbadpath);
1896 goto out;
1897 }
1898 reply_nterror(req, status);
1899 goto out;
1900 }
1901
1902 if (!map_open_params_to_ntcreate(smb_fname->base_name, deny_mode,
1903 OPENX_FILE_EXISTS_OPEN, &access_mask,
1904 &share_mode, &create_disposition,
1905 &create_options, &private_flags)) {
1906 reply_force_doserror(req, ERRDOS, ERRbadaccess);
1907 goto out;
1908 }
1909
1910 status = SMB_VFS_CREATE_FILE(
1911 conn, /* conn */
1912 req, /* req */
1913 0, /* root_dir_fid */
1914 smb_fname, /* fname */
1915 access_mask, /* access_mask */
1916 share_mode, /* share_access */
1917 create_disposition, /* create_disposition*/
1918 create_options, /* create_options */
1919 dos_attr, /* file_attributes */
1920 oplock_request, /* oplock_request */
1921 0, /* allocation_size */
1922 private_flags,
1923 NULL, /* sd */
1924 NULL, /* ea_list */
1925 &fsp, /* result */
1926 &info); /* pinfo */
1927
1928 if (!NT_STATUS_IS_OK(status)) {
1929 if (open_was_deferred(req->sconn, req->mid)) {
1930 /* We have re-scheduled this call. */
1931 goto out;
1932 }
1933 reply_openerror(req, status);
1934 goto out;
1935 }
1936
1937 size = smb_fname->st.st_ex_size;
1938 fattr = dos_mode(conn, smb_fname);
1939
1940 /* Deal with other possible opens having a modified
1941 write time. JRA. */
1942 if (ask_sharemode) {
1943 struct timespec write_time_ts;
1944
1945 ZERO_STRUCT(write_time_ts);
1946 get_file_infos(fsp->file_id, 0, NULL, &write_time_ts);
1947 if (!null_timespec(write_time_ts)) {
1948 update_stat_ex_mtime(&smb_fname->st, write_time_ts);
1949 }
1950 }
1951
1952 mtime = convert_timespec_to_time_t(smb_fname->st.st_ex_mtime);
1953
1954 if (fattr & FILE_ATTRIBUTE_DIRECTORY) {
1955 DEBUG(3,("attempt to open a directory %s\n",
1956 fsp_str_dbg(fsp)));
1957 close_file(req, fsp, ERROR_CLOSE);
1958 reply_botherror(req, NT_STATUS_ACCESS_DENIED,
1959 ERRDOS, ERRnoaccess);
1960 goto out;
1961 }
1962
1963 reply_outbuf(req, 7, 0);
1964 SSVAL(req->outbuf,smb_vwv0,fsp->fnum);
1965 SSVAL(req->outbuf,smb_vwv1,fattr);
1966 if(lp_dos_filetime_resolution(SNUM(conn)) ) {
1967 srv_put_dos_date3((char *)req->outbuf,smb_vwv2,mtime & ~1);
1968 } else {
1969 srv_put_dos_date3((char *)req->outbuf,smb_vwv2,mtime);
1970 }
1971 SIVAL(req->outbuf,smb_vwv4,(uint32)size);
1972 SSVAL(req->outbuf,smb_vwv6,deny_mode);
1973
1974 if (oplock_request && lp_fake_oplocks(SNUM(conn))) {
1975 SCVAL(req->outbuf,smb_flg,
1976 CVAL(req->outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
1977 }
1978
1979 if(EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) {
1980 SCVAL(req->outbuf,smb_flg,
1981 CVAL(req->outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
1982 }
1983 out:
1984 TALLOC_FREE(smb_fname);
1985 END_PROFILE(SMBopen);
1986 return;
1987 }
1988
1989 /****************************************************************************
1990 Reply to an open and X.
1991 ****************************************************************************/
1992
1993 void reply_open_and_X(struct smb_request *req)
1994 {
1995 connection_struct *conn = req->conn;
1996 struct smb_filename *smb_fname = NULL;
1997 char *fname = NULL;
1998 uint16 open_flags;
1999 int deny_mode;
2000 uint32 smb_attr;
2001 /* Breakout the oplock request bits so we can set the
2002 reply bits separately. */
2003 int ex_oplock_request;
2004 int core_oplock_request;
2005 int oplock_request;
2006 #if 0
2007 int smb_sattr = SVAL(req->vwv+4, 0);
2008 uint32 smb_time = make_unix_date3(req->vwv+6);
2009 #endif
2010 int smb_ofun;
2011 uint32 fattr=0;
2012 int mtime=0;
2013 int smb_action = 0;
2014 files_struct *fsp;
2015 NTSTATUS status;
2016 uint64_t allocation_size;
2017 ssize_t retval = -1;
2018 uint32 access_mask;
2019 uint32 share_mode;
2020 uint32 create_disposition;
2021 uint32 create_options = 0;
2022 uint32_t private_flags = 0;
2023 TALLOC_CTX *ctx = talloc_tos();
2024
2025 START_PROFILE(SMBopenX);
2026
2027 if (req->wct < 15) {
2028 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
2029 goto out;
2030 }
2031
2032 open_flags = SVAL(req->vwv+2, 0);
2033 deny_mode = SVAL(req->vwv+3, 0);
2034 smb_attr = SVAL(req->vwv+5, 0);
2035 ex_oplock_request = EXTENDED_OPLOCK_REQUEST(req->inbuf);
2036 core_oplock_request = CORE_OPLOCK_REQUEST(req->inbuf);
2037 oplock_request = ex_oplock_request | core_oplock_request;
2038 smb_ofun = SVAL(req->vwv+8, 0);
2039 allocation_size = (uint64_t)IVAL(req->vwv+9, 0);
2040
2041 /* If it's an IPC, pass off the pipe handler. */
2042 if (IS_IPC(conn)) {
2043 if (lp_nt_pipe_support()) {
2044 reply_open_pipe_and_X(conn, req);
2045 } else {
2046 reply_nterror(req, NT_STATUS_NETWORK_ACCESS_DENIED);
2047 }
2048 goto out;
2049 }
2050
2051 /* XXXX we need to handle passed times, sattr and flags */
2052 srvstr_get_path_req(ctx, req, &fname, (const char *)req->buf,
2053 STR_TERMINATE, &status);
2054 if (!NT_STATUS_IS_OK(status)) {
2055 reply_nterror(req, status);
2056 goto out;
2057 }
2058
2059 status = filename_convert(ctx,
2060 conn,
2061 req->flags2 & FLAGS2_DFS_PATHNAMES,
2062 fname,
2063 0,
2064 NULL,
2065 &smb_fname);
2066 if (!NT_STATUS_IS_OK(status)) {
2067 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
2068 reply_botherror(req,
2069 NT_STATUS_PATH_NOT_COVERED,
2070 ERRSRV, ERRbadpath);
2071 goto out;
2072 }
2073 reply_nterror(req, status);
2074 goto out;
2075 }
2076
2077 if (!map_open_params_to_ntcreate(smb_fname->base_name, deny_mode,
2078 smb_ofun,
2079 &access_mask, &share_mode,
2080 &create_disposition,
2081 &create_options,
2082 &private_flags)) {
2083 reply_force_doserror(req, ERRDOS, ERRbadaccess);
2084 goto out;
2085 }
2086
2087 status = SMB_VFS_CREATE_FILE(
2088 conn, /* conn */
2089 req, /* req */
2090 0, /* root_dir_fid */
2091 smb_fname, /* fname */
2092 access_mask, /* access_mask */
2093 share_mode, /* share_access */
2094 create_disposition, /* create_disposition*/
2095 create_options, /* create_options */
2096 smb_attr, /* file_attributes */
2097 oplock_request, /* oplock_request */
2098 0, /* allocation_size */
2099 private_flags,
2100 NULL, /* sd */
2101 NULL, /* ea_list */
2102 &fsp, /* result */
2103 &smb_action); /* pinfo */
2104
2105 if (!NT_STATUS_IS_OK(status)) {
2106 if (open_was_deferred(req->sconn, req->mid)) {
2107 /* We have re-scheduled this call. */
2108 goto out;
2109 }
2110 reply_openerror(req, status);
2111 goto out;
2112 }
2113
2114 /* Setting the "size" field in vwv9 and vwv10 causes the file to be set to this size,
2115 if the file is truncated or created. */
2116 if (((smb_action == FILE_WAS_CREATED) || (smb_action == FILE_WAS_OVERWRITTEN)) && allocation_size) {
2117 fsp->initial_allocation_size = smb_roundup(fsp->conn, allocation_size);
2118 if (vfs_allocate_file_space(fsp, fsp->initial_allocation_size) == -1) {
2119 close_file(req, fsp, ERROR_CLOSE);
2120 reply_nterror(req, NT_STATUS_DISK_FULL);
2121 goto out;
2122 }
2123 retval = vfs_set_filelen(fsp, (off_t)allocation_size);
2124 if (retval < 0) {
2125 close_file(req, fsp, ERROR_CLOSE);
2126 reply_nterror(req, NT_STATUS_DISK_FULL);
2127 goto out;
2128 }
2129 status = vfs_stat_fsp(fsp);
2130 if (!NT_STATUS_IS_OK(status)) {
2131 close_file(req, fsp, ERROR_CLOSE);
2132 reply_nterror(req, status);
2133 goto out;
2134 }
2135 }
2136
2137 fattr = dos_mode(conn, fsp->fsp_name);
2138 mtime = convert_timespec_to_time_t(fsp->fsp_name->st.st_ex_mtime);
2139 if (fattr & FILE_ATTRIBUTE_DIRECTORY) {
2140 close_file(req, fsp, ERROR_CLOSE);
2141 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
2142 goto out;
2143 }
2144
2145 /* If the caller set the extended oplock request bit
2146 and we granted one (by whatever means) - set the
2147 correct bit for extended oplock reply.
2148 */
2149
2150 if (ex_oplock_request && lp_fake_oplocks(SNUM(conn))) {
2151 smb_action |= EXTENDED_OPLOCK_GRANTED;
2152 }
2153
2154 if(ex_oplock_request && EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) {
2155 smb_action |= EXTENDED_OPLOCK_GRANTED;
2156 }
2157
2158 /* If the caller set the core oplock request bit
2159 and we granted one (by whatever means) - set the
2160 correct bit for core oplock reply.
2161 */
2162
2163 if (open_flags & EXTENDED_RESPONSE_REQUIRED) {
2164 reply_outbuf(req, 19, 0);
2165 } else {
2166 reply_outbuf(req, 15, 0);
2167 }
2168
2169 SSVAL(req->outbuf, smb_vwv0, 0xff); /* andx chain ends */
2170 SSVAL(req->outbuf, smb_vwv1, 0); /* no andx offset */
2171
2172 if (core_oplock_request && lp_fake_oplocks(SNUM(conn))) {
2173 SCVAL(req->outbuf, smb_flg,
2174 CVAL(req->outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
2175 }
2176
2177 if(core_oplock_request && EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) {
2178 SCVAL(req->outbuf, smb_flg,
2179 CVAL(req->outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
2180 }
2181
2182 SSVAL(req->outbuf,smb_vwv2,fsp->fnum);
2183 SSVAL(req->outbuf,smb_vwv3,fattr);
2184 if(lp_dos_filetime_resolution(SNUM(conn)) ) {
2185 srv_put_dos_date3((char *)req->outbuf,smb_vwv4,mtime & ~1);
2186 } else {
2187 srv_put_dos_date3((char *)req->outbuf,smb_vwv4,mtime);
2188 }
2189 SIVAL(req->outbuf,smb_vwv6,(uint32)fsp->fsp_name->st.st_ex_size);
2190 SSVAL(req->outbuf,smb_vwv8,GET_OPENX_MODE(deny_mode));
2191 SSVAL(req->outbuf,smb_vwv11,smb_action);
2192
2193 if (open_flags & EXTENDED_RESPONSE_REQUIRED) {
2194 SIVAL(req->outbuf, smb_vwv15, SEC_STD_ALL);
2195 }
2196
2197 out:
2198 TALLOC_FREE(smb_fname);
2199 END_PROFILE(SMBopenX);
2200 return;
2201 }
2202
2203 /****************************************************************************
2204 Reply to a SMBulogoffX.
2205 ****************************************************************************/
2206
2207 void reply_ulogoffX(struct smb_request *req)
2208 {
2209 struct smbd_server_connection *sconn = req->sconn;
2210 struct user_struct *vuser;
2211 struct smbXsrv_session *session = NULL;
2212 NTSTATUS status;
2213
2214 START_PROFILE(SMBulogoffX);
2215
2216 vuser = get_valid_user_struct(sconn, req->vuid);
2217
2218 if(vuser == NULL) {
2219 DEBUG(3,("ulogoff, vuser id %llu does not map to user.\n",
2220 (unsigned long long)req->vuid));
2221
2222 req->vuid = UID_FIELD_INVALID;
2223 reply_force_doserror(req, ERRSRV, ERRbaduid);
2224 END_PROFILE(SMBulogoffX);
2225 return;
2226 }
2227
2228 session = vuser->session;
2229 vuser = NULL;
2230
2231 /*
2232 * TODO: cancel all outstanding requests on the session
2233 */
2234 status = smbXsrv_session_logoff(session);
2235 if (!NT_STATUS_IS_OK(status)) {
2236 DEBUG(0, ("reply_ulogoff: "
2237 "smbXsrv_session_logoff() failed: %s\n",
2238 nt_errstr(status)));
2239 /*
2240 * If we hit this case, there is something completely
2241 * wrong, so we better disconnect the transport connection.
2242 */
2243 END_PROFILE(SMBulogoffX);
2244 exit_server(__location__ ": smbXsrv_session_logoff failed");
2245 return;
2246 }
2247
2248 TALLOC_FREE(session);
2249
2250 reply_outbuf(req, 2, 0);
2251 SSVAL(req->outbuf, smb_vwv0, 0xff); /* andx chain ends */
2252 SSVAL(req->outbuf, smb_vwv1, 0); /* no andx offset */
2253
2254 DEBUG(3, ("ulogoffX vuid=%llu\n",
2255 (unsigned long long)req->vuid));
2256
2257 END_PROFILE(SMBulogoffX);
2258 req->vuid = UID_FIELD_INVALID;
2259 }
2260
2261 /****************************************************************************
2262 Reply to a mknew or a create.
2263 ****************************************************************************/
2264
2265 void reply_mknew(struct smb_request *req)
2266 {
2267 connection_struct *conn = req->conn;
2268 struct smb_filename *smb_fname = NULL;
2269 char *fname = NULL;
2270 uint32 fattr = 0;
2271 struct smb_file_time ft;
2272 files_struct *fsp;
2273 int oplock_request = 0;
2274 NTSTATUS status;
2275 uint32 access_mask = FILE_GENERIC_READ | FILE_GENERIC_WRITE;
2276 uint32 share_mode = FILE_SHARE_READ|FILE_SHARE_WRITE;
2277 uint32 create_disposition;
2278 uint32 create_options = 0;
2279 TALLOC_CTX *ctx = talloc_tos();
2280
2281 START_PROFILE(SMBcreate);
2282 ZERO_STRUCT(ft);
2283
2284 if (req->wct < 3) {
2285 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
2286 goto out;
2287 }
2288
2289 fattr = SVAL(req->vwv+0, 0);
2290 oplock_request = CORE_OPLOCK_REQUEST(req->inbuf);
2291
2292 /* mtime. */
2293 ft.mtime = convert_time_t_to_timespec(srv_make_unix_date3(req->vwv+1));
2294
2295 srvstr_get_path_req(ctx, req, &fname, (const char *)req->buf + 1,
2296 STR_TERMINATE, &status);
2297 if (!NT_STATUS_IS_OK(status)) {
2298 reply_nterror(req, status);
2299 goto out;
2300 }
2301
2302 status = filename_convert(ctx,
2303 conn,
2304 req->flags2 & FLAGS2_DFS_PATHNAMES,
2305 fname,
2306 0,
2307 NULL,
2308 &smb_fname);
2309 if (!NT_STATUS_IS_OK(status)) {
2310 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
2311 reply_botherror(req,
2312 NT_STATUS_PATH_NOT_COVERED,
2313 ERRSRV, ERRbadpath);
2314 goto out;
2315 }
2316 reply_nterror(req, status);
2317 goto out;
2318 }
2319
2320 if (fattr & FILE_ATTRIBUTE_VOLUME) {
2321 DEBUG(0,("Attempt to create file (%s) with volid set - "
2322 "please report this\n",
2323 smb_fname_str_dbg(smb_fname)));
2324 }
2325
2326 if(req->cmd == SMBmknew) {
2327 /* We should fail if file exists. */
2328 create_disposition = FILE_CREATE;
2329 } else {
2330 /* Create if file doesn't exist, truncate if it does. */
2331 create_disposition = FILE_OVERWRITE_IF;
2332 }
2333
2334 status = SMB_VFS_CREATE_FILE(
2335 conn, /* conn */
2336 req, /* req */
2337 0, /* root_dir_fid */
2338 smb_fname, /* fname */
2339 access_mask, /* access_mask */
2340 share_mode, /* share_access */
2341 create_disposition, /* create_disposition*/
2342 create_options, /* create_options */
2343 fattr, /* file_attributes */
2344 oplock_request, /* oplock_request */
2345 0, /* allocation_size */
2346 0, /* private_flags */
2347 NULL, /* sd */
2348 NULL, /* ea_list */
2349 &fsp, /* result */
2350 NULL); /* pinfo */
2351
2352 if (!NT_STATUS_IS_OK(status)) {
2353 if (open_was_deferred(req->sconn, req->mid)) {
2354 /* We have re-scheduled this call. */
2355 goto out;
2356 }
2357 reply_openerror(req, status);
2358 goto out;
2359 }
2360
2361 ft.atime = smb_fname->st.st_ex_atime; /* atime. */
2362 status = smb_set_file_time(conn, fsp, smb_fname, &ft, true);
2363 if (!NT_STATUS_IS_OK(status)) {
2364 END_PROFILE(SMBcreate);
2365 goto out;
2366 }
2367
2368 reply_outbuf(req, 1, 0);
2369 SSVAL(req->outbuf,smb_vwv0,fsp->fnum);
2370
2371 if (oplock_request && lp_fake_oplocks(SNUM(conn))) {
2372 SCVAL(req->outbuf,smb_flg,
2373 CVAL(req->outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
2374 }
2375
2376 if(EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) {
2377 SCVAL(req->outbuf,smb_flg,
2378 CVAL(req->outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
2379 }
2380
2381 DEBUG(2, ("reply_mknew: file %s\n", smb_fname_str_dbg(smb_fname)));
2382 DEBUG(3, ("reply_mknew %s fd=%d dmode=0x%x\n",
2383 smb_fname_str_dbg(smb_fname), fsp->fh->fd,
2384 (unsigned int)fattr));
2385
2386 out:
2387 TALLOC_FREE(smb_fname);
2388 END_PROFILE(SMBcreate);
2389 return;
2390 }
2391
2392 /****************************************************************************
2393 Reply to a create temporary file.
2394 ****************************************************************************/
2395
2396 void reply_ctemp(struct smb_request *req)
2397 {
2398 connection_struct *conn = req->conn;
2399 struct smb_filename *smb_fname = NULL;
2400 char *fname = NULL;
2401 uint32 fattr;
2402 files_struct *fsp;
2403 int oplock_request;
2404 int tmpfd;
2405 char *s;
2406 NTSTATUS status;
2407 TALLOC_CTX *ctx = talloc_tos();
2408
2409 START_PROFILE(SMBctemp);
2410
2411 if (req->wct < 3) {
2412 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
2413 goto out;
2414 }
2415
2416 fattr = SVAL(req->vwv+0, 0);
2417 oplock_request = CORE_OPLOCK_REQUEST(req->inbuf);
2418
2419 srvstr_get_path_req(ctx, req, &fname, (const char *)req->buf+1,
2420 STR_TERMINATE, &status);
2421 if (!NT_STATUS_IS_OK(status)) {
2422 reply_nterror(req, status);
2423 goto out;
2424 }
2425 if (*fname) {
2426 fname = talloc_asprintf(ctx,
2427 "%s/TMXXXXXX",
2428 fname);
2429 } else {
2430 fname = talloc_strdup(ctx, "TMXXXXXX");
2431 }
2432
2433 if (!fname) {
2434 reply_nterror(req, NT_STATUS_NO_MEMORY);
2435 goto out;
2436 }
2437
2438 status = filename_convert(ctx, conn,
2439 req->flags2 & FLAGS2_DFS_PATHNAMES,
2440 fname,
2441 0,
2442 NULL,
2443 &smb_fname);
2444 if (!NT_STATUS_IS_OK(status)) {
2445 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
2446 reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
2447 ERRSRV, ERRbadpath);
2448 goto out;
2449 }
2450 reply_nterror(req, status);
2451 goto out;
2452 }
2453
2454 tmpfd = mkstemp(smb_fname->base_name);
2455 if (tmpfd == -1) {
2456 reply_nterror(req, map_nt_error_from_unix(errno));
2457 goto out;
2458 }
2459
2460 SMB_VFS_STAT(conn, smb_fname);
2461
2462 /* We should fail if file does not exist. */
2463 status = SMB_VFS_CREATE_FILE(
2464 conn, /* conn */
2465 req, /* req */
2466 0, /* root_dir_fid */
2467 smb_fname, /* fname */
2468 FILE_GENERIC_READ | FILE_GENERIC_WRITE, /* access_mask */
2469 FILE_SHARE_READ | FILE_SHARE_WRITE, /* share_access */
2470 FILE_OPEN, /* create_disposition*/
2471 0, /* create_options */
2472 fattr, /* file_attributes */
2473 oplock_request, /* oplock_request */
2474 0, /* allocation_size */
2475 0, /* private_flags */
2476 NULL, /* sd */
2477 NULL, /* ea_list */
2478 &fsp, /* result */
2479 NULL); /* pinfo */
2480
2481 /* close fd from mkstemp() */
2482 close(tmpfd);
2483
2484 if (!NT_STATUS_IS_OK(status)) {
2485 if (open_was_deferred(req->sconn, req->mid)) {
2486 /* We have re-scheduled this call. */
2487 goto out;
2488 }
2489 reply_openerror(req, status);
2490 goto out;
2491 }
2492
2493 reply_outbuf(req, 1, 0);
2494 SSVAL(req->outbuf,smb_vwv0,fsp->fnum);
2495
2496 /* the returned filename is relative to the directory */
2497 s = strrchr_m(fsp->fsp_name->base_name, '/');
2498 if (!s) {
2499 s = fsp->fsp_name->base_name;
2500 } else {
2501 s++;
2502 }
2503
2504 #if 0
2505 /* Tested vs W2K3 - this doesn't seem to be here - null terminated filename is the only
2506 thing in the byte section. JRA */
2507 SSVALS(p, 0, -1); /* what is this? not in spec */
2508 #endif
2509 if (message_push_string(&req->outbuf, s, STR_ASCII|STR_TERMINATE)
2510 == -1) {
2511 reply_nterror(req, NT_STATUS_NO_MEMORY);
2512 goto out;
2513 }
2514
2515 if (oplock_request && lp_fake_oplocks(SNUM(conn))) {
2516 SCVAL(req->outbuf, smb_flg,
2517 CVAL(req->outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
2518 }
2519
2520 if (EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) {
2521 SCVAL(req->outbuf, smb_flg,
2522 CVAL(req->outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
2523 }
2524
2525 DEBUG(2, ("reply_ctemp: created temp file %s\n", fsp_str_dbg(fsp)));
2526 DEBUG(3, ("reply_ctemp %s fd=%d umode=0%o\n", fsp_str_dbg(fsp),
2527 fsp->fh->fd, (unsigned int)smb_fname->st.st_ex_mode));
2528 out:
2529 TALLOC_FREE(smb_fname);
2530 END_PROFILE(SMBctemp);
2531 return;
2532 }
2533
2534 /*******************************************************************
2535 Check if a user is allowed to rename a file.
2536 ********************************************************************/
2537
2538 static NTSTATUS can_rename(connection_struct *conn, files_struct *fsp,
2539 uint16 dirtype)
2540 {
2541 if (!CAN_WRITE(conn)) {
2542 return NT_STATUS_MEDIA_WRITE_PROTECTED;
2543 }
2544
2545 if ((dirtype & (FILE_ATTRIBUTE_HIDDEN | FILE_ATTRIBUTE_SYSTEM)) !=
2546 (FILE_ATTRIBUTE_HIDDEN | FILE_ATTRIBUTE_SYSTEM)) {
2547 /* Only bother to read the DOS attribute if we might deny the
2548 rename on the grounds of attribute missmatch. */
2549 uint32_t fmode = dos_mode(conn, fsp->fsp_name);
2550 if ((fmode & ~dirtype) & (FILE_ATTRIBUTE_HIDDEN | FILE_ATTRIBUTE_SYSTEM)) {
2551 return NT_STATUS_NO_SUCH_FILE;
2552 }
2553 }
2554
2555 if (S_ISDIR(fsp->fsp_name->st.st_ex_mode)) {
2556 if (fsp->posix_open) {
2557 return NT_STATUS_OK;
2558 }
2559
2560 /* If no pathnames are open below this
2561 directory, allow the rename. */
2562
2563 if (file_find_subpath(fsp)) {
2564 return NT_STATUS_ACCESS_DENIED;
2565 }
2566 return NT_STATUS_OK;
2567 }
2568
2569 if (fsp->access_mask & (DELETE_ACCESS|FILE_WRITE_ATTRIBUTES)) {
2570 return NT_STATUS_OK;
2571 }
2572
2573 return NT_STATUS_ACCESS_DENIED;
2574 }
2575
2576 /*******************************************************************
2577 * unlink a file with all relevant access checks
2578 *******************************************************************/
2579
2580 static NTSTATUS do_unlink(connection_struct *conn,
2581 struct smb_request *req,
2582 struct smb_filename *smb_fname,
2583 uint32 dirtype)
2584 {
2585 uint32 fattr;
2586 files_struct *fsp;
2587 uint32 dirtype_orig = dirtype;
2588 NTSTATUS status;
2589 int ret;
2590 bool posix_paths = lp_posix_pathnames();
2591
2592 DEBUG(10,("do_unlink: %s, dirtype = %d\n",
2593 smb_fname_str_dbg(smb_fname),
2594 dirtype));
2595
2596 if (!CAN_WRITE(conn)) {
2597 return NT_STATUS_MEDIA_WRITE_PROTECTED;
2598 }
2599
2600 if (posix_paths) {
2601 ret = SMB_VFS_LSTAT(conn, smb_fname);
2602 } else {
2603 ret = SMB_VFS_STAT(conn, smb_fname);
2604 }
2605 if (ret != 0) {
2606 return map_nt_error_from_unix(errno);
2607 }
2608
2609 fattr = dos_mode(conn, smb_fname);
2610
2611 if (dirtype & FILE_ATTRIBUTE_NORMAL) {
2612 dirtype = FILE_ATTRIBUTE_DIRECTORY|FILE_ATTRIBUTE_ARCHIVE|FILE_ATTRIBUTE_READONLY;
2613 }
2614
2615 dirtype &= (FILE_ATTRIBUTE_DIRECTORY|FILE_ATTRIBUTE_ARCHIVE|FILE_ATTRIBUTE_READONLY|FILE_ATTRIBUTE_HIDDEN|FILE_ATTRIBUTE_SYSTEM);
2616 if (!dirtype) {
2617 return NT_STATUS_NO_SUCH_FILE;
2618 }
2619
2620 if (!dir_check_ftype(conn, fattr, dirtype)) {
2621 if (fattr & FILE_ATTRIBUTE_DIRECTORY) {
2622 return NT_STATUS_FILE_IS_A_DIRECTORY;
2623 }
2624 return NT_STATUS_NO_SUCH_FILE;
2625 }
2626
2627 if (dirtype_orig & 0x8000) {
2628 /* These will never be set for POSIX. */
2629 return NT_STATUS_NO_SUCH_FILE;
2630 }
2631
2632 #if 0
2633 if ((fattr & dirtype) & FILE_ATTRIBUTE_DIRECTORY) {
2634 return NT_STATUS_FILE_IS_A_DIRECTORY;
2635 }
2636
2637 if ((fattr & ~dirtype) & (FILE_ATTRIBUTE_HIDDEN|FILE_ATTRIBUTE_SYSTEM)) {
2638 return NT_STATUS_NO_SUCH_FILE;
2639 }
2640
2641 if (dirtype & 0xFF00) {
2642 /* These will never be set for POSIX. */
2643 return NT_STATUS_NO_SUCH_FILE;
2644 }
2645
2646 dirtype &= 0xFF;
2647 if (!dirtype) {
2648 return NT_STATUS_NO_SUCH_FILE;
2649 }
2650
2651 /* Can't delete a directory. */
2652 if (fattr & FILE_ATTRIBUTE_DIRECTORY) {
2653 return NT_STATUS_FILE_IS_A_DIRECTORY;
2654 }
2655 #endif
2656
2657 #if 0 /* JRATEST */
2658 else if (dirtype & FILE_ATTRIBUTE_DIRECTORY) /* Asked for a directory and it isn't. */
2659 return NT_STATUS_OBJECT_NAME_INVALID;
2660 #endif /* JRATEST */
2661
2662 /* On open checks the open itself will check the share mode, so
2663 don't do it here as we'll get it wrong. */
2664
2665 status = SMB_VFS_CREATE_FILE
2666 (conn, /* conn */
2667 req, /* req */
2668 0, /* root_dir_fid */
2669 smb_fname, /* fname */
2670 DELETE_ACCESS, /* access_mask */
2671 FILE_SHARE_NONE, /* share_access */
2672 FILE_OPEN, /* create_disposition*/
2673 FILE_NON_DIRECTORY_FILE, /* create_options */
2674 /* file_attributes */
2675 posix_paths ? FILE_FLAG_POSIX_SEMANTICS|0777 :
2676 FILE_ATTRIBUTE_NORMAL,
2677 0, /* oplock_request */
2678 0, /* allocation_size */
2679 0, /* private_flags */
2680 NULL, /* sd */
2681 NULL, /* ea_list */
2682 &fsp, /* result */
2683 NULL); /* pinfo */
2684
2685 if (!NT_STATUS_IS_OK(status)) {
2686 DEBUG(10, ("SMB_VFS_CREATEFILE failed: %s\n",
2687 nt_errstr(status)));
2688 return status;
2689 }
2690
2691 status = can_set_delete_on_close(fsp, fattr);
2692 if (!NT_STATUS_IS_OK(status)) {
2693 DEBUG(10, ("do_unlink can_set_delete_on_close for file %s - "
2694 "(%s)\n",
2695 smb_fname_str_dbg(smb_fname),
2696 nt_errstr(status)));
2697 close_file(req, fsp, NORMAL_CLOSE);
2698 return status;
2699 }
2700
2701 /* The set is across all open files on this dev/inode pair. */
2702 if (!set_delete_on_close(fsp, True,
2703 conn->session_info->security_token,
2704 conn->session_info->unix_token)) {
2705 close_file(req, fsp, NORMAL_CLOSE);
2706 return NT_STATUS_ACCESS_DENIED;
2707 }
2708
2709 return close_file(req, fsp, NORMAL_CLOSE);
2710 }
2711
2712 /****************************************************************************
2713 The guts of the unlink command, split out so it may be called by the NT SMB
2714 code.
2715 ****************************************************************************/
2716
2717 NTSTATUS unlink_internals(connection_struct *conn, struct smb_request *req,
2718 uint32 dirtype, struct smb_filename *smb_fname,
2719 bool has_wild)
2720 {
2721 char *fname_dir = NULL;
2722 char *fname_mask = NULL;
2723 int count=0;
2724 NTSTATUS status = NT_STATUS_OK;
2725 TALLOC_CTX *ctx = talloc_tos();
2726
2727 /* Split up the directory from the filename/mask. */
2728 status = split_fname_dir_mask(ctx, smb_fname->base_name,
2729 &fname_dir, &fname_mask);
2730 if (!NT_STATUS_IS_OK(status)) {
2731 goto out;
2732 }
2733
2734 /*
2735 * We should only check the mangled cache
2736 * here if unix_convert failed. This means
2737 * that the path in 'mask' doesn't exist
2738 * on the file system and so we need to look
2739 * for a possible mangle. This patch from
2740 * Tine Smukavec <valentin.smukavec@hermes.si>.
2741 */
2742
2743 if (!VALID_STAT(smb_fname->st) &&
2744 mangle_is_mangled(fname_mask, conn->params)) {
2745 char *new_mask = NULL;
2746 mangle_lookup_name_from_8_3(ctx, fname_mask,
2747 &new_mask, conn->params);
2748 if (new_mask) {
2749 TALLOC_FREE(fname_mask);
2750 fname_mask = new_mask;
2751 }
2752 }
2753
2754 if (!has_wild) {
2755
2756 /*
2757 * Only one file needs to be unlinked. Append the mask back
2758 * onto the directory.
2759 */
2760 TALLOC_FREE(smb_fname->base_name);
2761 if (ISDOT(fname_dir)) {
2762 /* Ensure we use canonical names on open. */
2763 smb_fname->base_name = talloc_asprintf(smb_fname,
2764 "%s",
2765 fname_mask);
2766 } else {
2767 smb_fname->base_name = talloc_asprintf(smb_fname,
2768 "%s/%s",
2769 fname_dir,
2770 fname_mask);
2771 }
2772 if (!smb_fname->base_name) {
2773 status = NT_STATUS_NO_MEMORY;
2774 goto out;
2775 }
2776 if (dirtype == 0) {
2777 dirtype = FILE_ATTRIBUTE_NORMAL;
2778 }
2779
2780 status = check_name(conn, smb_fname->base_name);
2781 if (!NT_STATUS_IS_OK(status)) {
2782 goto out;
2783 }
2784
2785 status = do_unlink(conn, req, smb_fname, dirtype);
2786 if (!NT_STATUS_IS_OK(status)) {
2787 goto out;
2788 }
2789
2790 count++;
2791 } else {
2792 struct smb_Dir *dir_hnd = NULL;
2793 long offset = 0;
2794 const char *dname = NULL;
2795 char *talloced = NULL;
2796
2797 if ((dirtype & SAMBA_ATTRIBUTES_MASK) == FILE_ATTRIBUTE_DIRECTORY) {
2798 status = NT_STATUS_OBJECT_NAME_INVALID;
2799 goto out;
2800 }
2801
2802 if (strequal(fname_mask,"????????.???")) {
2803 TALLOC_FREE(fname_mask);
2804 fname_mask = talloc_strdup(ctx, "*");
2805 if (!fname_mask) {
2806 status = NT_STATUS_NO_MEMORY;
2807 goto out;
2808 }
2809 }
2810
2811 status = check_name(conn, fname_dir);
2812 if (!NT_STATUS_IS_OK(status)) {
2813 goto out;
2814 }
2815
2816 dir_hnd = OpenDir(talloc_tos(), conn, fname_dir, fname_mask,
2817 dirtype);
2818 if (dir_hnd == NULL) {
2819 status = map_nt_error_from_unix(errno);
2820 goto out;
2821 }
2822
2823 /* XXXX the CIFS spec says that if bit0 of the flags2 field is set then
2824 the pattern matches against the long name, otherwise the short name
2825 We don't implement this yet XXXX
2826 */
2827
2828 status = NT_STATUS_NO_SUCH_FILE;
2829
2830 while ((dname = ReadDirName(dir_hnd, &offset,
2831 &smb_fname->st, &talloced))) {
2832 TALLOC_CTX *frame = talloc_stackframe();
2833
2834 if (!is_visible_file(conn, fname_dir, dname,
2835 &smb_fname->st, true)) {
2836 TALLOC_FREE(frame);
2837 TALLOC_FREE(talloced);
2838 continue;
2839 }
2840
2841 /* Quick check for "." and ".." */
2842 if (ISDOT(dname) || ISDOTDOT(dname)) {
2843 TALLOC_FREE(frame);
2844 TALLOC_FREE(talloced);
2845 continue;
2846 }
2847
2848 if(!mask_match(dname, fname_mask,
2849 conn->case_sensitive)) {
2850 TALLOC_FREE(frame);
2851 TALLOC_FREE(talloced);
2852 continue;
2853 }
2854
2855 TALLOC_FREE(smb_fname->base_name);
2856 if (ISDOT(fname_dir)) {
2857 /* Ensure we use canonical names on open. */
2858 smb_fname->base_name =
2859 talloc_asprintf(smb_fname, "%s",
2860 dname);
2861 } else {
2862 smb_fname->base_name =
2863 talloc_asprintf(smb_fname, "%s/%s",
2864 fname_dir, dname);
2865 }
2866
2867 if (!smb_fname->base_name) {
2868 TALLOC_FREE(dir_hnd);
2869 status = NT_STATUS_NO_MEMORY;
2870 TALLOC_FREE(frame);
2871 TALLOC_FREE(talloced);
2872 goto out;
2873 }
2874
2875 status = check_name(conn, smb_fname->base_name);
2876 if (!NT_STATUS_IS_OK(status)) {
2877 TALLOC_FREE(dir_hnd);
2878 TALLOC_FREE(frame);
2879 TALLOC_FREE(talloced);
2880 goto out;
2881 }
2882
2883 status = do_unlink(conn, req, smb_fname, dirtype);
2884 if (!NT_STATUS_IS_OK(status)) {
2885 TALLOC_FREE(frame);
2886 TALLOC_FREE(talloced);
2887 continue;
2888 }
2889
2890 count++;
2891 DEBUG(3,("unlink_internals: successful unlink [%s]\n",
2892 smb_fname->base_name));
2893
2894 TALLOC_FREE(frame);
2895 TALLOC_FREE(talloced);
2896 }
2897 TALLOC_FREE(dir_hnd);
2898 }
2899
2900 if (count == 0 && NT_STATUS_IS_OK(status) && errno != 0) {
2901 status = map_nt_error_from_unix(errno);
2902 }
2903
2904 out:
2905 TALLOC_FREE(fname_dir);
2906 TALLOC_FREE(fname_mask);
2907 return status;
2908 }
2909
2910 /****************************************************************************
2911 Reply to a unlink
2912 ****************************************************************************/
2913
2914 void reply_unlink(struct smb_request *req)
2915 {
2916 connection_struct *conn = req->conn;
2917 char *name = NULL;
2918 struct smb_filename *smb_fname = NULL;
2919 uint32 dirtype;
2920 NTSTATUS status;
2921 bool path_contains_wcard = False;
2922 TALLOC_CTX *ctx = talloc_tos();
2923
2924 START_PROFILE(SMBunlink);
2925
2926 if (req->wct < 1) {
2927 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
2928 goto out;
2929 }
2930
2931 dirtype = SVAL(req->vwv+0, 0);
2932
2933 srvstr_get_path_req_wcard(ctx, req, &name, (const char *)req->buf + 1,
2934 STR_TERMINATE, &status,
2935 &path_contains_wcard);
2936 if (!NT_STATUS_IS_OK(status)) {
2937 reply_nterror(req, status);
2938 goto out;
2939 }
2940
2941 status = filename_convert(ctx, conn,
2942 req->flags2 & FLAGS2_DFS_PATHNAMES,
2943 name,
2944 UCF_COND_ALLOW_WCARD_LCOMP,
2945 &path_contains_wcard,
2946 &smb_fname);
2947 if (!NT_STATUS_IS_OK(status)) {
2948 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
2949 reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
2950 ERRSRV, ERRbadpath);
2951 goto out;
2952 }
2953 reply_nterror(req, status);
2954 goto out;
2955 }
2956
2957 DEBUG(3,("reply_unlink : %s\n", smb_fname_str_dbg(smb_fname)));
2958
2959 status = unlink_internals(conn, req, dirtype, smb_fname,
2960 path_contains_wcard);
2961 if (!NT_STATUS_IS_OK(status)) {
2962 if (open_was_deferred(req->sconn, req->mid)) {
2963 /* We have re-scheduled this call. */
2964 goto out;
2965 }
2966 reply_nterror(req, status);
2967 goto out;
2968 }
2969
2970 reply_outbuf(req, 0, 0);
2971 out:
2972 TALLOC_FREE(smb_fname);
2973 END_PROFILE(SMBunlink);
2974 return;
2975 }
2976
2977 /****************************************************************************
2978 Fail for readbraw.
2979 ****************************************************************************/
2980
2981 static void fail_readraw(void)
2982 {
2983 const char *errstr = talloc_asprintf(talloc_tos(),
2984 "FAIL ! reply_readbraw: socket write fail (%s)",
2985 strerror(errno));
2986 if (!errstr) {
2987 errstr = "";
2988 }
2989 exit_server_cleanly(errstr);
2990 }
2991
2992 /****************************************************************************
2993 Fake (read/write) sendfile. Returns -1 on read or write fail.
2994 ****************************************************************************/
2995
2996 ssize_t fake_sendfile(files_struct *fsp, off_t startpos, size_t nread)
2997 {
2998 size_t bufsize;
2999 size_t tosend = nread;
3000 char *buf;
3001
3002 if (nread == 0) {
3003 return 0;
3004 }
3005
3006 bufsize = MIN(nread, 65536);
3007
3008 if (!(buf = SMB_MALLOC_ARRAY(char, bufsize))) {
3009 return -1;
3010 }
3011
3012 while (tosend > 0) {
3013 ssize_t ret;
3014 size_t cur_read;
3015
3016 if (tosend > bufsize) {
3017 cur_read = bufsize;
3018 } else {
3019 cur_read = tosend;
3020 }
3021 ret = read_file(fsp,buf,startpos,cur_read);
3022 if (ret == -1) {
3023 SAFE_FREE(buf);
3024 return -1;
3025 }
3026
3027 /* If we had a short read, fill with zeros. */
3028 if (ret < cur_read) {
3029 memset(buf + ret, '\0', cur_read - ret);
3030 }
3031
3032 if (write_data(fsp->conn->sconn->sock, buf, cur_read)
3033 != cur_read) {
3034 char addr[INET6_ADDRSTRLEN];
3035 /*
3036 * Try and give an error message saying what
3037 * client failed.
3038 */
3039 DEBUG(0, ("write_data failed for client %s. "
3040 "Error %s\n",
3041 get_peer_addr(fsp->conn->sconn->sock, addr,
3042 sizeof(addr)),
3043 strerror(errno)));
3044 SAFE_FREE(buf);
3045 return -1;
3046 }
3047 tosend -= cur_read;
3048 startpos += cur_read;
3049 }
3050
3051 SAFE_FREE(buf);
3052 return (ssize_t)nread;
3053 }
3054
3055 /****************************************************************************
3056 Deal with the case of sendfile reading less bytes from the file than
3057 requested. Fill with zeros (all we can do).
3058 ****************************************************************************/
3059
3060 void sendfile_short_send(files_struct *fsp,
3061 ssize_t nread,
3062 size_t headersize,
3063 size_t smb_maxcnt)
3064 {
3065 #define SHORT_SEND_BUFSIZE 1024
3066 if (nread < headersize) {
3067 DEBUG(0,("sendfile_short_send: sendfile failed to send "
3068 "header for file %s (%s). Terminating\n",
3069 fsp_str_dbg(fsp), strerror(errno)));
3070 exit_server_cleanly("sendfile_short_send failed");
3071 }
3072
3073 nread -= headersize;
3074
3075 if (nread < smb_maxcnt) {
3076 char *buf = SMB_CALLOC_ARRAY(char, SHORT_SEND_BUFSIZE);
3077 if (!buf) {
3078 exit_server_cleanly("sendfile_short_send: "
3079 "malloc failed");
3080 }
3081
3082 DEBUG(0,("sendfile_short_send: filling truncated file %s "
3083 "with zeros !\n", fsp_str_dbg(fsp)));
3084
3085 while (nread < smb_maxcnt) {
3086 /*
3087 * We asked for the real file size and told sendfile
3088 * to not go beyond the end of the file. But it can
3089 * happen that in between our fstat call and the
3090 * sendfile call the file was truncated. This is very
3091 * bad because we have already announced the larger
3092 * number of bytes to the client.
3093 *
3094 * The best we can do now is to send 0-bytes, just as
3095 * a read from a hole in a sparse file would do.
3096 *
3097 * This should happen rarely enough that I don't care
3098 * about efficiency here :-)
3099 */
3100 size_t to_write;
3101
3102 to_write = MIN(SHORT_SEND_BUFSIZE, smb_maxcnt - nread);
3103 if (write_data(fsp->conn->sconn->sock, buf, to_write)
3104 != to_write) {
3105 char addr[INET6_ADDRSTRLEN];
3106 /*
3107 * Try and give an error message saying what
3108 * client failed.
3109 */
3110 DEBUG(0, ("write_data failed for client %s. "
3111 "Error %s\n",
3112 get_peer_addr(
3113 fsp->conn->sconn->sock, addr,
3114 sizeof(addr)),
3115 strerror(errno)));
3116 exit_server_cleanly("sendfile_short_send: "
3117 "write_data failed");
3118 }
3119 nread += to_write;
3120 }
3121 SAFE_FREE(buf);
3122 }
3123 }
3124
3125 /****************************************************************************
3126 Return a readbraw error (4 bytes of zero).
3127 ****************************************************************************/
3128
3129 static void reply_readbraw_error(struct smbd_server_connection *sconn)
3130 {
3131 char header[4];
3132
3133 SIVAL(header,0,0);
3134
3135 smbd_lock_socket(sconn);
3136 if (write_data(sconn->sock,header,4) != 4) {
3137 char addr[INET6_ADDRSTRLEN];
3138 /*
3139 * Try and give an error message saying what
3140 * client failed.
3141 */
3142 DEBUG(0, ("write_data failed for client %s. "
3143 "Error %s\n",
3144 get_peer_addr(sconn->sock, addr, sizeof(addr)),
3145 strerror(errno)));
3146
3147 fail_readraw();
3148 }
3149 smbd_unlock_socket(sconn);
3150 }
3151
3152 /****************************************************************************
3153 Use sendfile in readbraw.
3154 ****************************************************************************/
3155
3156 static void send_file_readbraw(connection_struct *conn,
3157 struct smb_request *req,
3158 files_struct *fsp,
3159 off_t startpos,
3160 size_t nread,
3161 ssize_t mincount)
3162 {
3163 struct smbd_server_connection *sconn = req->sconn;
3164 char *outbuf = NULL;
3165 ssize_t ret=0;
3166
3167 /*
3168 * We can only use sendfile on a non-chained packet
3169 * but we can use on a non-oplocked file. tridge proved this
3170 * on a train in Germany :-). JRA.
3171 * reply_readbraw has already checked the length.
3172 */
3173
3174 if ( !req_is_in_chain(req) && (nread > 0) && (fsp->base_fsp == NULL) &&
3175 (fsp->wcp == NULL) &&
3176 lp_use_sendfile(SNUM(conn), req->sconn->smb1.signing_state) ) {
3177 ssize_t sendfile_read = -1;
3178 char header[4];
3179 DATA_BLOB header_blob;
3180
3181 _smb_setlen(header,nread);
3182 header_blob = data_blob_const(header, 4);
3183
3184 sendfile_read = SMB_VFS_SENDFILE(sconn->sock, fsp,
3185 &header_blob, startpos,
3186 nread);
3187 if (sendfile_read == -1) {
3188 /* Returning ENOSYS means no data at all was sent.
3189 * Do this as a normal read. */
3190 if (errno == ENOSYS) {
3191 goto normal_readbraw;
3192 }
3193
3194 /*
3195 * Special hack for broken Linux with no working sendfile. If we
3196 * return EINTR we sent the header but not the rest of the data.
3197 * Fake this up by doing read/write calls.
3198 */
3199 if (errno == EINTR) {
3200 /* Ensure we don't do this again. */
3201 set_use_sendfile(SNUM(conn), False);
3202 DEBUG(0,("send_file_readbraw: sendfile not available. Faking..\n"));
3203
3204 if (fake_sendfile(fsp, startpos, nread) == -1) {
3205 DEBUG(0,("send_file_readbraw: "
3206 "fake_sendfile failed for "
3207 "file %s (%s).\n",
3208 fsp_str_dbg(fsp),
3209 strerror(errno)));
3210 exit_server_cleanly("send_file_readbraw fake_sendfile failed");
3211 }
3212 return;
3213 }
3214
3215 DEBUG(0,("send_file_readbraw: sendfile failed for "
3216 "file %s (%s). Terminating\n",
3217 fsp_str_dbg(fsp), strerror(errno)));
3218 exit_server_cleanly("send_file_readbraw sendfile failed");
3219 } else if (sendfile_read == 0) {
3220 /*
3221 * Some sendfile implementations return 0 to indicate
3222 * that there was a short read, but nothing was
3223 * actually written to the socket. In this case,
3224 * fallback to the normal read path so the header gets
3225 * the correct byte count.
3226 */
3227 DEBUG(3, ("send_file_readbraw: sendfile sent zero "
3228 "bytes falling back to the normal read: "
3229 "%s\n", fsp_str_dbg(fsp)));
3230 goto normal_readbraw;
3231 }
3232
3233 /* Deal with possible short send. */
3234 if (sendfile_read != 4+nread) {
3235 sendfile_short_send(fsp, sendfile_read, 4, nread);
3236 }
3237 return;
3238 }
3239
3240 normal_readbraw:
3241
3242 outbuf = talloc_array(NULL, char, nread+4);
3243 if (!outbuf) {
3244 DEBUG(0,("send_file_readbraw: talloc_array failed for size %u.\n",
3245 (unsigned)(nread+4)));
3246 reply_readbraw_error(sconn);
3247 return;
3248 }
3249
3250 if (nread > 0) {
3251 ret = read_file(fsp,outbuf+4,startpos,nread);
3252 #if 0 /* mincount appears to be ignored in a W2K server. JRA. */
3253 if (ret < mincount)
3254 ret = 0;
3255 #else
3256 if (ret < nread)
3257 ret = 0;
3258 #endif
3259 }
3260
3261 _smb_setlen(outbuf,ret);
3262 if (write_data(sconn->sock, outbuf, 4+ret) != 4+ret) {
3263 char addr[INET6_ADDRSTRLEN];
3264 /*
3265 * Try and give an error message saying what
3266 * client failed.
3267 */
3268 DEBUG(0, ("write_data failed for client %s. "
3269 "Error %s\n",
3270 get_peer_addr(fsp->conn->sconn->sock, addr,
3271 sizeof(addr)),
3272 strerror(errno)));
3273
3274 fail_readraw();
3275 }
3276
3277 TALLOC_FREE(outbuf);
3278 }
3279
3280 /****************************************************************************
3281 Reply to a readbraw (core+ protocol).
3282 ****************************************************************************/
3283
3284 void reply_readbraw(struct smb_request *req)
3285 {
3286 connection_struct *conn = req->conn;
3287 struct smbd_server_connection *sconn = req->sconn;
3288 ssize_t maxcount,mincount;
3289 size_t nread = 0;
3290 off_t startpos;
3291 files_struct *fsp;
3292 struct lock_struct lock;
3293 off_t size = 0;
3294
3295 START_PROFILE(SMBreadbraw);
3296
3297 if (srv_is_signing_active(sconn) ||
3298 is_encrypted_packet(sconn, req->inbuf)) {
3299 exit_server_cleanly("reply_readbraw: SMB signing/sealing is active - "
3300 "raw reads/writes are disallowed.");
3301 }
3302
3303 if (req->wct < 8) {
3304 reply_readbraw_error(sconn);
3305 END_PROFILE(SMBreadbraw);
3306 return;
3307 }
3308
3309 if (sconn->smb1.echo_handler.trusted_fde) {
3310 DEBUG(2,("SMBreadbraw rejected with NOT_SUPPORTED because of "
3311 "'async smb echo handler = yes'\n"));
3312 reply_readbraw_error(sconn);
3313 END_PROFILE(SMBreadbraw);
3314 return;
3315 }
3316
3317 /*
3318 * Special check if an oplock break has been issued
3319 * and the readraw request croses on the wire, we must
3320 * return a zero length response here.
3321 */
3322
3323 fsp = file_fsp(req, SVAL(req->vwv+0, 0));
3324
3325 /*
3326 * We have to do a check_fsp by hand here, as
3327 * we must always return 4 zero bytes on error,
3328 * not a NTSTATUS.
3329 */
3330
3331 if (!fsp || !conn || conn != fsp->conn ||
3332 req->vuid != fsp->vuid ||
3333 fsp->is_directory || fsp->fh->fd == -1) {
3334 /*
3335 * fsp could be NULL here so use the value from the packet. JRA.
3336 */
3337 DEBUG(3,("reply_readbraw: fnum %d not valid "
3338 "- cache prime?\n",
3339 (int)SVAL(req->vwv+0, 0)));
3340 reply_readbraw_error(sconn);
3341 END_PROFILE(SMBreadbraw);
3342 return;
3343 }
3344
3345 /* Do a "by hand" version of CHECK_READ. */
3346 if (!(fsp->can_read ||
3347 ((req->flags2 & FLAGS2_READ_PERMIT_EXECUTE) &&
3348 (fsp->access_mask & FILE_EXECUTE)))) {
3349 DEBUG(3,("reply_readbraw: fnum %d not readable.\n",
3350 (int)SVAL(req->vwv+0, 0)));
3351 reply_readbraw_error(sconn);
3352 END_PROFILE(SMBreadbraw);
3353 return;
3354 }
3355
3356 flush_write_cache(fsp, READRAW_FLUSH);
3357
3358 startpos = IVAL_TO_SMB_OFF_T(req->vwv+1, 0);
3359 if(req->wct == 10) {
3360 /*
3361 * This is a large offset (64 bit) read.
3362 */
3363
3364 startpos |= (((off_t)IVAL(req->vwv+8, 0)) << 32);
3365
3366 if(startpos < 0) {
3367 DEBUG(0,("reply_readbraw: negative 64 bit "
3368 "readraw offset (%.0f) !\n",
3369 (double)startpos ));
3370 reply_readbraw_error(sconn);
3371 END_PROFILE(SMBreadbraw);
3372 return;
3373 }
3374 }
3375
3376 maxcount = (SVAL(req->vwv+3, 0) & 0xFFFF);
3377 mincount = (SVAL(req->vwv+4, 0) & 0xFFFF);
3378
3379 /* ensure we don't overrun the packet size */
3380 maxcount = MIN(65535,maxcount);
3381
3382 init_strict_lock_struct(fsp, (uint64_t)req->smbpid,
3383 (uint64_t)startpos, (uint64_t)maxcount, READ_LOCK,
3384 &lock);
3385
3386 if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
3387 reply_readbraw_error(sconn);
3388 END_PROFILE(SMBreadbraw);
3389 return;
3390 }
3391
3392 if (fsp_stat(fsp) == 0) {
3393 size = fsp->fsp_name->st.st_ex_size;
3394 }
3395
3396 if (startpos >= size) {
3397 nread = 0;
3398 } else {
3399 nread = MIN(maxcount,(size - startpos));
3400 }
3401
3402 #if 0 /* mincount appears to be ignored in a W2K server. JRA. */
3403 if (nread < mincount)
3404 nread = 0;
3405 #endif
3406
3407 DEBUG( 3, ( "reply_readbraw: %s start=%.0f max=%lu "
3408 "min=%lu nread=%lu\n",
3409 fsp_fnum_dbg(fsp), (double)startpos,
3410 (unsigned long)maxcount,
3411 (unsigned long)mincount,
3412 (unsigned long)nread ) );
3413
3414 send_file_readbraw(conn, req, fsp, startpos, nread, mincount);
3415
3416 DEBUG(5,("reply_readbraw finished\n"));
3417
3418 SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
3419
3420 END_PROFILE(SMBreadbraw);
3421 return;
3422 }
3423
3424 #undef DBGC_CLASS
3425 #define DBGC_CLASS DBGC_LOCKING
3426
3427 /****************************************************************************
3428 Reply to a lockread (core+ protocol).
3429 ****************************************************************************/
3430
3431 void reply_lockread(struct smb_request *req)
3432 {
3433 connection_struct *conn = req->conn;
3434 ssize_t nread = -1;
3435 char *data;
3436 off_t startpos;
3437 size_t numtoread;
3438 NTSTATUS status;
3439 files_struct *fsp;
3440 struct byte_range_lock *br_lck = NULL;
3441 char *p = NULL;
3442 struct smbd_server_connection *sconn = req->sconn;
3443
3444 START_PROFILE(SMBlockread);
3445
3446 if (req->wct < 5) {
3447 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3448 END_PROFILE(SMBlockread);
3449 return;
3450 }
3451
3452 fsp = file_fsp(req, SVAL(req->vwv+0, 0));
3453
3454 if (!check_fsp(conn, req, fsp)) {
3455 END_PROFILE(SMBlockread);
3456 return;
3457 }
3458
3459 if (!CHECK_READ(fsp,req)) {
3460 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
3461 END_PROFILE(SMBlockread);
3462 return;
3463 }
3464
3465 numtoread = SVAL(req->vwv+1, 0);
3466 startpos = IVAL_TO_SMB_OFF_T(req->vwv+2, 0);
3467
3468 numtoread = MIN(BUFFER_SIZE - (smb_size + 3*2 + 3), numtoread);
3469
3470 reply_outbuf(req, 5, numtoread + 3);
3471
3472 data = smb_buf(req->outbuf) + 3;
3473
3474 /*
3475 * NB. Discovered by Menny Hamburger at Mainsoft. This is a core+
3476 * protocol request that predates the read/write lock concept.
3477 * Thus instead of asking for a read lock here we need to ask
3478 * for a write lock. JRA.
3479 * Note that the requested lock size is unaffected by max_recv.
3480 */
3481
3482 br_lck = do_lock(req->sconn->msg_ctx,
3483 fsp,
3484 (uint64_t)req->smbpid,
3485 (uint64_t)numtoread,
3486 (uint64_t)startpos,
3487 WRITE_LOCK,
3488 WINDOWS_LOCK,
3489 False, /* Non-blocking lock. */
3490 &status,
3491 NULL,
3492 NULL);
3493 TALLOC_FREE(br_lck);
3494
3495 if (NT_STATUS_V(status)) {
3496 reply_nterror(req, status);
3497 END_PROFILE(SMBlockread);
3498 return;
3499 }
3500
3501 /*
3502 * However the requested READ size IS affected by max_recv. Insanity.... JRA.
3503 */
3504
3505 if (numtoread > sconn->smb1.negprot.max_recv) {
3506 DEBUG(0,("reply_lockread: requested read size (%u) is greater than maximum allowed (%u). \
3507 Returning short read of maximum allowed for compatibility with Windows 2000.\n",
3508 (unsigned int)numtoread,
3509 (unsigned int)sconn->smb1.negprot.max_recv));
3510 numtoread = MIN(numtoread, sconn->smb1.negprot.max_recv);
3511 }
3512 nread = read_file(fsp,data,startpos,numtoread);
3513
3514 if (nread < 0) {
3515 reply_nterror(req, map_nt_error_from_unix(errno));
3516 END_PROFILE(SMBlockread);
3517 return;
3518 }
3519
3520 srv_set_message((char *)req->outbuf, 5, nread+3, False);
3521
3522 SSVAL(req->outbuf,smb_vwv0,nread);
3523 SSVAL(req->outbuf,smb_vwv5,nread+3);
3524 p = smb_buf(req->outbuf);
3525 SCVAL(p,0,0); /* pad byte. */
3526 SSVAL(p,1,nread);
3527
3528 DEBUG(3,("lockread %s num=%d nread=%d\n",
3529 fsp_fnum_dbg(fsp), (int)numtoread, (int)nread));
3530
3531 END_PROFILE(SMBlockread);
3532 return;
3533 }
3534
3535 #undef DBGC_CLASS
3536 #define DBGC_CLASS DBGC_ALL
3537
3538 /****************************************************************************
3539 Reply to a read.
3540 ****************************************************************************/
3541
3542 void reply_read(struct smb_request *req)
3543 {
3544 connection_struct *conn = req->conn;
3545 size_t numtoread;
3546 ssize_t nread = 0;
3547 char *data;
3548 off_t startpos;
3549 int outsize = 0;
3550 files_struct *fsp;
3551 struct lock_struct lock;
3552 struct smbd_server_connection *sconn = req->sconn;
3553
3554 START_PROFILE(SMBread);
3555
3556 if (req->wct < 3) {
3557 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3558 END_PROFILE(SMBread);
3559 return;
3560 }
3561
3562 fsp = file_fsp(req, SVAL(req->vwv+0, 0));
3563
3564 if (!check_fsp(conn, req, fsp)) {
3565 END_PROFILE(SMBread);
3566 return;
3567 }
3568
3569 if (!CHECK_READ(fsp,req)) {
3570 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
3571 END_PROFILE(SMBread);
3572 return;
3573 }
3574
3575 numtoread = SVAL(req->vwv+1, 0);
3576 startpos = IVAL_TO_SMB_OFF_T(req->vwv+2, 0);
3577
3578 numtoread = MIN(BUFFER_SIZE-outsize,numtoread);
3579
3580 /*
3581 * The requested read size cannot be greater than max_recv. JRA.
3582 */
3583 if (numtoread > sconn->smb1.negprot.max_recv) {
3584 DEBUG(0,("reply_read: requested read size (%u) is greater than maximum allowed (%u). \
3585 Returning short read of maximum allowed for compatibility with Windows 2000.\n",
3586 (unsigned int)numtoread,
3587 (unsigned int)sconn->smb1.negprot.max_recv));
3588 numtoread = MIN(numtoread, sconn->smb1.negprot.max_recv);
3589 }
3590
3591 reply_outbuf(req, 5, numtoread+3);
3592
3593 data = smb_buf(req->outbuf) + 3;
3594
3595 init_strict_lock_struct(fsp, (uint64_t)req->smbpid,
3596 (uint64_t)startpos, (uint64_t)numtoread, READ_LOCK,
3597 &lock);
3598
3599 if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
3600 reply_nterror(req, NT_STATUS_FILE_LOCK_CONFLICT);
3601 END_PROFILE(SMBread);
3602 return;
3603 }
3604
3605 if (numtoread > 0)
3606 nread = read_file(fsp,data,startpos,numtoread);
3607
3608 if (nread < 0) {
3609 reply_nterror(req, map_nt_error_from_unix(errno));
3610 goto strict_unlock;
3611 }
3612
3613 srv_set_message((char *)req->outbuf, 5, nread+3, False);
3614
3615 SSVAL(req->outbuf,smb_vwv0,nread);
3616 SSVAL(req->outbuf,smb_vwv5,nread+3);
3617 SCVAL(smb_buf(req->outbuf),0,1);
3618 SSVAL(smb_buf(req->outbuf),1,nread);
3619
3620 DEBUG(3, ("read %s num=%d nread=%d\n",
3621 fsp_fnum_dbg(fsp), (int)numtoread, (int)nread));
3622
3623 strict_unlock:
3624 SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
3625
3626 END_PROFILE(SMBread);
3627 return;
3628 }
3629
3630 /****************************************************************************
3631 Setup readX header.
3632 ****************************************************************************/
3633
3634 static int setup_readX_header(struct smb_request *req, char *outbuf,
3635 size_t smb_maxcnt)
3636 {
3637 int outsize;
3638
3639 outsize = srv_set_message(outbuf,12,smb_maxcnt,False);
3640
3641 memset(outbuf+smb_vwv0,'\0',24); /* valgrind init. */
3642
3643 SCVAL(outbuf,smb_vwv0,0xFF);
3644 SSVAL(outbuf,smb_vwv2,0xFFFF); /* Remaining - must be -1. */
3645 SSVAL(outbuf,smb_vwv5,smb_maxcnt);
3646 SSVAL(outbuf,smb_vwv6,
3647 (smb_wct - 4) /* offset from smb header to wct */
3648 + 1 /* the wct field */
3649 + 12 * sizeof(uint16_t) /* vwv */
3650 + 2); /* the buflen field */
3651 SSVAL(outbuf,smb_vwv7,(smb_maxcnt >> 16));
3652 SSVAL(outbuf,smb_vwv11,smb_maxcnt);
3653 /* Reset the outgoing length, set_message truncates at 0x1FFFF. */
3654 _smb_setlen_large(outbuf,(smb_size + 12*2 + smb_maxcnt - 4));
3655 return outsize;
3656 }
3657
3658 /****************************************************************************
3659 Reply to a read and X - possibly using sendfile.
3660 ****************************************************************************/
3661
3662 static void send_file_readX(connection_struct *conn, struct smb_request *req,
3663 files_struct *fsp, off_t startpos,
3664 size_t smb_maxcnt)
3665 {
3666 ssize_t nread = -1;
3667 struct lock_struct lock;
3668 int saved_errno = 0;
3669
3670 if(fsp_stat(fsp) == -1) {
3671 reply_nterror(req, map_nt_error_from_unix(errno));
3672 return;
3673 }
3674
3675 init_strict_lock_struct(fsp, (uint64_t)req->smbpid,
3676 (uint64_t)startpos, (uint64_t)smb_maxcnt, READ_LOCK,
3677 &lock);
3678
3679 if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
3680 reply_nterror(req, NT_STATUS_FILE_LOCK_CONFLICT);
3681 return;
3682 }
3683
3684 if (!S_ISREG(fsp->fsp_name->st.st_ex_mode) ||
3685 (startpos > fsp->fsp_name->st.st_ex_size)
3686 || (smb_maxcnt > (fsp->fsp_name->st.st_ex_size - startpos))) {
3687 /*
3688 * We already know that we would do a short read, so don't
3689 * try the sendfile() path.
3690 */
3691 goto nosendfile_read;
3692 }
3693
3694 /*
3695 * We can only use sendfile on a non-chained packet
3696 * but we can use on a non-oplocked file. tridge proved this
3697 * on a train in Germany :-). JRA.
3698 */
3699
3700 if (!req_is_in_chain(req) &&
3701 !is_encrypted_packet(req->sconn, req->inbuf) &&
3702 (fsp->base_fsp == NULL) &&
3703 (fsp->wcp == NULL) &&
3704 lp_use_sendfile(SNUM(conn), req->sconn->smb1.signing_state) ) {
3705 uint8 headerbuf[smb_size + 12 * 2];
3706 DATA_BLOB header;
3707
3708 /*
3709 * Set up the packet header before send. We
3710 * assume here the sendfile will work (get the
3711 * correct amount of data).
3712 */
3713
3714 header = data_blob_const(headerbuf, sizeof(headerbuf));
3715
3716 construct_reply_common_req(req, (char *)headerbuf);
3717 setup_readX_header(req, (char *)headerbuf, smb_maxcnt);
3718
3719 nread = SMB_VFS_SENDFILE(req->sconn->sock, fsp, &header,
3720 startpos, smb_maxcnt);
3721 if (nread == -1) {
3722 /* Returning ENOSYS means no data at all was sent.
3723 Do this as a normal read. */
3724 if (errno == ENOSYS) {
3725 goto normal_read;
3726 }
3727
3728 /*
3729 * Special hack for broken Linux with no working sendfile. If we
3730 * return EINTR we sent the header but not the rest of the data.
3731 * Fake this up by doing read/write calls.
3732 */
3733
3734 if (errno == EINTR) {
3735 /* Ensure we don't do this again. */
3736 set_use_sendfile(SNUM(conn), False);
3737 DEBUG(0,("send_file_readX: sendfile not available. Faking..\n"));
3738 nread = fake_sendfile(fsp, startpos,
3739 smb_maxcnt);
3740 if (nread == -1) {
3741 DEBUG(0,("send_file_readX: "
3742 "fake_sendfile failed for "
3743 "file %s (%s).\n",
3744 fsp_str_dbg(fsp),
3745 strerror(errno)));
3746 exit_server_cleanly("send_file_readX: fake_sendfile failed");
3747 }
3748 DEBUG(3, ("send_file_readX: fake_sendfile %s max=%d nread=%d\n",
3749 fsp_fnum_dbg(fsp), (int)smb_maxcnt, (int)nread));
3750 /* No outbuf here means successful sendfile. */
3751 goto strict_unlock;
3752 }
3753
3754 DEBUG(0,("send_file_readX: sendfile failed for file "
3755 "%s (%s). Terminating\n", fsp_str_dbg(fsp),
3756 strerror(errno)));
3757 exit_server_cleanly("send_file_readX sendfile failed");
3758 } else if (nread == 0) {
3759 /*
3760 * Some sendfile implementations return 0 to indicate
3761 * that there was a short read, but nothing was
3762 * actually written to the socket. In this case,
3763 * fallback to the normal read path so the header gets
3764 * the correct byte count.
3765 */
3766 DEBUG(3, ("send_file_readX: sendfile sent zero bytes "
3767 "falling back to the normal read: %s\n",
3768 fsp_str_dbg(fsp)));
3769 goto normal_read;
3770 }
3771
3772 DEBUG(3, ("send_file_readX: sendfile %s max=%d nread=%d\n",
3773 fsp_fnum_dbg(fsp), (int)smb_maxcnt, (int)nread));
3774
3775 /* Deal with possible short send. */
3776 if (nread != smb_maxcnt + sizeof(headerbuf)) {
3777 sendfile_short_send(fsp, nread, sizeof(headerbuf), smb_maxcnt);
3778 }
3779 /* No outbuf here means successful sendfile. */
3780 SMB_PERFCOUNT_SET_MSGLEN_OUT(&req->pcd, nread);
3781 SMB_PERFCOUNT_END(&req->pcd);
3782 goto strict_unlock;
3783 }
3784
3785 normal_read:
3786
3787 if ((smb_maxcnt & 0xFF0000) > 0x10000) {
3788 uint8 headerbuf[smb_size + 2*12];
3789
3790 construct_reply_common_req(req, (char *)headerbuf);
3791 setup_readX_header(req, (char *)headerbuf, smb_maxcnt);
3792
3793 /* Send out the header. */
3794 if (write_data(req->sconn->sock, (char *)headerbuf,
3795 sizeof(headerbuf)) != sizeof(headerbuf)) {
3796
3797 char addr[INET6_ADDRSTRLEN];
3798 /*
3799 * Try and give an error message saying what
3800 * client failed.
3801 */
3802 DEBUG(0, ("write_data failed for client %s. "
3803 "Error %s\n",
3804 get_peer_addr(req->sconn->sock, addr,
3805 sizeof(addr)),
3806 strerror(errno)));
3807
3808 DEBUG(0,("send_file_readX: write_data failed for file "
3809 "%s (%s). Terminating\n", fsp_str_dbg(fsp),
3810 strerror(errno)));
3811 exit_server_cleanly("send_file_readX sendfile failed");
3812 }
3813 nread = fake_sendfile(fsp, startpos, smb_maxcnt);
3814 if (nread == -1) {
3815 DEBUG(0,("send_file_readX: fake_sendfile failed for "
3816 "file %s (%s).\n", fsp_str_dbg(fsp),
3817 strerror(errno)));
3818 exit_server_cleanly("send_file_readX: fake_sendfile failed");
3819 }
3820 goto strict_unlock;
3821 }
3822
3823 nosendfile_read:
3824
3825 reply_outbuf(req, 12, smb_maxcnt);
3826 SSVAL(req->outbuf, smb_vwv0, 0xff); /* andx chain ends */
3827 SSVAL(req->outbuf, smb_vwv1, 0); /* no andx offset */
3828
3829 nread = read_file(fsp, smb_buf(req->outbuf), startpos, smb_maxcnt);
3830 saved_errno = errno;
3831
3832 SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
3833
3834 if (nread < 0) {
3835 reply_nterror(req, map_nt_error_from_unix(saved_errno));
3836 return;
3837 }
3838
3839 setup_readX_header(req, (char *)req->outbuf, nread);
3840
3841 DEBUG(3, ("send_file_readX %s max=%d nread=%d\n",
3842 fsp_fnum_dbg(fsp), (int)smb_maxcnt, (int)nread));
3843 return;
3844
3845 strict_unlock:
3846 SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
3847 TALLOC_FREE(req->outbuf);
3848 return;
3849 }
3850
3851 /****************************************************************************
3852 Reply to a read and X.
3853 ****************************************************************************/
3854
3855 void reply_read_and_X(struct smb_request *req)
3856 {
3857 struct smbd_server_connection *sconn = req->sconn;
3858 connection_struct *conn = req->conn;
3859 files_struct *fsp;
3860 off_t startpos;
3861 size_t smb_maxcnt;
3862 bool big_readX = False;
3863 #if 0
3864 size_t smb_mincnt = SVAL(req->vwv+6, 0);
3865 #endif
3866
3867 START_PROFILE(SMBreadX);
3868
3869 if ((req->wct != 10) && (req->wct != 12)) {
3870 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3871 return;
3872 }
3873
3874 fsp = file_fsp(req, SVAL(req->vwv+2, 0));
3875 startpos = IVAL_TO_SMB_OFF_T(req->vwv+3, 0);
3876 smb_maxcnt = SVAL(req->vwv+5, 0);
3877
3878 /* If it's an IPC, pass off the pipe handler. */
3879 if (IS_IPC(conn)) {
3880 reply_pipe_read_and_X(req);
3881 END_PROFILE(SMBreadX);
3882 return;
3883 }
3884
3885 if (!check_fsp(conn, req, fsp)) {
3886 END_PROFILE(SMBreadX);
3887 return;
3888 }
3889
3890 if (!CHECK_READ(fsp,req)) {
3891 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
3892 END_PROFILE(SMBreadX);
3893 return;
3894 }
3895
3896 if ((sconn->smb1.unix_info.client_cap_low & CIFS_UNIX_LARGE_READ_CAP) ||
3897 (get_remote_arch() == RA_SAMBA)) {
3898 /*
3899 * This is Samba only behavior (up to Samba 3.6)!
3900 *
3901 * Windows 2008 R2 ignores the upper_size,
3902 * so we do unless unix extentions are active
3903 * or "smbclient" is talking to us.
3904 */
3905 size_t upper_size = SVAL(req->vwv+7, 0);
3906 smb_maxcnt |= (upper_size<<16);
3907 if (upper_size > 1) {
3908 /* Can't do this on a chained packet. */
3909 if ((CVAL(req->vwv+0, 0) != 0xFF)) {
3910 reply_nterror(req, NT_STATUS_NOT_SUPPORTED);
3911 END_PROFILE(SMBreadX);
3912 return;
3913 }
3914 /* We currently don't do this on signed or sealed data. */
3915 if (srv_is_signing_active(req->sconn) ||
3916 is_encrypted_packet(req->sconn, req->inbuf)) {
3917 reply_nterror(req, NT_STATUS_NOT_SUPPORTED);
3918 END_PROFILE(SMBreadX);
3919 return;
3920 }
3921 /* Is there room in the reply for this data ? */
3922 if (smb_maxcnt > (0xFFFFFF - (smb_size -4 + 12*2))) {
3923 reply_nterror(req,
3924 NT_STATUS_INVALID_PARAMETER);
3925 END_PROFILE(SMBreadX);
3926 return;
3927 }
3928 big_readX = True;
3929 }
3930 }
3931
3932 if (req->wct == 12) {
3933 /*
3934 * This is a large offset (64 bit) read.
3935 */
3936 startpos |= (((off_t)IVAL(req->vwv+10, 0)) << 32);
3937
3938 }
3939
3940 if (!big_readX) {
3941 NTSTATUS status = schedule_aio_read_and_X(conn,
3942 req,
3943 fsp,
3944 startpos,
3945 smb_maxcnt);
3946 if (NT_STATUS_IS_OK(status)) {
3947 /* Read scheduled - we're done. */
3948 goto out;
3949 }
3950 if (!NT_STATUS_EQUAL(status, NT_STATUS_RETRY)) {
3951 /* Real error - report to client. */
3952 END_PROFILE(SMBreadX);
3953 reply_nterror(req, status);
3954 return;
3955 }
3956 /* NT_STATUS_RETRY - fall back to sync read. */
3957 }
3958
3959 smbd_lock_socket(req->sconn);
3960 send_file_readX(conn, req, fsp, startpos, smb_maxcnt);
3961 smbd_unlock_socket(req->sconn);
3962
3963 out:
3964 END_PROFILE(SMBreadX);
3965 return;
3966 }
3967
3968 /****************************************************************************
3969 Error replies to writebraw must have smb_wct == 1. Fix this up.
3970 ****************************************************************************/
3971
3972 void error_to_writebrawerr(struct smb_request *req)
3973 {
3974 uint8 *old_outbuf = req->outbuf;
3975
3976 reply_outbuf(req, 1, 0);
3977
3978 memcpy(req->outbuf, old_outbuf, smb_size);
3979 TALLOC_FREE(old_outbuf);
3980 }
3981
3982 /****************************************************************************
3983 Read 4 bytes of a smb packet and return the smb length of the packet.
3984 Store the result in the buffer. This version of the function will
3985 never return a session keepalive (length of zero).
3986 Timeout is in milliseconds.
3987 ****************************************************************************/
3988
3989 static NTSTATUS read_smb_length(int fd, char *inbuf, unsigned int timeout,
3990 size_t *len)
3991 {
3992 uint8_t msgtype = NBSSkeepalive;
3993
3994 while (msgtype == NBSSkeepalive) {
3995 NTSTATUS status;
3996
3997 status = read_smb_length_return_keepalive(fd, inbuf, timeout,
3998 len);
3999 if (!NT_STATUS_IS_OK(status)) {
4000 char addr[INET6_ADDRSTRLEN];
4001 /* Try and give an error message
4002 * saying what client failed. */
4003 DEBUG(0, ("read_fd_with_timeout failed for "
4004 "client %s read error = %s.\n",
4005 get_peer_addr(fd,addr,sizeof(addr)),
4006 nt_errstr(status)));
4007 return status;
4008 }
4009
4010 msgtype = CVAL(inbuf, 0);
4011 }
4012
4013 DEBUG(10,("read_smb_length: got smb length of %lu\n",
4014 (unsigned long)len));
4015
4016 return NT_STATUS_OK;
4017 }
4018
4019 /****************************************************************************
4020 Reply to a writebraw (core+ or LANMAN1.0 protocol).
4021 ****************************************************************************/
4022
4023 void reply_writebraw(struct smb_request *req)
4024 {
4025 connection_struct *conn = req->conn;
4026 char *buf = NULL;
4027 ssize_t nwritten=0;
4028 ssize_t total_written=0;
4029 size_t numtowrite=0;
4030 size_t tcount;
4031 off_t startpos;
4032 const char *data=NULL;
4033 bool write_through;
4034 files_struct *fsp;
4035 struct lock_struct lock;
4036 NTSTATUS status;
4037
4038 START_PROFILE(SMBwritebraw);
4039
4040 /*
4041 * If we ever reply with an error, it must have the SMB command
4042 * type of SMBwritec, not SMBwriteBraw, as this tells the client
4043 * we're finished.
4044 */
4045 SCVAL(discard_const_p(uint8_t, req->inbuf),smb_com,SMBwritec);
4046
4047 if (srv_is_signing_active(req->sconn)) {
4048 END_PROFILE(SMBwritebraw);
4049 exit_server_cleanly("reply_writebraw: SMB signing is active - "
4050 "raw reads/writes are disallowed.");
4051 }
4052
4053 if (req->wct < 12) {
4054 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4055 error_to_writebrawerr(req);
4056 END_PROFILE(SMBwritebraw);
4057 return;
4058 }
4059
4060 if (req->sconn->smb1.echo_handler.trusted_fde) {
4061 DEBUG(2,("SMBwritebraw rejected with NOT_SUPPORTED because of "
4062 "'async smb echo handler = yes'\n"));
4063 reply_nterror(req, NT_STATUS_NOT_SUPPORTED);
4064 error_to_writebrawerr(req);
4065 END_PROFILE(SMBwritebraw);
4066 return;
4067 }
4068
4069 fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4070 if (!check_fsp(conn, req, fsp)) {
4071 error_to_writebrawerr(req);
4072 END_PROFILE(SMBwritebraw);
4073 return;
4074 }
4075
4076 if (!CHECK_WRITE(fsp)) {
4077 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
4078 error_to_writebrawerr(req);
4079 END_PROFILE(SMBwritebraw);
4080 return;
4081 }
4082
4083 tcount = IVAL(req->vwv+1, 0);
4084 startpos = IVAL_TO_SMB_OFF_T(req->vwv+3, 0);
4085 write_through = BITSETW(req->vwv+7,0);
4086
4087 /* We have to deal with slightly different formats depending
4088 on whether we are using the core+ or lanman1.0 protocol */
4089
4090 if(get_Protocol() <= PROTOCOL_COREPLUS) {
4091 numtowrite = SVAL(smb_buf_const(req->inbuf),-2);
4092 data = smb_buf_const(req->inbuf);
4093 } else {
4094 numtowrite = SVAL(req->vwv+10, 0);
4095 data = smb_base(req->inbuf) + SVAL(req->vwv+11, 0);
4096 }
4097
4098 /* Ensure we don't write bytes past the end of this packet. */
4099 if (data + numtowrite > smb_base(req->inbuf) + smb_len(req->inbuf)) {
4100 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4101 error_to_writebrawerr(req);
4102 END_PROFILE(SMBwritebraw);
4103 return;
4104 }
4105
4106 if (!fsp->print_file) {
4107 init_strict_lock_struct(fsp, (uint64_t)req->smbpid,
4108 (uint64_t)startpos, (uint64_t)tcount, WRITE_LOCK,
4109 &lock);
4110
4111 if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
4112 reply_nterror(req, NT_STATUS_FILE_LOCK_CONFLICT);
4113 error_to_writebrawerr(req);
4114 END_PROFILE(SMBwritebraw);
4115 return;
4116 }
4117 }
4118
4119 if (numtowrite>0) {
4120 nwritten = write_file(req,fsp,data,startpos,numtowrite);
4121 }
4122
4123 DEBUG(3, ("reply_writebraw: initial write %s start=%.0f num=%d "
4124 "wrote=%d sync=%d\n",
4125 fsp_fnum_dbg(fsp), (double)startpos, (int)numtowrite,
4126 (int)nwritten, (int)write_through));
4127
4128 if (nwritten < (ssize_t)numtowrite) {
4129 reply_nterror(req, NT_STATUS_DISK_FULL);
4130 error_to_writebrawerr(req);
4131 goto strict_unlock;
4132 }
4133
4134 total_written = nwritten;
4135
4136 /* Allocate a buffer of 64k + length. */
4137 buf = talloc_array(NULL, char, 65540);
4138 if (!buf) {
4139 reply_nterror(req, NT_STATUS_NO_MEMORY);
4140 error_to_writebrawerr(req);
4141 goto strict_unlock;
4142 }
4143
4144 /* Return a SMBwritebraw message to the redirector to tell
4145 * it to send more bytes */
4146
4147 memcpy(buf, req->inbuf, smb_size);
4148 srv_set_message(buf,get_Protocol()>PROTOCOL_COREPLUS?1:0,0,True);
4149 SCVAL(buf,smb_com,SMBwritebraw);
4150 SSVALS(buf,smb_vwv0,0xFFFF);
4151 show_msg(buf);
4152 if (!srv_send_smb(req->sconn,
4153 buf,
4154 false, 0, /* no signing */
4155 IS_CONN_ENCRYPTED(conn),
4156 &req->pcd)) {
4157 exit_server_cleanly("reply_writebraw: srv_send_smb "
4158 "failed.");
4159 }
4160
4161 /* Now read the raw data into the buffer and write it */
4162 status = read_smb_length(req->sconn->sock, buf, SMB_SECONDARY_WAIT,
4163 &numtowrite);
4164 if (!NT_STATUS_IS_OK(status)) {
4165 exit_server_cleanly("secondary writebraw failed");
4166 }
4167
4168 /* Set up outbuf to return the correct size */
4169 reply_outbuf(req, 1, 0);
4170
4171 if (numtowrite != 0) {
4172
4173 if (numtowrite > 0xFFFF) {
4174 DEBUG(0,("reply_writebraw: Oversize secondary write "
4175 "raw requested (%u). Terminating\n",
4176 (unsigned int)numtowrite ));
4177 exit_server_cleanly("secondary writebraw failed");
4178 }
4179
4180 if (tcount > nwritten+numtowrite) {
4181 DEBUG(3,("reply_writebraw: Client overestimated the "
4182 "write %d %d %d\n",
4183 (int)tcount,(int)nwritten,(int)numtowrite));
4184 }
4185
4186 status = read_data(req->sconn->sock, buf+4, numtowrite);
4187
4188 if (!NT_STATUS_IS_OK(status)) {
4189 char addr[INET6_ADDRSTRLEN];
4190 /* Try and give an error message
4191 * saying what client failed. */
4192 DEBUG(0, ("reply_writebraw: Oversize secondary write "
4193 "raw read failed (%s) for client %s. "
4194 "Terminating\n", nt_errstr(status),
4195 get_peer_addr(req->sconn->sock, addr,
4196 sizeof(addr))));
4197 exit_server_cleanly("secondary writebraw failed");
4198 }
4199
4200 nwritten = write_file(req,fsp,buf+4,startpos+nwritten,numtowrite);
4201 if (nwritten == -1) {
4202 TALLOC_FREE(buf);
4203 reply_nterror(req, map_nt_error_from_unix(errno));
4204 error_to_writebrawerr(req);
4205 goto strict_unlock;
4206 }
4207
4208 if (nwritten < (ssize_t)numtowrite) {
4209 SCVAL(req->outbuf,smb_rcls,ERRHRD);
4210 SSVAL(req->outbuf,smb_err,ERRdiskfull);
4211 }
4212
4213 if (nwritten > 0) {
4214 total_written += nwritten;
4215 }
4216 }
4217
4218 TALLOC_FREE(buf);
4219 SSVAL(req->outbuf,smb_vwv0,total_written);
4220
4221 status = sync_file(conn, fsp, write_through);
4222 if (!NT_STATUS_IS_OK(status)) {
4223 DEBUG(5,("reply_writebraw: sync_file for %s returned %s\n",
4224 fsp_str_dbg(fsp), nt_errstr(status)));
4225 reply_nterror(req, status);
4226 error_to_writebrawerr(req);
4227 goto strict_unlock;
4228 }
4229
4230 DEBUG(3,("reply_writebraw: secondart write %s start=%.0f num=%d "
4231 "wrote=%d\n",
4232 fsp_fnum_dbg(fsp), (double)startpos, (int)numtowrite,
4233 (int)total_written));
4234
4235 if (!fsp->print_file) {
4236 SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
4237 }
4238
4239 /* We won't return a status if write through is not selected - this
4240 * follows what WfWg does */
4241 END_PROFILE(SMBwritebraw);
4242
4243 if (!write_through && total_written==tcount) {
4244
4245 #if RABBIT_PELLET_FIX
4246 /*
4247 * Fix for "rabbit pellet" mode, trigger an early TCP ack by
4248 * sending a NBSSkeepalive. Thanks to DaveCB at Sun for this.
4249 * JRA.
4250 */
4251 if (!send_keepalive(req->sconn->sock)) {
4252 exit_server_cleanly("reply_writebraw: send of "
4253 "keepalive failed");
4254 }
4255 #endif
4256 TALLOC_FREE(req->outbuf);
4257 }
4258 return;
4259
4260 strict_unlock:
4261 if (!fsp->print_file) {
4262 SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
4263 }
4264
4265 END_PROFILE(SMBwritebraw);
4266 return;
4267 }
4268
4269 #undef DBGC_CLASS
4270 #define DBGC_CLASS DBGC_LOCKING
4271
4272 /****************************************************************************
4273 Reply to a writeunlock (core+).
4274 ****************************************************************************/
4275
4276 void reply_writeunlock(struct smb_request *req)
4277 {
4278 connection_struct *conn = req->conn;
4279 ssize_t nwritten = -1;
4280 size_t numtowrite;
4281 off_t startpos;
4282 const char *data;
4283 NTSTATUS status = NT_STATUS_OK;
4284 files_struct *fsp;
4285 struct lock_struct lock;
4286 int saved_errno = 0;
4287
4288 START_PROFILE(SMBwriteunlock);
4289
4290 if (req->wct < 5) {
4291 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4292 END_PROFILE(SMBwriteunlock);
4293 return;
4294 }
4295
4296 fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4297
4298 if (!check_fsp(conn, req, fsp)) {
4299 END_PROFILE(SMBwriteunlock);
4300 return;
4301 }
4302
4303 if (!CHECK_WRITE(fsp)) {
4304 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
4305 END_PROFILE(SMBwriteunlock);
4306 return;
4307 }
4308
4309 numtowrite = SVAL(req->vwv+1, 0);
4310 startpos = IVAL_TO_SMB_OFF_T(req->vwv+2, 0);
4311 data = (const char *)req->buf + 3;
4312
4313 if (!fsp->print_file && numtowrite > 0) {
4314 init_strict_lock_struct(fsp, (uint64_t)req->smbpid,
4315 (uint64_t)startpos, (uint64_t)numtowrite, WRITE_LOCK,
4316 &lock);
4317
4318 if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
4319 reply_nterror(req, NT_STATUS_FILE_LOCK_CONFLICT);
4320 END_PROFILE(SMBwriteunlock);
4321 return;
4322 }
4323 }
4324
4325 /* The special X/Open SMB protocol handling of
4326 zero length writes is *NOT* done for
4327 this call */
4328 if(numtowrite == 0) {
4329 nwritten = 0;
4330 } else {
4331 nwritten = write_file(req,fsp,data,startpos,numtowrite);
4332 saved_errno = errno;
4333 }
4334
4335 status = sync_file(conn, fsp, False /* write through */);
4336 if (!NT_STATUS_IS_OK(status)) {
4337 DEBUG(5,("reply_writeunlock: sync_file for %s returned %s\n",
4338 fsp_str_dbg(fsp), nt_errstr(status)));
4339 reply_nterror(req, status);
4340 goto strict_unlock;
4341 }
4342
4343 if(nwritten < 0) {
4344 reply_nterror(req, map_nt_error_from_unix(saved_errno));
4345 goto strict_unlock;
4346 }
4347
4348 if((nwritten < numtowrite) && (numtowrite != 0)) {
4349 reply_nterror(req, NT_STATUS_DISK_FULL);
4350 goto strict_unlock;
4351 }
4352
4353 if (numtowrite && !fsp->print_file) {
4354 status = do_unlock(req->sconn->msg_ctx,
4355 fsp,
4356 (uint64_t)req->smbpid,
4357 (uint64_t)numtowrite,
4358 (uint64_t)startpos,
4359 WINDOWS_LOCK);
4360
4361 if (NT_STATUS_V(status)) {
4362 reply_nterror(req, status);
4363 goto strict_unlock;
4364 }
4365 }
4366
4367 reply_outbuf(req, 1, 0);
4368
4369 SSVAL(req->outbuf,smb_vwv0,nwritten);
4370
4371 DEBUG(3, ("writeunlock %s num=%d wrote=%d\n",
4372 fsp_fnum_dbg(fsp), (int)numtowrite, (int)nwritten));
4373
4374 strict_unlock:
4375 if (numtowrite && !fsp->print_file) {
4376 SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
4377 }
4378
4379 END_PROFILE(SMBwriteunlock);
4380 return;
4381 }
4382
4383 #undef DBGC_CLASS
4384 #define DBGC_CLASS DBGC_ALL
4385
4386 /****************************************************************************
4387 Reply to a write.
4388 ****************************************************************************/
4389
4390 void reply_write(struct smb_request *req)
4391 {
4392 connection_struct *conn = req->conn;
4393 size_t numtowrite;
4394 ssize_t nwritten = -1;
4395 off_t startpos;
4396 const char *data;
4397 files_struct *fsp;
4398 struct lock_struct lock;
4399 NTSTATUS status;
4400 int saved_errno = 0;
4401
4402 START_PROFILE(SMBwrite);
4403
4404 if (req->wct < 5) {
4405 END_PROFILE(SMBwrite);
4406 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4407 return;
4408 }
4409
4410 /* If it's an IPC, pass off the pipe handler. */
4411 if (IS_IPC(conn)) {
4412 reply_pipe_write(req);
4413 END_PROFILE(SMBwrite);
4414 return;
4415 }
4416
4417 fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4418
4419 if (!check_fsp(conn, req, fsp)) {
4420 END_PROFILE(SMBwrite);
4421 return;
4422 }
4423
4424 if (!CHECK_WRITE(fsp)) {
4425 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
4426 END_PROFILE(SMBwrite);
4427 return;
4428 }
4429
4430 numtowrite = SVAL(req->vwv+1, 0);
4431 startpos = IVAL_TO_SMB_OFF_T(req->vwv+2, 0);
4432 data = (const char *)req->buf + 3;
4433
4434 if (!fsp->print_file) {
4435 init_strict_lock_struct(fsp, (uint64_t)req->smbpid,
4436 (uint64_t)startpos, (uint64_t)numtowrite, WRITE_LOCK,
4437 &lock);
4438
4439 if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
4440 reply_nterror(req, NT_STATUS_FILE_LOCK_CONFLICT);
4441 END_PROFILE(SMBwrite);
4442 return;
4443 }
4444 }
4445
4446 /*
4447 * X/Open SMB protocol says that if smb_vwv1 is
4448 * zero then the file size should be extended or
4449 * truncated to the size given in smb_vwv[2-3].
4450 */
4451
4452 if(numtowrite == 0) {
4453 /*
4454 * This is actually an allocate call, and set EOF. JRA.
4455 */
4456 nwritten = vfs_allocate_file_space(fsp, (off_t)startpos);
4457 if (nwritten < 0) {
4458 reply_nterror(req, NT_STATUS_DISK_FULL);
4459 goto strict_unlock;
4460 }
4461 nwritten = vfs_set_filelen(fsp, (off_t)startpos);
4462 if (nwritten < 0) {
4463 reply_nterror(req, NT_STATUS_DISK_FULL);
4464 goto strict_unlock;
4465 }
4466 trigger_write_time_update_immediate(fsp);
4467 } else {
4468 nwritten = write_file(req,fsp,data,startpos,numtowrite);
4469 }
4470
4471 status = sync_file(conn, fsp, False);
4472 if (!NT_STATUS_IS_OK(status)) {
4473 DEBUG(5,("reply_write: sync_file for %s returned %s\n",
4474 fsp_str_dbg(fsp), nt_errstr(status)));
4475 reply_nterror(req, status);
4476 goto strict_unlock;
4477 }
4478
4479 if(nwritten < 0) {
4480 reply_nterror(req, map_nt_error_from_unix(saved_errno));
4481 goto strict_unlock;
4482 }
4483
4484 if((nwritten == 0) && (numtowrite != 0)) {
4485 reply_nterror(req, NT_STATUS_DISK_FULL);
4486 goto strict_unlock;
4487 }
4488
4489 reply_outbuf(req, 1, 0);
4490
4491 SSVAL(req->outbuf,smb_vwv0,nwritten);
4492
4493 if (nwritten < (ssize_t)numtowrite) {
4494 SCVAL(req->outbuf,smb_rcls,ERRHRD);
4495 SSVAL(req->outbuf,smb_err,ERRdiskfull);
4496 }
4497
4498 DEBUG(3, ("write %s num=%d wrote=%d\n", fsp_fnum_dbg(fsp), (int)numtowrite, (int)nwritten));
4499
4500 strict_unlock:
4501 if (!fsp->print_file) {
4502 SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
4503 }
4504
4505 END_PROFILE(SMBwrite);
4506 return;
4507 }
4508
4509 /****************************************************************************
4510 Ensure a buffer is a valid writeX for recvfile purposes.
4511 ****************************************************************************/
4512
4513 #define STANDARD_WRITE_AND_X_HEADER_SIZE (smb_size - 4 + /* basic header */ \
4514 (2*14) + /* word count (including bcc) */ \
4515 1 /* pad byte */)
4516
4517 bool is_valid_writeX_buffer(struct smbd_server_connection *sconn,
4518 const uint8_t *inbuf)
4519 {
4520 size_t numtowrite;
4521 connection_struct *conn = NULL;
4522 unsigned int doff = 0;
4523 size_t len = smb_len_large(inbuf);
4524 struct smbXsrv_tcon *tcon;
4525 NTSTATUS status;
4526 NTTIME now = 0;
4527
4528 if (is_encrypted_packet(sconn, inbuf)) {
4529 /* Can't do this on encrypted
4530 * connections. */
4531 return false;
4532 }
4533
4534 if (CVAL(inbuf,smb_com) != SMBwriteX) {
4535 return false;
4536 }
4537
4538 if (CVAL(inbuf,smb_vwv0) != 0xFF ||
4539 CVAL(inbuf,smb_wct) != 14) {
4540 DEBUG(10,("is_valid_writeX_buffer: chained or "
4541 "invalid word length.\n"));
4542 return false;
4543 }
4544
4545 status = smb1srv_tcon_lookup(sconn->conn, SVAL(inbuf, smb_tid),
4546 now, &tcon);
4547 if (!NT_STATUS_IS_OK(status)) {
4548 DEBUG(10,("is_valid_writeX_buffer: bad tid\n"));
4549 return false;
4550 }
4551 conn = tcon->compat;
4552
4553 if (IS_IPC(conn)) {
4554 DEBUG(10,("is_valid_writeX_buffer: IPC$ tid\n"));
4555 return false;
4556 }
4557 if (IS_PRINT(conn)) {
4558 DEBUG(10,("is_valid_writeX_buffer: printing tid\n"));
4559 return false;
4560 }
4561 doff = SVAL(inbuf,smb_vwv11);
4562
4563 numtowrite = SVAL(inbuf,smb_vwv10);
4564
4565 if (len > doff && len - doff > 0xFFFF) {
4566 numtowrite |= (((size_t)SVAL(inbuf,smb_vwv9))<<16);
4567 }
4568
4569 if (numtowrite == 0) {
4570 DEBUG(10,("is_valid_writeX_buffer: zero write\n"));
4571 return false;
4572 }
4573
4574 /* Ensure the sizes match up. */
4575 if (doff < STANDARD_WRITE_AND_X_HEADER_SIZE) {
4576 /* no pad byte...old smbclient :-( */
4577 DEBUG(10,("is_valid_writeX_buffer: small doff %u (min %u)\n",
4578 (unsigned int)doff,
4579 (unsigned int)STANDARD_WRITE_AND_X_HEADER_SIZE));
4580 return false;
4581 }
4582
4583 if (len - doff != numtowrite) {
4584 DEBUG(10,("is_valid_writeX_buffer: doff mismatch "
4585 "len = %u, doff = %u, numtowrite = %u\n",
4586 (unsigned int)len,
4587 (unsigned int)doff,
4588 (unsigned int)numtowrite ));
4589 return false;
4590 }
4591
4592 DEBUG(10,("is_valid_writeX_buffer: true "
4593 "len = %u, doff = %u, numtowrite = %u\n",
4594 (unsigned int)len,
4595 (unsigned int)doff,
4596 (unsigned int)numtowrite ));
4597
4598 return true;
4599 }
4600
4601 /****************************************************************************
4602 Reply to a write and X.
4603 ****************************************************************************/
4604
4605 void reply_write_and_X(struct smb_request *req)
4606 {
4607 connection_struct *conn = req->conn;
4608 files_struct *fsp;
4609 struct lock_struct lock;
4610 off_t startpos;
4611 size_t numtowrite;
4612 bool write_through;
4613 ssize_t nwritten;
4614 unsigned int smb_doff;
4615 unsigned int smblen;
4616 const char *data;
4617 NTSTATUS status;
4618 int saved_errno = 0;
4619
4620 START_PROFILE(SMBwriteX);
4621
4622 if ((req->wct != 12) && (req->wct != 14)) {
4623 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4624 goto out;
4625 }
4626
4627 numtowrite = SVAL(req->vwv+10, 0);
4628 smb_doff = SVAL(req->vwv+11, 0);
4629 smblen = smb_len(req->inbuf);
4630
4631 if (req->unread_bytes > 0xFFFF ||
4632 (smblen > smb_doff &&
4633 smblen - smb_doff > 0xFFFF)) {
4634 numtowrite |= (((size_t)SVAL(req->vwv+9, 0))<<16);
4635 }
4636
4637 if (req->unread_bytes) {
4638 /* Can't do a recvfile write on IPC$ */
4639 if (IS_IPC(conn)) {
4640 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4641 goto out;
4642 }
4643 if (numtowrite != req->unread_bytes) {
4644 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4645 goto out;
4646 }
4647 } else {
4648 if (smb_doff > smblen || smb_doff + numtowrite < numtowrite ||
4649 smb_doff + numtowrite > smblen) {
4650 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4651 goto out;
4652 }
4653 }
4654
4655 /* If it's an IPC, pass off the pipe handler. */
4656 if (IS_IPC(conn)) {
4657 if (req->unread_bytes) {
4658 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4659 goto out;
4660 }
4661 reply_pipe_write_and_X(req);
4662 goto out;
4663 }
4664
4665 fsp = file_fsp(req, SVAL(req->vwv+2, 0));
4666 startpos = IVAL_TO_SMB_OFF_T(req->vwv+3, 0);
4667 write_through = BITSETW(req->vwv+7,0);
4668
4669 if (!check_fsp(conn, req, fsp)) {
4670 goto out;
4671 }
4672
4673 if (!CHECK_WRITE(fsp)) {
4674 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
4675 goto out;
4676 }
4677
4678 data = smb_base(req->inbuf) + smb_doff;
4679
4680 if(req->wct == 14) {
4681 /*
4682 * This is a large offset (64 bit) write.
4683 */
4684 startpos |= (((off_t)IVAL(req->vwv+12, 0)) << 32);
4685
4686 }
4687
4688 /* X/Open SMB protocol says that, unlike SMBwrite
4689 if the length is zero then NO truncation is
4690 done, just a write of zero. To truncate a file,
4691 use SMBwrite. */
4692
4693 if(numtowrite == 0) {
4694 nwritten = 0;
4695 } else {
4696 if (req->unread_bytes == 0) {
4697 status = schedule_aio_write_and_X(conn,
4698 req,
4699 fsp,
4700 data,
4701 startpos,
4702 numtowrite);
4703
4704 if (NT_STATUS_IS_OK(status)) {
4705 /* write scheduled - we're done. */
4706 goto out;
4707 }
4708 if (!NT_STATUS_EQUAL(status, NT_STATUS_RETRY)) {
4709 /* Real error - report to client. */
4710 reply_nterror(req, status);
4711 goto out;
4712 }
4713 /* NT_STATUS_RETRY - fall through to sync write. */
4714 }
4715
4716 init_strict_lock_struct(fsp, (uint64_t)req->smbpid,
4717 (uint64_t)startpos, (uint64_t)numtowrite, WRITE_LOCK,
4718 &lock);
4719
4720 if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
4721 reply_nterror(req, NT_STATUS_FILE_LOCK_CONFLICT);
4722 goto out;
4723 }
4724
4725 nwritten = write_file(req,fsp,data,startpos,numtowrite);
4726 saved_errno = errno;
4727
4728 SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
4729 }
4730
4731 if(nwritten < 0) {
4732 reply_nterror(req, map_nt_error_from_unix(saved_errno));
4733 goto out;
4734 }
4735
4736 if((nwritten == 0) && (numtowrite != 0)) {
4737 reply_nterror(req, NT_STATUS_DISK_FULL);
4738 goto out;
4739 }
4740
4741 reply_outbuf(req, 6, 0);
4742 SSVAL(req->outbuf, smb_vwv0, 0xff); /* andx chain ends */
4743 SSVAL(req->outbuf, smb_vwv1, 0); /* no andx offset */
4744 SSVAL(req->outbuf,smb_vwv2,nwritten);
4745 SSVAL(req->outbuf,smb_vwv4,nwritten>>16);
4746
4747 DEBUG(3,("writeX %s num=%d wrote=%d\n",
4748 fsp_fnum_dbg(fsp), (int)numtowrite, (int)nwritten));
4749
4750 status = sync_file(conn, fsp, write_through);
4751 if (!NT_STATUS_IS_OK(status)) {
4752 DEBUG(5,("reply_write_and_X: sync_file for %s returned %s\n",
4753 fsp_str_dbg(fsp), nt_errstr(status)));
4754 reply_nterror(req, status);
4755 goto out;
4756 }
4757
4758 END_PROFILE(SMBwriteX);
4759 return;
4760
4761 out:
4762 if (req->unread_bytes) {
4763 /* writeX failed. drain socket. */
4764 if (drain_socket(req->sconn->sock, req->unread_bytes) !=
4765 req->unread_bytes) {
4766 smb_panic("failed to drain pending bytes");
4767 }
4768 req->unread_bytes = 0;
4769 }
4770
4771 END_PROFILE(SMBwriteX);
4772 return;
4773 }
4774
4775 /****************************************************************************
4776 Reply to a lseek.
4777 ****************************************************************************/
4778
4779 void reply_lseek(struct smb_request *req)
4780 {
4781 connection_struct *conn = req->conn;
4782 off_t startpos;
4783 off_t res= -1;
4784 int mode,umode;
4785 files_struct *fsp;
4786
4787 START_PROFILE(SMBlseek);
4788
4789 if (req->wct < 4) {
4790 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4791 END_PROFILE(SMBlseek);
4792 return;
4793 }
4794
4795 fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4796
4797 if (!check_fsp(conn, req, fsp)) {
4798 return;
4799 }
4800
4801 flush_write_cache(fsp, SEEK_FLUSH);
4802
4803 mode = SVAL(req->vwv+1, 0) & 3;
4804 /* NB. This doesn't use IVAL_TO_SMB_OFF_T as startpos can be signed in this case. */
4805 startpos = (off_t)IVALS(req->vwv+2, 0);
4806
4807 switch (mode) {
4808 case 0:
4809 umode = SEEK_SET;
4810 res = startpos;
4811 break;
4812 case 1:
4813 umode = SEEK_CUR;
4814 res = fsp->fh->pos + startpos;
4815 break;
4816 case 2:
4817 umode = SEEK_END;
4818 break;
4819 default:
4820 umode = SEEK_SET;
4821 res = startpos;
4822 break;
4823 }
4824
4825 if (umode == SEEK_END) {
4826 if((res = SMB_VFS_LSEEK(fsp,startpos,umode)) == -1) {
4827 if(errno == EINVAL) {
4828 off_t current_pos = startpos;
4829
4830 if(fsp_stat(fsp) == -1) {
4831 reply_nterror(req,
4832 map_nt_error_from_unix(errno));
4833 END_PROFILE(SMBlseek);
4834 return;
4835 }
4836
4837 current_pos += fsp->fsp_name->st.st_ex_size;
4838 if(current_pos < 0)
4839 res = SMB_VFS_LSEEK(fsp,0,SEEK_SET);
4840 }
4841 }
4842
4843 if(res == -1) {
4844 reply_nterror(req, map_nt_error_from_unix(errno));
4845 END_PROFILE(SMBlseek);
4846 return;
4847 }
4848 }
4849
4850 fsp->fh->pos = res;
4851
4852 reply_outbuf(req, 2, 0);
4853 SIVAL(req->outbuf,smb_vwv0,res);
4854
4855 DEBUG(3,("lseek %s ofs=%.0f newpos = %.0f mode=%d\n",
4856 fsp_fnum_dbg(fsp), (double)startpos, (double)res, mode));
4857
4858 END_PROFILE(SMBlseek);
4859 return;
4860 }
4861
4862 /****************************************************************************
4863 Reply to a flush.
4864 ****************************************************************************/
4865
4866 void reply_flush(struct smb_request *req)
4867 {
4868 connection_struct *conn = req->conn;
4869 uint16 fnum;
4870 files_struct *fsp;
4871
4872 START_PROFILE(SMBflush);
4873
4874 if (req->wct < 1) {
4875 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4876 return;
4877 }
4878
4879 fnum = SVAL(req->vwv+0, 0);
4880 fsp = file_fsp(req, fnum);
4881
4882 if ((fnum != 0xFFFF) && !check_fsp(conn, req, fsp)) {
4883 return;
4884 }
4885
4886 if (!fsp) {
4887 file_sync_all(conn);
4888 } else {
4889 NTSTATUS status = sync_file(conn, fsp, True);
4890 if (!NT_STATUS_IS_OK(status)) {
4891 DEBUG(5,("reply_flush: sync_file for %s returned %s\n",
4892 fsp_str_dbg(fsp), nt_errstr(status)));
4893 reply_nterror(req, status);
4894 END_PROFILE(SMBflush);
4895 return;
4896 }
4897 }
4898
4899 reply_outbuf(req, 0, 0);
4900
4901 DEBUG(3,("flush\n"));
4902 END_PROFILE(SMBflush);
4903 return;
4904 }
4905
4906 /****************************************************************************
4907 Reply to a exit.
4908 conn POINTER CAN BE NULL HERE !
4909 ****************************************************************************/
4910
4911 void reply_exit(struct smb_request *req)
4912 {
4913 START_PROFILE(SMBexit);
4914
4915 file_close_pid(req->sconn, req->smbpid, req->vuid);
4916
4917 reply_outbuf(req, 0, 0);
4918
4919 DEBUG(3,("exit\n"));
4920
4921 END_PROFILE(SMBexit);
4922 return;
4923 }
4924
4925 struct reply_close_state {
4926 files_struct *fsp;
4927 struct smb_request *smbreq;
4928 };
4929
4930 static void do_smb1_close(struct tevent_req *req);
4931
4932 void reply_close(struct smb_request *req)
4933 {
4934 connection_struct *conn = req->conn;
4935 NTSTATUS status = NT_STATUS_OK;
4936 files_struct *fsp = NULL;
4937 START_PROFILE(SMBclose);
4938
4939 if (req->wct < 3) {
4940 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4941 END_PROFILE(SMBclose);
4942 return;
4943 }
4944
4945 fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4946
4947 /*
4948 * We can only use check_fsp if we know it's not a directory.
4949 */
4950
4951 if (!check_fsp_open(conn, req, fsp)) {
4952 reply_nterror(req, NT_STATUS_INVALID_HANDLE);
4953 END_PROFILE(SMBclose);
4954 return;
4955 }
4956
4957 DEBUG(3, ("Close %s fd=%d %s (numopen=%d)\n",
4958 fsp->is_directory ? "directory" : "file",
4959 fsp->fh->fd, fsp_fnum_dbg(fsp),
4960 conn->num_files_open));
4961
4962 if (!fsp->is_directory) {
4963 time_t t;
4964
4965 /*
4966 * Take care of any time sent in the close.
4967 */
4968
4969 t = srv_make_unix_date3(req->vwv+1);
4970 set_close_write_time(fsp, convert_time_t_to_timespec(t));
4971 }
4972
4973 if (fsp->num_aio_requests != 0) {
4974
4975 struct reply_close_state *state;
4976
4977 DEBUG(10, ("closing with aio %u requests pending\n",
4978 fsp->num_aio_requests));
4979
4980 /*
4981 * We depend on the aio_extra destructor to take care of this
4982 * close request once fsp->num_aio_request drops to 0.
4983 */
4984
4985 fsp->deferred_close = tevent_wait_send(
4986 fsp, fsp->conn->sconn->ev_ctx);
4987 if (fsp->deferred_close == NULL) {
4988 status = NT_STATUS_NO_MEMORY;
4989 goto done;
4990 }
4991
4992 state = talloc(fsp, struct reply_close_state);
4993 if (state == NULL) {
4994 TALLOC_FREE(fsp->deferred_close);
4995 status = NT_STATUS_NO_MEMORY;
4996 goto done;
4997 }
4998 state->fsp = fsp;
4999 state->smbreq = talloc_move(fsp, &req);
5000 tevent_req_set_callback(fsp->deferred_close, do_smb1_close,
5001 state);
5002 END_PROFILE(SMBclose);
5003 return;
5004 }
5005
5006 /*
5007 * close_file() returns the unix errno if an error was detected on
5008 * close - normally this is due to a disk full error. If not then it
5009 * was probably an I/O error.
5010 */
5011
5012 status = close_file(req, fsp, NORMAL_CLOSE);
5013 done:
5014 if (!NT_STATUS_IS_OK(status)) {
5015 reply_nterror(req, status);
5016 END_PROFILE(SMBclose);
5017 return;
5018 }
5019
5020 reply_outbuf(req, 0, 0);
5021 END_PROFILE(SMBclose);
5022 return;
5023 }
5024
5025 static void do_smb1_close(struct tevent_req *req)
5026 {
5027 struct reply_close_state *state = tevent_req_callback_data(
5028 req, struct reply_close_state);
5029 struct smb_request *smbreq;
5030 NTSTATUS status;
5031 int ret;
5032
5033 ret = tevent_wait_recv(req);
5034 TALLOC_FREE(req);
5035 if (ret != 0) {
5036 DEBUG(10, ("tevent_wait_recv returned %s\n",
5037 strerror(ret)));
5038 /*
5039 * Continue anyway, this should never happen
5040 */
5041 }
5042
5043 /*
5044 * fsp->smb2_close_request right now is a talloc grandchild of
5045 * fsp. When we close_file(fsp), it would go with it. No chance to
5046 * reply...
5047 */
5048 smbreq = talloc_move(talloc_tos(), &state->smbreq);
5049
5050 status = close_file(smbreq, state->fsp, NORMAL_CLOSE);
5051 if (NT_STATUS_IS_OK(status)) {
5052 reply_outbuf(smbreq, 0, 0);
5053 } else {
5054 reply_nterror(smbreq, status);
5055 }
5056 if (!srv_send_smb(smbreq->sconn,
5057 (char *)smbreq->outbuf,
5058 true,
5059 smbreq->seqnum+1,
5060 IS_CONN_ENCRYPTED(smbreq->conn)||smbreq->encrypted,
5061 NULL)) {
5062 exit_server_cleanly("handle_aio_read_complete: srv_send_smb "
5063 "failed.");
5064 }
5065 TALLOC_FREE(smbreq);
5066 }
5067
5068 /****************************************************************************
5069 Reply to a writeclose (Core+ protocol).
5070 ****************************************************************************/
5071
5072 void reply_writeclose(struct smb_request *req)
5073 {
5074 connection_struct *conn = req->conn;
5075 size_t numtowrite;
5076 ssize_t nwritten = -1;
5077 NTSTATUS close_status = NT_STATUS_OK;
5078 off_t startpos;
5079 const char *data;
5080 struct timespec mtime;
5081 files_struct *fsp;
5082 struct lock_struct lock;
5083
5084 START_PROFILE(SMBwriteclose);
5085
5086 if (req->wct < 6) {
5087 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
5088 END_PROFILE(SMBwriteclose);
5089 return;
5090 }
5091
5092 fsp = file_fsp(req, SVAL(req->vwv+0, 0));
5093
5094 if (!check_fsp(conn, req, fsp)) {
5095 END_PROFILE(SMBwriteclose);
5096 return;
5097 }
5098 if (!CHECK_WRITE(fsp)) {
5099 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
5100 END_PROFILE(SMBwriteclose);
5101 return;
5102 }
5103
5104 numtowrite = SVAL(req->vwv+1, 0);
5105 startpos = IVAL_TO_SMB_OFF_T(req->vwv+2, 0);
5106 mtime = convert_time_t_to_timespec(srv_make_unix_date3(req->vwv+4));
5107 data = (const char *)req->buf + 1;
5108
5109 if (!fsp->print_file) {
5110 init_strict_lock_struct(fsp, (uint64_t)req->smbpid,
5111 (uint64_t)startpos, (uint64_t)numtowrite, WRITE_LOCK,
5112 &lock);
5113
5114 if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
5115 reply_nterror(req, NT_STATUS_FILE_LOCK_CONFLICT);
5116 END_PROFILE(SMBwriteclose);
5117 return;
5118 }
5119 }
5120
5121 nwritten = write_file(req,fsp,data,startpos,numtowrite);
5122
5123 set_close_write_time(fsp, mtime);
5124
5125 /*
5126 * More insanity. W2K only closes the file if writelen > 0.
5127 * JRA.
5128 */
5129
5130 if (numtowrite) {
5131 DEBUG(3,("reply_writeclose: zero length write doesn't close "
5132 "file %s\n", fsp_str_dbg(fsp)));
5133 close_status = close_file(req, fsp, NORMAL_CLOSE);
5134 }
5135
5136 DEBUG(3,("writeclose %s num=%d wrote=%d (numopen=%d)\n",
5137 fsp_fnum_dbg(fsp), (int)numtowrite, (int)nwritten,
5138 conn->num_files_open));
5139
5140 if(((nwritten == 0) && (numtowrite != 0))||(nwritten < 0)) {
5141 reply_nterror(req, NT_STATUS_DISK_FULL);
5142 goto strict_unlock;
5143 }
5144
5145 if(!NT_STATUS_IS_OK(close_status)) {
5146 reply_nterror(req, close_status);
5147 goto strict_unlock;
5148 }
5149
5150 reply_outbuf(req, 1, 0);
5151
5152 SSVAL(req->outbuf,smb_vwv0,nwritten);
5153
5154 strict_unlock:
5155 if (numtowrite && !fsp->print_file) {
5156 SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
5157 }
5158
5159 END_PROFILE(SMBwriteclose);
5160 return;
5161 }
5162
5163 #undef DBGC_CLASS
5164 #define DBGC_CLASS DBGC_LOCKING
5165
5166 /****************************************************************************
5167 Reply to a lock.
5168 ****************************************************************************/
5169
5170 void reply_lock(struct smb_request *req)
5171 {
5172 connection_struct *conn = req->conn;
5173 uint64_t count,offset;
5174 NTSTATUS status;
5175 files_struct *fsp;
5176 struct byte_range_lock *br_lck = NULL;
5177
5178 START_PROFILE(SMBlock);
5179
5180 if (req->wct < 5) {
5181 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
5182 END_PROFILE(SMBlock);
5183 return;
5184 }
5185
5186 fsp = file_fsp(req, SVAL(req->vwv+0, 0));
5187
5188 if (!check_fsp(conn, req, fsp)) {
5189 END_PROFILE(SMBlock);
5190 return;
5191 }
5192
5193 count = (uint64_t)IVAL(req->vwv+1, 0);
5194 offset = (uint64_t)IVAL(req->vwv+3, 0);
5195
5196 DEBUG(3,("lock fd=%d %s offset=%.0f count=%.0f\n",
5197 fsp->fh->fd, fsp_fnum_dbg(fsp), (double)offset, (double)count));
5198
5199 br_lck = do_lock(req->sconn->msg_ctx,
5200 fsp,
5201 (uint64_t)req->smbpid,
5202 count,
5203 offset,
5204 WRITE_LOCK,
5205 WINDOWS_LOCK,
5206 False, /* Non-blocking lock. */
5207 &status,
5208 NULL,
5209 NULL);
5210
5211 TALLOC_FREE(br_lck);
5212
5213 if (NT_STATUS_V(status)) {
5214 reply_nterror(req, status);
5215 END_PROFILE(SMBlock);
5216 return;
5217 }
5218
5219 reply_outbuf(req, 0, 0);
5220
5221 END_PROFILE(SMBlock);
5222 return;
5223 }
5224
5225 /****************************************************************************
5226 Reply to a unlock.
5227 ****************************************************************************/
5228
5229 void reply_unlock(struct smb_request *req)
5230 {
5231 connection_struct *conn = req->conn;
5232 uint64_t count,offset;
5233 NTSTATUS status;
5234 files_struct *fsp;
5235
5236 START_PROFILE(SMBunlock);
5237
5238 if (req->wct < 5) {
5239 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
5240 END_PROFILE(SMBunlock);
5241 return;
5242 }
5243
5244 fsp = file_fsp(req, SVAL(req->vwv+0, 0));
5245
5246 if (!check_fsp(conn, req, fsp)) {
5247 END_PROFILE(SMBunlock);
5248 return;
5249 }
5250
5251 count = (uint64_t)IVAL(req->vwv+1, 0);
5252 offset = (uint64_t)IVAL(req->vwv+3, 0);
5253
5254 status = do_unlock(req->sconn->msg_ctx,
5255 fsp,
5256 (uint64_t)req->smbpid,
5257 count,
5258 offset,
5259 WINDOWS_LOCK);
5260
5261 if (NT_STATUS_V(status)) {
5262 reply_nterror(req, status);
5263 END_PROFILE(SMBunlock);
5264 return;
5265 }
5266
5267 DEBUG( 3, ( "unlock fd=%d %s offset=%.0f count=%.0f\n",
5268 fsp->fh->fd, fsp_fnum_dbg(fsp), (double)offset, (double)count ) );
5269
5270 reply_outbuf(req, 0, 0);
5271
5272 END_PROFILE(SMBunlock);
5273 return;
5274 }
5275
5276 #undef DBGC_CLASS
5277 #define DBGC_CLASS DBGC_ALL
5278
5279 /****************************************************************************
5280 Reply to a tdis.
5281 conn POINTER CAN BE NULL HERE !
5282 ****************************************************************************/
5283
5284 void reply_tdis(struct smb_request *req)
5285 {
5286 NTSTATUS status;
5287 connection_struct *conn = req->conn;
5288 struct smbXsrv_tcon *tcon;
5289
5290 START_PROFILE(SMBtdis);
5291
5292 if (!conn) {
5293 DEBUG(4,("Invalid connection in tdis\n"));
5294 reply_force_doserror(req, ERRSRV, ERRinvnid);
5295 END_PROFILE(SMBtdis);
5296 return;
5297 }
5298
5299 tcon = conn->tcon;
5300 req->conn = NULL;
5301
5302 /*
5303 * TODO: cancel all outstanding requests on the tcon
5304 */
5305 status = smbXsrv_tcon_disconnect(tcon, req->vuid);
5306 if (!NT_STATUS_IS_OK(status)) {
5307 DEBUG(0, ("reply_tdis: "
5308 "smbXsrv_tcon_disconnect() failed: %s\n",
5309 nt_errstr(status)));
5310 /*
5311 * If we hit this case, there is something completely
5312 * wrong, so we better disconnect the transport connection.
5313 */
5314 END_PROFILE(SMBtdis);
5315 exit_server(__location__ ": smbXsrv_tcon_disconnect failed");
5316 return;
5317 }
5318
5319 TALLOC_FREE(tcon);
5320
5321 reply_outbuf(req, 0, 0);
5322 END_PROFILE(SMBtdis);
5323 return;
5324 }
5325
5326 /****************************************************************************
5327 Reply to a echo.
5328 conn POINTER CAN BE NULL HERE !
5329 ****************************************************************************/
5330
5331 void reply_echo(struct smb_request *req)
5332 {
5333 connection_struct *conn = req->conn;
5334 struct smb_perfcount_data local_pcd;
5335 struct smb_perfcount_data *cur_pcd;
5336 int smb_reverb;
5337 int seq_num;
5338
5339 START_PROFILE(SMBecho);
5340
5341 smb_init_perfcount_data(&local_pcd);
5342
5343 if (req->wct < 1) {
5344 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
5345 END_PROFILE(SMBecho);
5346 return;
5347 }
5348
5349 smb_reverb = SVAL(req->vwv+0, 0);
5350
5351 reply_outbuf(req, 1, req->buflen);
5352
5353 /* copy any incoming data back out */
5354 if (req->buflen > 0) {
5355 memcpy(smb_buf(req->outbuf), req->buf, req->buflen);
5356 }
5357
5358 if (smb_reverb > 100) {
5359 DEBUG(0,("large reverb (%d)?? Setting to 100\n",smb_reverb));
5360 smb_reverb = 100;
5361 }
5362
5363 for (seq_num = 1 ; seq_num <= smb_reverb ; seq_num++) {
5364
5365 /* this makes sure we catch the request pcd */
5366 if (seq_num == smb_reverb) {
5367 cur_pcd = &req->pcd;
5368 } else {
5369 SMB_PERFCOUNT_COPY_CONTEXT(&req->pcd, &local_pcd);
5370 cur_pcd = &local_pcd;
5371 }
5372
5373 SSVAL(req->outbuf,smb_vwv0,seq_num);
5374
5375 show_msg((char *)req->outbuf);
5376 if (!srv_send_smb(req->sconn,
5377 (char *)req->outbuf,
5378 true, req->seqnum+1,
5379 IS_CONN_ENCRYPTED(conn)||req->encrypted,
5380 cur_pcd))
5381 exit_server_cleanly("reply_echo: srv_send_smb failed.");
5382 }
5383
5384 DEBUG(3,("echo %d times\n", smb_reverb));
5385
5386 TALLOC_FREE(req->outbuf);
5387
5388 END_PROFILE(SMBecho);
5389 return;
5390 }
5391
5392 /****************************************************************************
5393 Reply to a printopen.
5394 ****************************************************************************/
5395
5396 void reply_printopen(struct smb_request *req)
5397 {
5398 connection_struct *conn = req->conn;
5399 files_struct *fsp;
5400 NTSTATUS status;
5401
5402 START_PROFILE(SMBsplopen);
5403
5404 if (req->wct < 2) {
5405 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
5406 END_PROFILE(SMBsplopen);
5407 return;
5408 }
5409
5410 if (!CAN_PRINT(conn)) {
5411 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
5412 END_PROFILE(SMBsplopen);
5413 return;
5414 }
5415
5416 status = file_new(req, conn, &fsp);
5417 if(!NT_STATUS_IS_OK(status)) {
5418 reply_nterror(req, status);
5419 END_PROFILE(SMBsplopen);
5420 return;
5421 }
5422
5423 /* Open for exclusive use, write only. */
5424 status = print_spool_open(fsp, NULL, req->vuid);
5425
5426 if (!NT_STATUS_IS_OK(status)) {
5427 file_free(req, fsp);
5428 reply_nterror(req, status);
5429 END_PROFILE(SMBsplopen);
5430 return;
5431 }
5432
5433 reply_outbuf(req, 1, 0);
5434 SSVAL(req->outbuf,smb_vwv0,fsp->fnum);
5435
5436 DEBUG(3,("openprint fd=%d %s\n",
5437 fsp->fh->fd, fsp_fnum_dbg(fsp)));
5438
5439 END_PROFILE(SMBsplopen);
5440 return;
5441 }
5442
5443 /****************************************************************************
5444 Reply to a printclose.
5445 ****************************************************************************/
5446
5447 void reply_printclose(struct smb_request *req)
5448 {
5449 connection_struct *conn = req->conn;
5450 files_struct *fsp;
5451 NTSTATUS status;
5452
5453 START_PROFILE(SMBsplclose);
5454
5455 if (req->wct < 1) {
5456 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
5457 END_PROFILE(SMBsplclose);
5458 return;
5459 }
5460
5461 fsp = file_fsp(req, SVAL(req->vwv+0, 0));
5462
5463 if (!check_fsp(conn, req, fsp)) {
5464 END_PROFILE(SMBsplclose);
5465 return;
5466 }
5467
5468 if (!CAN_PRINT(conn)) {
5469 reply_force_doserror(req, ERRSRV, ERRerror);
5470 END_PROFILE(SMBsplclose);
5471 return;
5472 }
5473
5474 DEBUG(3,("printclose fd=%d %s\n",
5475 fsp->fh->fd, fsp_fnum_dbg(fsp)));
5476
5477 status = close_file(req, fsp, NORMAL_CLOSE);
5478
5479 if(!NT_STATUS_IS_OK(status)) {
5480 reply_nterror(req, status);
5481 END_PROFILE(SMBsplclose);
5482 return;
5483 }
5484
5485 reply_outbuf(req, 0, 0);
5486
5487 END_PROFILE(SMBsplclose);
5488 return;
5489 }
5490
5491 /****************************************************************************
5492 Reply to a printqueue.
5493 ****************************************************************************/
5494
5495 void reply_printqueue(struct smb_request *req)
5496 {
5497 connection_struct *conn = req->conn;
5498 int max_count;
5499 int start_index;
5500
5501 START_PROFILE(SMBsplretq);
5502
5503 if (req->wct < 2) {
5504 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
5505 END_PROFILE(SMBsplretq);
5506 return;
5507 }
5508
5509 max_count = SVAL(req->vwv+0, 0);
5510 start_index = SVAL(req->vwv+1, 0);
5511
5512 /* we used to allow the client to get the cnum wrong, but that
5513 is really quite gross and only worked when there was only
5514 one printer - I think we should now only accept it if they
5515 get it right (tridge) */
5516 if (!CAN_PRINT(conn)) {
5517 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
5518 END_PROFILE(SMBsplretq);
5519 return;
5520 }
5521
5522 reply_outbuf(req, 2, 3);
5523 SSVAL(req->outbuf,smb_vwv0,0);
5524 SSVAL(req->outbuf,smb_vwv1,0);
5525 SCVAL(smb_buf(req->outbuf),0,1);
5526 SSVAL(smb_buf(req->outbuf),1,0);
5527
5528 DEBUG(3,("printqueue start_index=%d max_count=%d\n",
5529 start_index, max_count));
5530
5531 {
5532 TALLOC_CTX *mem_ctx = talloc_tos();
5533 NTSTATUS status;
5534 WERROR werr;
5535 const char *sharename = lp_servicename(mem_ctx, SNUM(conn));
5536 struct rpc_pipe_client *cli = NULL;
5537 struct dcerpc_binding_handle *b = NULL;
5538 struct policy_handle handle;
5539 struct spoolss_DevmodeContainer devmode_ctr;
5540 union spoolss_JobInfo *info;
5541 uint32_t count;
5542 uint32_t num_to_get;
5543 uint32_t first;
5544 uint32_t i;
5545
5546 ZERO_STRUCT(handle);
5547
5548 status = rpc_pipe_open_interface(conn,
5549 &ndr_table_spoolss.syntax_id,
5550 conn->session_info,
5551 conn->sconn->remote_address,
5552 conn->sconn->msg_ctx,
5553 &cli);
5554 if (!NT_STATUS_IS_OK(status)) {
5555 DEBUG(0, ("reply_printqueue: "
5556 "could not connect to spoolss: %s\n",
5557 nt_errstr(status)));
5558 reply_nterror(req, status);
5559 goto out;
5560 }
5561 b = cli->binding_handle;
5562
5563 ZERO_STRUCT(devmode_ctr);
5564
5565 status = dcerpc_spoolss_OpenPrinter(b, mem_ctx,
5566 sharename,
5567 NULL, devmode_ctr,
5568 SEC_FLAG_MAXIMUM_ALLOWED,
5569 &handle,
5570 &werr);
5571 if (!NT_STATUS_IS_OK(status)) {
5572 reply_nterror(req, status);
5573 goto out;
5574 }
5575 if (!W_ERROR_IS_OK(werr)) {
5576 reply_nterror(req, werror_to_ntstatus(werr));
5577 goto out;
5578 }
5579
5580 werr = rpccli_spoolss_enumjobs(cli, mem_ctx,
5581 &handle,
5582 0, /* firstjob */
5583 0xff, /* numjobs */
5584 2, /* level */
5585 0, /* offered */
5586 &count,
5587 &info);
5588 if (!W_ERROR_IS_OK(werr)) {
5589 reply_nterror(req, werror_to_ntstatus(werr));
5590 goto out;
5591 }
5592
5593 if (max_count > 0) {
5594 first = start_index;
5595 } else {
5596 first = start_index + max_count + 1;
5597 }
5598
5599 if (first >= count) {
5600 num_to_get = first;
5601 } else {
5602 num_to_get = first + MIN(ABS(max_count), count - first);
5603 }
5604
5605 for (i = first; i < num_to_get; i++) {
5606 char blob[28];
5607 char *p = blob;
5608 time_t qtime = spoolss_Time_to_time_t(&info[i].info2.submitted);
5609 int qstatus;
5610 uint16_t qrapjobid = pjobid_to_rap(sharename,
5611 info[i].info2.job_id);
5612
5613 if (info[i].info2.status == JOB_STATUS_PRINTING) {
5614 qstatus = 2;
5615 } else {
5616 qstatus = 3;
5617 }
5618
5619 srv_put_dos_date2(p, 0, qtime);
5620 SCVAL(p, 4, qstatus);
5621 SSVAL(p, 5, qrapjobid);
5622 SIVAL(p, 7, info[i].info2.size);
5623 SCVAL(p, 11, 0);
5624 srvstr_push(blob, req->flags2, p+12,
5625 info[i].info2.notify_name, 16, STR_ASCII);
5626
5627 if (message_push_blob(
5628 &req->outbuf,
5629 data_blob_const(
5630 blob, sizeof(blob))) == -1) {
5631 reply_nterror(req, NT_STATUS_NO_MEMORY);
5632 goto out;
5633 }
5634 }
5635
5636 if (count > 0) {
5637 SSVAL(req->outbuf,smb_vwv0,count);
5638 SSVAL(req->outbuf,smb_vwv1,
5639 (max_count>0?first+count:first-1));
5640 SCVAL(smb_buf(req->outbuf),0,1);
5641 SSVAL(smb_buf(req->outbuf),1,28*count);
5642 }
5643
5644
5645 DEBUG(3, ("%u entries returned in queue\n",
5646 (unsigned)count));
5647
5648 out:
5649 if (b && is_valid_policy_hnd(&handle)) {
5650 dcerpc_spoolss_ClosePrinter(b, mem_ctx, &handle, &werr);
5651 }
5652
5653 }
5654
5655 END_PROFILE(SMBsplretq);
5656 return;
5657 }
5658
5659 /****************************************************************************
5660 Reply to a printwrite.
5661 ****************************************************************************/
5662
5663 void reply_printwrite(struct smb_request *req)
5664 {
5665 connection_struct *conn = req->conn;
5666 int numtowrite;
5667 const char *data;
5668 files_struct *fsp;
5669
5670 START_PROFILE(SMBsplwr);
5671
5672 if (req->wct < 1) {
5673 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
5674 END_PROFILE(SMBsplwr);
5675 return;
5676 }
5677
5678 fsp = file_fsp(req, SVAL(req->vwv+0, 0));
5679
5680 if (!check_fsp(conn, req, fsp)) {
5681 END_PROFILE(SMBsplwr);
5682 return;
5683 }
5684
5685 if (!fsp->print_file) {
5686 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
5687 END_PROFILE(SMBsplwr);
5688 return;
5689 }
5690
5691 if (!CHECK_WRITE(fsp)) {
5692 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
5693 END_PROFILE(SMBsplwr);
5694 return;
5695 }
5696
5697 numtowrite = SVAL(req->buf, 1);
5698
5699 if (req->buflen < numtowrite + 3) {
5700 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
5701 END_PROFILE(SMBsplwr);
5702 return;
5703 }
5704
5705 data = (const char *)req->buf + 3;
5706
5707 if (write_file(req,fsp,data,(off_t)-1,numtowrite) != numtowrite) {
5708 reply_nterror(req, map_nt_error_from_unix(errno));
5709 END_PROFILE(SMBsplwr);
5710 return;
5711 }
5712
5713 DEBUG(3, ("printwrite %s num=%d\n", fsp_fnum_dbg(fsp), numtowrite));
5714
5715 END_PROFILE(SMBsplwr);
5716 return;
5717 }
5718
5719 /****************************************************************************
5720 Reply to a mkdir.
5721 ****************************************************************************/
5722
5723 void reply_mkdir(struct smb_request *req)
5724 {
5725 connection_struct *conn = req->conn;
5726 struct smb_filename *smb_dname = NULL;
5727 char *directory = NULL;
5728 NTSTATUS status;
5729 TALLOC_CTX *ctx = talloc_tos();
5730
5731 START_PROFILE(SMBmkdir);
5732
5733 srvstr_get_path_req(ctx, req, &directory, (const char *)req->buf + 1,
5734 STR_TERMINATE, &status);
5735 if (!NT_STATUS_IS_OK(status)) {
5736 reply_nterror(req, status);
5737 goto out;
5738 }
5739
5740 status = filename_convert(ctx, conn,
5741 req->flags2 & FLAGS2_DFS_PATHNAMES,
5742 directory,
5743 0,
5744 NULL,
5745 &smb_dname);
5746 if (!NT_STATUS_IS_OK(status)) {
5747 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
5748 reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
5749 ERRSRV, ERRbadpath);
5750 goto out;
5751 }
5752 reply_nterror(req, status);
5753 goto out;
5754 }
5755
5756 status = create_directory(conn, req, smb_dname);
5757
5758 DEBUG(5, ("create_directory returned %s\n", nt_errstr(status)));
5759
5760 if (!NT_STATUS_IS_OK(status)) {
5761
5762 if (!use_nt_status()
5763 && NT_STATUS_EQUAL(status,
5764 NT_STATUS_OBJECT_NAME_COLLISION)) {
5765 /*
5766 * Yes, in the DOS error code case we get a
5767 * ERRDOS:ERRnoaccess here. See BASE-SAMBA3ERROR
5768 * samba4 torture test.
5769 */
5770 status = NT_STATUS_DOS(ERRDOS, ERRnoaccess);
5771 }
5772
5773 reply_nterror(req, status);
5774 goto out;
5775 }
5776
5777 reply_outbuf(req, 0, 0);
5778
5779 DEBUG(3, ("mkdir %s\n", smb_dname->base_name));
5780 out:
5781 TALLOC_FREE(smb_dname);
5782 END_PROFILE(SMBmkdir);
5783 return;
5784 }
5785
5786 /****************************************************************************
5787 Reply to a rmdir.
5788 ****************************************************************************/
5789
5790 void reply_rmdir(struct smb_request *req)
5791 {
5792 connection_struct *conn = req->conn;
5793 struct smb_filename *smb_dname = NULL;
5794 char *directory = NULL;
5795 NTSTATUS status;
5796 TALLOC_CTX *ctx = talloc_tos();
5797 files_struct *fsp = NULL;
5798 int info = 0;
5799 struct smbd_server_connection *sconn = req->sconn;
5800
5801 START_PROFILE(SMBrmdir);
5802
5803 srvstr_get_path_req(ctx, req, &directory, (const char *)req->buf + 1,
5804 STR_TERMINATE, &status);
5805 if (!NT_STATUS_IS_OK(status)) {
5806 reply_nterror(req, status);
5807 goto out;
5808 }
5809
5810 status = filename_convert(ctx, conn,
5811 req->flags2 & FLAGS2_DFS_PATHNAMES,
5812 directory,
5813 0,
5814 NULL,
5815 &smb_dname);
5816 if (!NT_STATUS_IS_OK(status)) {
5817 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
5818 reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
5819 ERRSRV, ERRbadpath);
5820 goto out;
5821 }
5822 reply_nterror(req, status);
5823 goto out;
5824 }
5825
5826 if (is_ntfs_stream_smb_fname(smb_dname)) {
5827 reply_nterror(req, NT_STATUS_NOT_A_DIRECTORY);
5828 goto out;
5829 }
5830
5831 status = SMB_VFS_CREATE_FILE(
5832 conn, /* conn */
5833 req, /* req */
5834 0, /* root_dir_fid */
5835 smb_dname, /* fname */
5836 DELETE_ACCESS, /* access_mask */
5837 (FILE_SHARE_READ | FILE_SHARE_WRITE | /* share_access */
5838 FILE_SHARE_DELETE),
5839 FILE_OPEN, /* create_disposition*/
5840 FILE_DIRECTORY_FILE, /* create_options */
5841 FILE_ATTRIBUTE_DIRECTORY, /* file_attributes */
5842 0, /* oplock_request */
5843 0, /* allocation_size */
5844 0, /* private_flags */
5845 NULL, /* sd */
5846 NULL, /* ea_list */
5847 &fsp, /* result */
5848 &info); /* pinfo */
5849
5850 if (!NT_STATUS_IS_OK(status)) {
5851 if (open_was_deferred(req->sconn, req->mid)) {
5852 /* We have re-scheduled this call. */
5853 goto out;
5854 }
5855 reply_nterror(req, status);
5856 goto out;
5857 }
5858
5859 status = can_set_delete_on_close(fsp, FILE_ATTRIBUTE_DIRECTORY);
5860 if (!NT_STATUS_IS_OK(status)) {
5861 close_file(req, fsp, ERROR_CLOSE);
5862 reply_nterror(req, status);
5863 goto out;
5864 }
5865
5866 if (!set_delete_on_close(fsp, true,
5867 conn->session_info->security_token,
5868 conn->session_info->unix_token)) {
5869 close_file(req, fsp, ERROR_CLOSE);
5870 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
5871 goto out;
5872 }
5873
5874 status = close_file(req, fsp, NORMAL_CLOSE);
5875 if (!NT_STATUS_IS_OK(status)) {
5876 reply_nterror(req, status);
5877 } else {
5878 reply_outbuf(req, 0, 0);
5879 }
5880
5881 dptr_closepath(sconn, smb_dname->base_name, req->smbpid);
5882
5883 DEBUG(3, ("rmdir %s\n", smb_fname_str_dbg(smb_dname)));
5884 out:
5885 TALLOC_FREE(smb_dname);
5886 END_PROFILE(SMBrmdir);
5887 return;
5888 }
5889
5890 /*******************************************************************
5891 Resolve wildcards in a filename rename.
5892 ********************************************************************/
5893
5894 static bool resolve_wildcards(TALLOC_CTX *ctx,
5895 const char *name1,
5896 const char *name2,
5897 char **pp_newname)
5898 {
5899 char *name2_copy = NULL;
5900 char *root1 = NULL;
5901 char *root2 = NULL;
5902 char *ext1 = NULL;
5903 char *ext2 = NULL;
5904 char *p,*p2, *pname1, *pname2;
5905
5906 name2_copy = talloc_strdup(ctx, name2);
5907 if (!name2_copy) {
5908 return False;
5909 }
5910
5911 pname1 = strrchr_m(name1,'/');
5912 pname2 = strrchr_m(name2_copy,'/');
5913
5914 if (!pname1 || !pname2) {
5915 return False;
5916 }
5917
5918 /* Truncate the copy of name2 at the last '/' */
5919 *pname2 = '\0';
5920
5921 /* Now go past the '/' */
5922 pname1++;
5923 pname2++;
5924
5925 root1 = talloc_strdup(ctx, pname1);
5926 root2 = talloc_strdup(ctx, pname2);
5927
5928 if (!root1 || !root2) {
5929 return False;
5930 }
5931
5932 p = strrchr_m(root1,'.');
5933 if (p) {
5934 *p = 0;
5935 ext1 = talloc_strdup(ctx, p+1);
5936 } else {
5937 ext1 = talloc_strdup(ctx, "");
5938 }
5939 p = strrchr_m(root2,'.');
5940 if (p) {
5941 *p = 0;
5942 ext2 = talloc_strdup(ctx, p+1);
5943 } else {
5944 ext2 = talloc_strdup(ctx, "");
5945 }
5946
5947 if (!ext1 || !ext2) {
5948 return False;
5949 }
5950
5951 p = root1;
5952 p2 = root2;
5953 while (*p2) {
5954 if (*p2 == '?') {
5955 /* Hmmm. Should this be mb-aware ? */
5956 *p2 = *p;
5957 p2++;
5958 } else if (*p2 == '*') {
5959 *p2 = '\0';
5960 root2 = talloc_asprintf(ctx, "%s%s",
5961 root2,
5962 p);
5963 if (!root2) {
5964 return False;
5965 }
5966 break;
5967 } else {
5968 p2++;
5969 }
5970 if (*p) {
5971 p++;
5972 }
5973 }
5974
5975 p = ext1;
5976 p2 = ext2;
5977 while (*p2) {
5978 if (*p2 == '?') {
5979 /* Hmmm. Should this be mb-aware ? */
5980 *p2 = *p;
5981 p2++;
5982 } else if (*p2 == '*') {
5983 *p2 = '\0';
5984 ext2 = talloc_asprintf(ctx, "%s%s",
5985 ext2,
5986 p);
5987 if (!ext2) {
5988 return False;
5989 }
5990 break;
5991 } else {
5992 p2++;
5993 }
5994 if (*p) {
5995 p++;
5996 }
5997 }
5998
5999 if (*ext2) {
6000 *pp_newname = talloc_asprintf(ctx, "%s/%s.%s",
6001 name2_copy,
6002 root2,
6003 ext2);
6004 } else {
6005 *pp_newname = talloc_asprintf(ctx, "%s/%s",
6006 name2_copy,
6007 root2);
6008 }
6009
6010 if (!*pp_newname) {
6011 return False;
6012 }
6013
6014 return True;
6015 }
6016
6017 /****************************************************************************
6018 Ensure open files have their names updated. Updated to notify other smbd's
6019 asynchronously.
6020 ****************************************************************************/
6021
6022 static void rename_open_files(connection_struct *conn,
6023 struct share_mode_lock *lck,
6024 uint32_t orig_name_hash,
6025 const struct smb_filename *smb_fname_dst)
6026 {
6027 files_struct *fsp;
6028 bool did_rename = False;
6029 NTSTATUS status;
6030 uint32_t new_name_hash = 0;
6031
6032 for(fsp = file_find_di_first(conn->sconn, lck->data->id); fsp;
6033 fsp = file_find_di_next(fsp)) {
6034 /* fsp_name is a relative path under the fsp. To change this for other
6035 sharepaths we need to manipulate relative paths. */
6036 /* TODO - create the absolute path and manipulate the newname
6037 relative to the sharepath. */
6038 if (!strequal(fsp->conn->connectpath, conn->connectpath)) {
6039 continue;
6040 }
6041 if (fsp->name_hash != orig_name_hash) {
6042 continue;
6043 }
6044 DEBUG(10, ("rename_open_files: renaming file %s "
6045 "(file_id %s) from %s -> %s\n", fsp_fnum_dbg(fsp),
6046 file_id_string_tos(&fsp->file_id), fsp_str_dbg(fsp),
6047 smb_fname_str_dbg(smb_fname_dst)));
6048
6049 status = fsp_set_smb_fname(fsp, smb_fname_dst);
6050 if (NT_STATUS_IS_OK(status)) {
6051 did_rename = True;
6052 new_name_hash = fsp->name_hash;
6053 }
6054 }
6055
6056 if (!did_rename) {
6057 DEBUG(10, ("rename_open_files: no open files on file_id %s "
6058 "for %s\n", file_id_string_tos(&lck->data->id),
6059 smb_fname_str_dbg(smb_fname_dst)));
6060 }
6061
6062 /* Send messages to all smbd's (not ourself) that the name has changed. */
6063 rename_share_filename(conn->sconn->msg_ctx, lck, conn->connectpath,
6064 orig_name_hash, new_name_hash,
6065 smb_fname_dst);
6066
6067 }
6068
6069 /****************************************************************************
6070 We need to check if the source path is a parent directory of the destination
6071 (ie. a rename of /foo/bar/baz -> /foo/bar/baz/bibble/bobble. If so we must
6072 refuse the rename with a sharing violation. Under UNIX the above call can
6073 *succeed* if /foo/bar/baz is a symlink to another area in the share. We
6074 probably need to check that the client is a Windows one before disallowing
6075 this as a UNIX client (one with UNIX extensions) can know the source is a
6076 symlink and make this decision intelligently. Found by an excellent bug
6077 report from <AndyLiebman@aol.com>.
6078 ****************************************************************************/
6079
6080 static bool rename_path_prefix_equal(const struct smb_filename *smb_fname_src,
6081 const struct smb_filename *smb_fname_dst)
6082 {
6083 const char *psrc = smb_fname_src->base_name;
6084 const char *pdst = smb_fname_dst->base_name;
6085 size_t slen;
6086
6087 if (psrc[0] == '.' && psrc[1] == '/') {
6088 psrc += 2;
6089 }
6090 if (pdst[0] == '.' && pdst[1] == '/') {
6091 pdst += 2;
6092 }
6093 if ((slen = strlen(psrc)) > strlen(pdst)) {
6094 return False;
6095 }
6096 return ((memcmp(psrc, pdst, slen) == 0) && pdst[slen] == '/');
6097 }
6098
6099 /*
6100 * Do the notify calls from a rename
6101 */
6102
6103 static void notify_rename(connection_struct *conn, bool is_dir,
6104 const struct smb_filename *smb_fname_src,
6105 const struct smb_filename *smb_fname_dst)
6106 {
6107 char *parent_dir_src = NULL;
6108 char *parent_dir_dst = NULL;
6109 uint32 mask;
6110
6111 mask = is_dir ? FILE_NOTIFY_CHANGE_DIR_NAME
6112 : FILE_NOTIFY_CHANGE_FILE_NAME;
6113
6114 if (!parent_dirname(talloc_tos(), smb_fname_src->base_name,
6115 &parent_dir_src, NULL) ||
6116 !parent_dirname(talloc_tos(), smb_fname_dst->base_name,
6117 &parent_dir_dst, NULL)) {
6118 goto out;
6119 }
6120
6121 if (strcmp(parent_dir_src, parent_dir_dst) == 0) {
6122 notify_fname(conn, NOTIFY_ACTION_OLD_NAME, mask,
6123 smb_fname_src->base_name);
6124 notify_fname(conn, NOTIFY_ACTION_NEW_NAME, mask,
6125 smb_fname_dst->base_name);
6126 }
6127 else {
6128 notify_fname(conn, NOTIFY_ACTION_REMOVED, mask,
6129 smb_fname_src->base_name);
6130 notify_fname(conn, NOTIFY_ACTION_ADDED, mask,
6131 smb_fname_dst->base_name);
6132 }
6133
6134 /* this is a strange one. w2k3 gives an additional event for
6135 CHANGE_ATTRIBUTES and CHANGE_CREATION on the new file when renaming
6136 files, but not directories */
6137 if (!is_dir) {
6138 notify_fname(conn, NOTIFY_ACTION_MODIFIED,
6139 FILE_NOTIFY_CHANGE_ATTRIBUTES
6140 |FILE_NOTIFY_CHANGE_CREATION,
6141 smb_fname_dst->base_name);
6142 }
6143 out:
6144 TALLOC_FREE(parent_dir_src);
6145 TALLOC_FREE(parent_dir_dst);
6146 }
6147
6148 /****************************************************************************
6149 Returns an error if the parent directory for a filename is open in an
6150 incompatible way.
6151 ****************************************************************************/
6152
6153 static NTSTATUS parent_dirname_compatible_open(connection_struct *conn,
6154 const struct smb_filename *smb_fname_dst_in)
6155 {
6156 char *parent_dir = NULL;
6157 struct smb_filename smb_fname_parent;
6158 struct file_id id;
6159 files_struct *fsp = NULL;
6160 int ret;
6161
6162 if (!parent_dirname(talloc_tos(), smb_fname_dst_in->base_name,
6163 &parent_dir, NULL)) {
6164 return NT_STATUS_NO_MEMORY;
6165 }
6166 ZERO_STRUCT(smb_fname_parent);
6167 smb_fname_parent.base_name = parent_dir;
6168
6169 ret = SMB_VFS_LSTAT(conn, &smb_fname_parent);
6170 if (ret == -1) {
6171 return map_nt_error_from_unix(errno);
6172 }
6173
6174 /*
6175 * We're only checking on this smbd here, mostly good
6176 * enough.. and will pass tests.
6177 */
6178
6179 id = vfs_file_id_from_sbuf(conn, &smb_fname_parent.st);
6180 for (fsp = file_find_di_first(conn->sconn, id); fsp;
6181 fsp = file_find_di_next(fsp)) {
6182 if (fsp->access_mask & DELETE_ACCESS) {
6183 return NT_STATUS_SHARING_VIOLATION;
6184 }
6185 }
6186 return NT_STATUS_OK;
6187 }
6188
6189 /****************************************************************************
6190 Rename an open file - given an fsp.
6191 ****************************************************************************/
6192
6193 NTSTATUS rename_internals_fsp(connection_struct *conn,
6194 files_struct *fsp,
6195 const struct smb_filename *smb_fname_dst_in,
6196 uint32 attrs,
6197 bool replace_if_exists)
6198 {
6199 TALLOC_CTX *ctx = talloc_tos();
6200 struct smb_filename *smb_fname_dst = NULL;
6201 NTSTATUS status = NT_STATUS_OK;
6202 struct share_mode_lock *lck = NULL;
6203 bool dst_exists, old_is_stream, new_is_stream;
6204
6205 status = check_name(conn, smb_fname_dst_in->base_name);
6206 if (!NT_STATUS_IS_OK(status)) {
6207 return status;
6208 }
6209
6210 status = parent_dirname_compatible_open(conn, smb_fname_dst_in);
6211 if (!NT_STATUS_IS_OK(status)) {
6212 return status;
6213 }
6214
6215 /* Make a copy of the dst smb_fname structs */
6216
6217 status = copy_smb_filename(ctx, smb_fname_dst_in, &smb_fname_dst);
6218 if (!NT_STATUS_IS_OK(status)) {
6219 goto out;
6220 }
6221
6222 /*
6223 * Check for special case with case preserving and not
6224 * case sensitive. If the old last component differs from the original
6225 * last component only by case, then we should allow
6226 * the rename (user is trying to change the case of the
6227 * filename).
6228 */
6229 if((conn->case_sensitive == False) && (conn->case_preserve == True) &&
6230 strequal(fsp->fsp_name->base_name, smb_fname_dst->base_name) &&
6231 strequal(fsp->fsp_name->stream_name, smb_fname_dst->stream_name)) {
6232 char *last_slash;
6233 char *fname_dst_lcomp_base_mod = NULL;
6234 struct smb_filename *smb_fname_orig_lcomp = NULL;
6235
6236 /*
6237 * Get the last component of the destination name.
6238 */
6239 last_slash = strrchr_m(smb_fname_dst->base_name, '/');
6240 if (last_slash) {
6241 fname_dst_lcomp_base_mod = talloc_strdup(ctx, last_slash + 1);
6242 } else {
6243 fname_dst_lcomp_base_mod = talloc_strdup(ctx, smb_fname_dst->base_name);
6244 }
6245 if (!fname_dst_lcomp_base_mod) {
6246 status = NT_STATUS_NO_MEMORY;
6247 goto out;
6248 }
6249
6250 /*
6251 * Create an smb_filename struct using the original last
6252 * component of the destination.
6253 */
6254 status = create_synthetic_smb_fname_split(ctx,
6255 smb_fname_dst->original_lcomp, NULL,
6256 &smb_fname_orig_lcomp);
6257 if (!NT_STATUS_IS_OK(status)) {
6258 TALLOC_FREE(fname_dst_lcomp_base_mod);
6259 goto out;
6260 }
6261
6262 /* If the base names only differ by case, use original. */
6263 if(!strcsequal(fname_dst_lcomp_base_mod,
6264 smb_fname_orig_lcomp->base_name)) {
6265 char *tmp;
6266 /*
6267 * Replace the modified last component with the
6268 * original.
6269 */
6270 if (last_slash) {
6271 *last_slash = '\0'; /* Truncate at the '/' */
6272 tmp = talloc_asprintf(smb_fname_dst,
6273 "%s/%s",
6274 smb_fname_dst->base_name,
6275 smb_fname_orig_lcomp->base_name);
6276 } else {
6277 tmp = talloc_asprintf(smb_fname_dst,
6278 "%s",
6279 smb_fname_orig_lcomp->base_name);
6280 }
6281 if (tmp == NULL) {
6282 status = NT_STATUS_NO_MEMORY;
6283 TALLOC_FREE(fname_dst_lcomp_base_mod);
6284 TALLOC_FREE(smb_fname_orig_lcomp);
6285 goto out;
6286 }
6287 TALLOC_FREE(smb_fname_dst->base_name);
6288 smb_fname_dst->base_name = tmp;
6289 }
6290
6291 /* If the stream_names only differ by case, use original. */
6292 if(!strcsequal(smb_fname_dst->stream_name,
6293 smb_fname_orig_lcomp->stream_name)) {
6294 char *tmp = NULL;
6295 /* Use the original stream. */
6296 tmp = talloc_strdup(smb_fname_dst,
6297 smb_fname_orig_lcomp->stream_name);
6298 if (tmp == NULL) {
6299 status = NT_STATUS_NO_MEMORY;
6300 TALLOC_FREE(fname_dst_lcomp_base_mod);
6301 TALLOC_FREE(smb_fname_orig_lcomp);
6302 goto out;
6303 }
6304 TALLOC_FREE(smb_fname_dst->stream_name);
6305 smb_fname_dst->stream_name = tmp;
6306 }
6307 TALLOC_FREE(fname_dst_lcomp_base_mod);
6308 TALLOC_FREE(smb_fname_orig_lcomp);
6309 }
6310
6311 /*
6312 * If the src and dest names are identical - including case,
6313 * don't do the rename, just return success.
6314 */
6315
6316 if (strcsequal(fsp->fsp_name->base_name, smb_fname_dst->base_name) &&
6317 strcsequal(fsp->fsp_name->stream_name,
6318 smb_fname_dst->stream_name)) {
6319 DEBUG(3, ("rename_internals_fsp: identical names in rename %s "
6320 "- returning success\n",
6321 smb_fname_str_dbg(smb_fname_dst)));
6322 status = NT_STATUS_OK;
6323 goto out;
6324 }
6325
6326 old_is_stream = is_ntfs_stream_smb_fname(fsp->fsp_name);
6327 new_is_stream = is_ntfs_stream_smb_fname(smb_fname_dst);
6328
6329 /* Return the correct error code if both names aren't streams. */
6330 if (!old_is_stream && new_is_stream) {
6331 status = NT_STATUS_OBJECT_NAME_INVALID;
6332 goto out;
6333 }
6334
6335 if (old_is_stream && !new_is_stream) {
6336 status = NT_STATUS_INVALID_PARAMETER;
6337 goto out;
6338 }
6339
6340 dst_exists = SMB_VFS_STAT(conn, smb_fname_dst) == 0;
6341
6342 if(!replace_if_exists && dst_exists) {
6343 DEBUG(3, ("rename_internals_fsp: dest exists doing rename "
6344 "%s -> %s\n", smb_fname_str_dbg(fsp->fsp_name),
6345 smb_fname_str_dbg(smb_fname_dst)));
6346 status = NT_STATUS_OBJECT_NAME_COLLISION;
6347 goto out;
6348 }
6349
6350 if (dst_exists) {
6351 struct file_id fileid = vfs_file_id_from_sbuf(conn,
6352 &smb_fname_dst->st);
6353 files_struct *dst_fsp = file_find_di_first(conn->sconn,
6354 fileid);
6355 /* The file can be open when renaming a stream */
6356 if (dst_fsp && !new_is_stream) {
6357 DEBUG(3, ("rename_internals_fsp: Target file open\n"));
6358 status = NT_STATUS_ACCESS_DENIED;
6359 goto out;
6360 }
6361 }
6362
6363 /* Ensure we have a valid stat struct for the source. */
6364 status = vfs_stat_fsp(fsp);
6365 if (!NT_STATUS_IS_OK(status)) {
6366 goto out;
6367 }
6368
6369 status = can_rename(conn, fsp, attrs);
6370
6371 if (!NT_STATUS_IS_OK(status)) {
6372 DEBUG(3, ("rename_internals_fsp: Error %s rename %s -> %s\n",
6373 nt_errstr(status), smb_fname_str_dbg(fsp->fsp_name),
6374 smb_fname_str_dbg(smb_fname_dst)));
6375 if (NT_STATUS_EQUAL(status,NT_STATUS_SHARING_VIOLATION))
6376 status = NT_STATUS_ACCESS_DENIED;
6377 goto out;
6378 }
6379
6380 if (rename_path_prefix_equal(fsp->fsp_name, smb_fname_dst)) {
6381 status = NT_STATUS_ACCESS_DENIED;
6382 }
6383
6384 lck = get_existing_share_mode_lock(talloc_tos(), fsp->file_id);
6385
6386 /*
6387 * We have the file open ourselves, so not being able to get the
6388 * corresponding share mode lock is a fatal error.
6389 */
6390
6391 SMB_ASSERT(lck != NULL);
6392
6393 if(SMB_VFS_RENAME(conn, fsp->fsp_name, smb_fname_dst) == 0) {
6394 uint32 create_options = fsp->fh->private_options;
6395
6396 DEBUG(3, ("rename_internals_fsp: succeeded doing rename on "
6397 "%s -> %s\n", smb_fname_str_dbg(fsp->fsp_name),
6398 smb_fname_str_dbg(smb_fname_dst)));
6399
6400 if (!lp_posix_pathnames() &&
6401 (lp_map_archive(SNUM(conn)) ||
6402 lp_store_dos_attributes(SNUM(conn)))) {
6403 /* We must set the archive bit on the newly
6404 renamed file. */
6405 if (SMB_VFS_STAT(conn, smb_fname_dst) == 0) {
6406 uint32_t old_dosmode = dos_mode(conn,
6407 smb_fname_dst);
6408 file_set_dosmode(conn,
6409 smb_fname_dst,
6410 old_dosmode | FILE_ATTRIBUTE_ARCHIVE,
6411 NULL,
6412 true);
6413 }
6414 }
6415
6416 notify_rename(conn, fsp->is_directory, fsp->fsp_name,
6417 smb_fname_dst);
6418
6419 rename_open_files(conn, lck, fsp->name_hash, smb_fname_dst);
6420
6421 /*
6422 * A rename acts as a new file create w.r.t. allowing an initial delete
6423 * on close, probably because in Windows there is a new handle to the
6424 * new file. If initial delete on close was requested but not
6425 * originally set, we need to set it here. This is probably not 100% correct,
6426 * but will work for the CIFSFS client which in non-posix mode
6427 * depends on these semantics. JRA.
6428 */
6429
6430 if (create_options & FILE_DELETE_ON_CLOSE) {
6431 status = can_set_delete_on_close(fsp, 0);
6432
6433 if (NT_STATUS_IS_OK(status)) {
6434 /* Note that here we set the *inital* delete on close flag,
6435 * not the regular one. The magic gets handled in close. */
6436 fsp->initial_delete_on_close = True;
6437 }
6438 }
6439 TALLOC_FREE(lck);
6440 status = NT_STATUS_OK;
6441 goto out;
6442 }
6443
6444 TALLOC_FREE(lck);
6445
6446 if (errno == ENOTDIR || errno == EISDIR) {
6447 status = NT_STATUS_OBJECT_NAME_COLLISION;
6448 } else {
6449 status = map_nt_error_from_unix(errno);
6450 }
6451
6452 DEBUG(3, ("rename_internals_fsp: Error %s rename %s -> %s\n",
6453 nt_errstr(status), smb_fname_str_dbg(fsp->fsp_name),
6454 smb_fname_str_dbg(smb_fname_dst)));
6455
6456 out:
6457 TALLOC_FREE(smb_fname_dst);
6458
6459 return status;
6460 }
6461
6462 /****************************************************************************
6463 The guts of the rename command, split out so it may be called by the NT SMB
6464 code.
6465 ****************************************************************************/
6466
6467 NTSTATUS rename_internals(TALLOC_CTX *ctx,
6468 connection_struct *conn,
6469 struct smb_request *req,
6470 struct smb_filename *smb_fname_src,
6471 struct smb_filename *smb_fname_dst,
6472 uint32 attrs,
6473 bool replace_if_exists,
6474 bool src_has_wild,
6475 bool dest_has_wild,
6476 uint32_t access_mask)
6477 {
6478 char *fname_src_dir = NULL;
6479 char *fname_src_mask = NULL;
6480 int count=0;
6481 NTSTATUS status = NT_STATUS_OK;
6482 struct smb_Dir *dir_hnd = NULL;
6483 const char *dname = NULL;
6484 char *talloced = NULL;
6485 long offset = 0;
6486 int create_options = 0;
6487 bool posix_pathnames = lp_posix_pathnames();
6488
6489 /*
6490 * Split the old name into directory and last component
6491 * strings. Note that unix_convert may have stripped off a
6492 * leading ./ from both name and newname if the rename is
6493 * at the root of the share. We need to make sure either both
6494 * name and newname contain a / character or neither of them do
6495 * as this is checked in resolve_wildcards().
6496 */
6497
6498 /* Split up the directory from the filename/mask. */
6499 status = split_fname_dir_mask(ctx, smb_fname_src->base_name,
6500 &fname_src_dir, &fname_src_mask);
6501 if (!NT_STATUS_IS_OK(status)) {
6502 status = NT_STATUS_NO_MEMORY;
6503 goto out;
6504 }
6505
6506 /*
6507 * We should only check the mangled cache
6508 * here if unix_convert failed. This means
6509 * that the path in 'mask' doesn't exist
6510 * on the file system and so we need to look
6511 * for a possible mangle. This patch from
6512 * Tine Smukavec <valentin.smukavec@hermes.si>.
6513 */
6514
6515 if (!VALID_STAT(smb_fname_src->st) &&
6516 mangle_is_mangled(fname_src_mask, conn->params)) {
6517 char *new_mask = NULL;
6518 mangle_lookup_name_from_8_3(ctx, fname_src_mask, &new_mask,
6519 conn->params);
6520 if (new_mask) {
6521 TALLOC_FREE(fname_src_mask);
6522 fname_src_mask = new_mask;
6523 }
6524 }
6525
6526 if (!src_has_wild) {
6527 files_struct *fsp;
6528
6529 /*
6530 * Only one file needs to be renamed. Append the mask back
6531 * onto the directory.
6532 */
6533 TALLOC_FREE(smb_fname_src->base_name);
6534 if (ISDOT(fname_src_dir)) {
6535 /* Ensure we use canonical names on open. */
6536 smb_fname_src->base_name = talloc_asprintf(smb_fname_src,
6537 "%s",
6538 fname_src_mask);
6539 } else {
6540 smb_fname_src->base_name = talloc_asprintf(smb_fname_src,
6541 "%s/%s",
6542 fname_src_dir,
6543 fname_src_mask);
6544 }
6545 if (!smb_fname_src->base_name) {
6546 status = NT_STATUS_NO_MEMORY;
6547 goto out;
6548 }
6549
6550 DEBUG(3, ("rename_internals: case_sensitive = %d, "
6551 "case_preserve = %d, short case preserve = %d, "
6552 "directory = %s, newname = %s, "
6553 "last_component_dest = %s\n",
6554 conn->case_sensitive, conn->case_preserve,
6555 conn->short_case_preserve,
6556 smb_fname_str_dbg(smb_fname_src),
6557 smb_fname_str_dbg(smb_fname_dst),
6558 smb_fname_dst->original_lcomp));
6559
6560 /* The dest name still may have wildcards. */
6561 if (dest_has_wild) {
6562 char *fname_dst_mod = NULL;
6563 if (!resolve_wildcards(smb_fname_dst,
6564 smb_fname_src->base_name,
6565 smb_fname_dst->base_name,
6566 &fname_dst_mod)) {
6567 DEBUG(6, ("rename_internals: resolve_wildcards "
6568 "%s %s failed\n",
6569 smb_fname_src->base_name,
6570 smb_fname_dst->base_name));
6571 status = NT_STATUS_NO_MEMORY;
6572 goto out;
6573 }
6574 TALLOC_FREE(smb_fname_dst->base_name);
6575 smb_fname_dst->base_name = fname_dst_mod;
6576 }
6577
6578 ZERO_STRUCT(smb_fname_src->st);
6579 if (posix_pathnames) {
6580 SMB_VFS_LSTAT(conn, smb_fname_src);
6581 } else {
6582 SMB_VFS_STAT(conn, smb_fname_src);
6583 }
6584
6585 if (S_ISDIR(smb_fname_src->st.st_ex_mode)) {
6586 create_options |= FILE_DIRECTORY_FILE;
6587 }
6588
6589 status = SMB_VFS_CREATE_FILE(
6590 conn, /* conn */
6591 req, /* req */
6592 0, /* root_dir_fid */
6593 smb_fname_src, /* fname */
6594 access_mask, /* access_mask */
6595 (FILE_SHARE_READ | /* share_access */
6596 FILE_SHARE_WRITE),
6597 FILE_OPEN, /* create_disposition*/
6598 create_options, /* create_options */
6599 posix_pathnames ? FILE_FLAG_POSIX_SEMANTICS|0777 : 0, /* file_attributes */
6600 0, /* oplock_request */
6601 0, /* allocation_size */
6602 0, /* private_flags */
6603 NULL, /* sd */
6604 NULL, /* ea_list */
6605 &fsp, /* result */
6606 NULL); /* pinfo */
6607
6608 if (!NT_STATUS_IS_OK(status)) {
6609 DEBUG(3, ("Could not open rename source %s: %s\n",
6610 smb_fname_str_dbg(smb_fname_src),
6611 nt_errstr(status)));
6612 goto out;
6613 }
6614
6615 status = rename_internals_fsp(conn, fsp, smb_fname_dst,
6616 attrs, replace_if_exists);
6617
6618 close_file(req, fsp, NORMAL_CLOSE);
6619
6620 DEBUG(3, ("rename_internals: Error %s rename %s -> %s\n",
6621 nt_errstr(status), smb_fname_str_dbg(smb_fname_src),
6622 smb_fname_str_dbg(smb_fname_dst)));
6623
6624 goto out;
6625 }
6626
6627 /*
6628 * Wildcards - process each file that matches.
6629 */
6630 if (strequal(fname_src_mask, "????????.???")) {
6631 TALLOC_FREE(fname_src_mask);
6632 fname_src_mask = talloc_strdup(ctx, "*");
6633 if (!fname_src_mask) {
6634 status = NT_STATUS_NO_MEMORY;
6635 goto out;
6636 }
6637 }
6638
6639 status = check_name(conn, fname_src_dir);
6640 if (!NT_STATUS_IS_OK(status)) {
6641 goto out;
6642 }
6643
6644 dir_hnd = OpenDir(talloc_tos(), conn, fname_src_dir, fname_src_mask,
6645 attrs);
6646 if (dir_hnd == NULL) {
6647 status = map_nt_error_from_unix(errno);
6648 goto out;
6649 }
6650
6651 status = NT_STATUS_NO_SUCH_FILE;
6652 /*
6653 * Was status = NT_STATUS_OBJECT_NAME_NOT_FOUND;
6654 * - gentest fix. JRA
6655 */
6656
6657 while ((dname = ReadDirName(dir_hnd, &offset, &smb_fname_src->st,
6658 &talloced))) {
6659 files_struct *fsp = NULL;
6660 char *destname = NULL;
6661 bool sysdir_entry = False;
6662
6663 /* Quick check for "." and ".." */
6664 if (ISDOT(dname) || ISDOTDOT(dname)) {
6665 if (attrs & FILE_ATTRIBUTE_DIRECTORY) {
6666 sysdir_entry = True;
6667 } else {
6668 TALLOC_FREE(talloced);
6669 continue;
6670 }
6671 }
6672
6673 if (!is_visible_file(conn, fname_src_dir, dname,
6674 &smb_fname_src->st, false)) {
6675 TALLOC_FREE(talloced);
6676 continue;
6677 }
6678
6679 if(!mask_match(dname, fname_src_mask, conn->case_sensitive)) {
6680 TALLOC_FREE(talloced);
6681 continue;
6682 }
6683
6684 if (sysdir_entry) {
6685 status = NT_STATUS_OBJECT_NAME_INVALID;
6686 break;
6687 }
6688
6689 TALLOC_FREE(smb_fname_src->base_name);
6690 if (ISDOT(fname_src_dir)) {
6691 /* Ensure we use canonical names on open. */
6692 smb_fname_src->base_name = talloc_asprintf(smb_fname_src,
6693 "%s",
6694 dname);
6695 } else {
6696 smb_fname_src->base_name = talloc_asprintf(smb_fname_src,
6697 "%s/%s",
6698 fname_src_dir,
6699 dname);
6700 }
6701 if (!smb_fname_src->base_name) {
6702 status = NT_STATUS_NO_MEMORY;
6703 goto out;
6704 }
6705
6706 if (!resolve_wildcards(ctx, smb_fname_src->base_name,
6707 smb_fname_dst->base_name,
6708 &destname)) {
6709 DEBUG(6, ("resolve_wildcards %s %s failed\n",
6710 smb_fname_src->base_name, destname));
6711 TALLOC_FREE(talloced);
6712 continue;
6713 }
6714 if (!destname) {
6715 status = NT_STATUS_NO_MEMORY;
6716 goto out;
6717 }
6718
6719 TALLOC_FREE(smb_fname_dst->base_name);
6720 smb_fname_dst->base_name = destname;
6721
6722 ZERO_STRUCT(smb_fname_src->st);
6723 if (posix_pathnames) {
6724 SMB_VFS_LSTAT(conn, smb_fname_src);
6725 } else {
6726 SMB_VFS_STAT(conn, smb_fname_src);
6727 }
6728
6729 create_options = 0;
6730
6731 if (S_ISDIR(smb_fname_src->st.st_ex_mode)) {
6732 create_options |= FILE_DIRECTORY_FILE;
6733 }
6734
6735 status = SMB_VFS_CREATE_FILE(
6736 conn, /* conn */
6737 req, /* req */
6738 0, /* root_dir_fid */
6739 smb_fname_src, /* fname */
6740 access_mask, /* access_mask */
6741 (FILE_SHARE_READ | /* share_access */
6742 FILE_SHARE_WRITE),
6743 FILE_OPEN, /* create_disposition*/
6744 create_options, /* create_options */
6745 posix_pathnames ? FILE_FLAG_POSIX_SEMANTICS|0777 : 0, /* file_attributes */
6746 0, /* oplock_request */
6747 0, /* allocation_size */
6748 0, /* private_flags */
6749 NULL, /* sd */
6750 NULL, /* ea_list */
6751 &fsp, /* result */
6752 NULL); /* pinfo */
6753
6754 if (!NT_STATUS_IS_OK(status)) {
6755 DEBUG(3,("rename_internals: SMB_VFS_CREATE_FILE "
6756 "returned %s rename %s -> %s\n",
6757 nt_errstr(status),
6758 smb_fname_str_dbg(smb_fname_src),
6759 smb_fname_str_dbg(smb_fname_dst)));
6760 break;
6761 }
6762
6763 smb_fname_dst->original_lcomp = talloc_strdup(smb_fname_dst,
6764 dname);
6765 if (!smb_fname_dst->original_lcomp) {
6766 status = NT_STATUS_NO_MEMORY;
6767 goto out;
6768 }
6769
6770 status = rename_internals_fsp(conn, fsp, smb_fname_dst,
6771 attrs, replace_if_exists);
6772
6773 close_file(req, fsp, NORMAL_CLOSE);
6774
6775 if (!NT_STATUS_IS_OK(status)) {
6776 DEBUG(3, ("rename_internals_fsp returned %s for "
6777 "rename %s -> %s\n", nt_errstr(status),
6778 smb_fname_str_dbg(smb_fname_src),
6779 smb_fname_str_dbg(smb_fname_dst)));
6780 break;
6781 }
6782
6783 count++;
6784
6785 DEBUG(3,("rename_internals: doing rename on %s -> "
6786 "%s\n", smb_fname_str_dbg(smb_fname_src),
6787 smb_fname_str_dbg(smb_fname_src)));
6788 TALLOC_FREE(talloced);
6789 }
6790 TALLOC_FREE(dir_hnd);
6791
6792 if (count == 0 && NT_STATUS_IS_OK(status) && errno != 0) {
6793 status = map_nt_error_from_unix(errno);
6794 }
6795
6796 out:
6797 TALLOC_FREE(talloced);
6798 TALLOC_FREE(fname_src_dir);
6799 TALLOC_FREE(fname_src_mask);
6800 return status;
6801 }
6802
6803 /****************************************************************************
6804 Reply to a mv.
6805 ****************************************************************************/
6806
6807 void reply_mv(struct smb_request *req)
6808 {
6809 connection_struct *conn = req->conn;
6810 char *name = NULL;
6811 char *newname = NULL;
6812 const char *p;
6813 uint32 attrs;
6814 NTSTATUS status;
6815 bool src_has_wcard = False;
6816 bool dest_has_wcard = False;
6817 TALLOC_CTX *ctx = talloc_tos();
6818 struct smb_filename *smb_fname_src = NULL;
6819 struct smb_filename *smb_fname_dst = NULL;
6820 uint32_t src_ucf_flags = lp_posix_pathnames() ? UCF_UNIX_NAME_LOOKUP : UCF_COND_ALLOW_WCARD_LCOMP;
6821 uint32_t dst_ucf_flags = UCF_SAVE_LCOMP | (lp_posix_pathnames() ? 0 : UCF_COND_ALLOW_WCARD_LCOMP);
6822 bool stream_rename = false;
6823
6824 START_PROFILE(SMBmv);
6825
6826 if (req->wct < 1) {
6827 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
6828 goto out;
6829 }
6830
6831 attrs = SVAL(req->vwv+0, 0);
6832
6833 p = (const char *)req->buf + 1;
6834 p += srvstr_get_path_req_wcard(ctx, req, &name, p, STR_TERMINATE,
6835 &status, &src_has_wcard);
6836 if (!NT_STATUS_IS_OK(status)) {
6837 reply_nterror(req, status);
6838 goto out;
6839 }
6840 p++;
6841 p += srvstr_get_path_req_wcard(ctx, req, &newname, p, STR_TERMINATE,
6842 &status, &dest_has_wcard);
6843 if (!NT_STATUS_IS_OK(status)) {
6844 reply_nterror(req, status);
6845 goto out;
6846 }
6847
6848 if (!lp_posix_pathnames()) {
6849 /* The newname must begin with a ':' if the
6850 name contains a ':'. */
6851 if (strchr_m(name, ':')) {
6852 if (newname[0] != ':') {
6853 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
6854 goto out;
6855 }
6856 stream_rename = true;
6857 }
6858 }
6859
6860 status = filename_convert(ctx,
6861 conn,
6862 req->flags2 & FLAGS2_DFS_PATHNAMES,
6863 name,
6864 src_ucf_flags,
6865 &src_has_wcard,
6866 &smb_fname_src);
6867
6868 if (!NT_STATUS_IS_OK(status)) {
6869 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
6870 reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
6871 ERRSRV, ERRbadpath);
6872 goto out;
6873 }
6874 reply_nterror(req, status);
6875 goto out;
6876 }
6877
6878 status = filename_convert(ctx,
6879 conn,
6880 req->flags2 & FLAGS2_DFS_PATHNAMES,
6881 newname,
6882 dst_ucf_flags,
6883 &dest_has_wcard,
6884 &smb_fname_dst);
6885
6886 if (!NT_STATUS_IS_OK(status)) {
6887 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
6888 reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
6889 ERRSRV, ERRbadpath);
6890 goto out;
6891 }
6892 reply_nterror(req, status);
6893 goto out;
6894 }
6895
6896 if (stream_rename) {
6897 /* smb_fname_dst->base_name must be the same as
6898 smb_fname_src->base_name. */
6899 TALLOC_FREE(smb_fname_dst->base_name);
6900 smb_fname_dst->base_name = talloc_strdup(smb_fname_dst,
6901 smb_fname_src->base_name);
6902 if (!smb_fname_dst->base_name) {
6903 reply_nterror(req, NT_STATUS_NO_MEMORY);
6904 goto out;
6905 }
6906 }
6907
6908 DEBUG(3,("reply_mv : %s -> %s\n", smb_fname_str_dbg(smb_fname_src),
6909 smb_fname_str_dbg(smb_fname_dst)));
6910
6911 status = rename_internals(ctx, conn, req, smb_fname_src, smb_fname_dst,
6912 attrs, False, src_has_wcard, dest_has_wcard,
6913 DELETE_ACCESS);
6914 if (!NT_STATUS_IS_OK(status)) {
6915 if (open_was_deferred(req->sconn, req->mid)) {
6916 /* We have re-scheduled this call. */
6917 goto out;
6918 }
6919 reply_nterror(req, status);
6920 goto out;
6921 }
6922
6923 reply_outbuf(req, 0, 0);
6924 out:
6925 TALLOC_FREE(smb_fname_src);
6926 TALLOC_FREE(smb_fname_dst);
6927 END_PROFILE(SMBmv);
6928 return;
6929 }
6930
6931 /*******************************************************************
6932 Copy a file as part of a reply_copy.
6933 ******************************************************************/
6934
6935 /*
6936 * TODO: check error codes on all callers
6937 */
6938
6939 NTSTATUS copy_file(TALLOC_CTX *ctx,
6940 connection_struct *conn,
6941 struct smb_filename *smb_fname_src,
6942 struct smb_filename *smb_fname_dst,
6943 int ofun,
6944 int count,
6945 bool target_is_directory)
6946 {
6947 struct smb_filename *smb_fname_dst_tmp = NULL;
6948 off_t ret=-1;
6949 files_struct *fsp1,*fsp2;
6950 uint32 dosattrs;
6951 uint32 new_create_disposition;
6952 NTSTATUS status;
6953
6954
6955 status = copy_smb_filename(ctx, smb_fname_dst, &smb_fname_dst_tmp);
6956 if (!NT_STATUS_IS_OK(status)) {
6957 return status;
6958 }
6959
6960 /*
6961 * If the target is a directory, extract the last component from the
6962 * src filename and append it to the dst filename
6963 */
6964 if (target_is_directory) {
6965 const char *p;
6966
6967 /* dest/target can't be a stream if it's a directory. */
6968 SMB_ASSERT(smb_fname_dst->stream_name == NULL);
6969
6970 p = strrchr_m(smb_fname_src->base_name,'/');
6971 if (p) {
6972 p++;
6973 } else {
6974 p = smb_fname_src->base_name;
6975 }
6976 smb_fname_dst_tmp->base_name =
6977 talloc_asprintf_append(smb_fname_dst_tmp->base_name, "/%s",
6978 p);
6979 if (!smb_fname_dst_tmp->base_name) {
6980 status = NT_STATUS_NO_MEMORY;
6981 goto out;
6982 }
6983 }
6984
6985 status = vfs_file_exist(conn, smb_fname_src);
6986 if (!NT_STATUS_IS_OK(status)) {
6987 goto out;
6988 }
6989
6990 if (!target_is_directory && count) {
6991 new_create_disposition = FILE_OPEN;
6992 } else {
6993 if (!map_open_params_to_ntcreate(smb_fname_dst_tmp->base_name,
6994 0, ofun,
6995 NULL, NULL,
6996 &new_create_disposition,
6997 NULL,
6998 NULL)) {
6999 status = NT_STATUS_INVALID_PARAMETER;
7000 goto out;
7001 }
7002 }
7003
7004 /* Open the src file for reading. */
7005 status = SMB_VFS_CREATE_FILE(
7006 conn, /* conn */
7007 NULL, /* req */
7008 0, /* root_dir_fid */
7009 smb_fname_src, /* fname */
7010 FILE_GENERIC_READ, /* access_mask */
7011 FILE_SHARE_READ | FILE_SHARE_WRITE, /* share_access */
7012 FILE_OPEN, /* create_disposition*/
7013 0, /* create_options */
7014 FILE_ATTRIBUTE_NORMAL, /* file_attributes */
7015 INTERNAL_OPEN_ONLY, /* oplock_request */
7016 0, /* allocation_size */
7017 0, /* private_flags */
7018 NULL, /* sd */
7019 NULL, /* ea_list */
7020 &fsp1, /* result */
7021 NULL); /* psbuf */
7022
7023 if (!NT_STATUS_IS_OK(status)) {
7024 goto out;
7025 }
7026
7027 dosattrs = dos_mode(conn, smb_fname_src);
7028
7029 if (SMB_VFS_STAT(conn, smb_fname_dst_tmp) == -1) {
7030 ZERO_STRUCTP(&smb_fname_dst_tmp->st);
7031 }
7032
7033 /* Open the dst file for writing. */
7034 status = SMB_VFS_CREATE_FILE(
7035 conn, /* conn */
7036 NULL, /* req */
7037 0, /* root_dir_fid */
7038 smb_fname_dst, /* fname */
7039 FILE_GENERIC_WRITE, /* access_mask */
7040 FILE_SHARE_READ | FILE_SHARE_WRITE, /* share_access */
7041 new_create_disposition, /* create_disposition*/
7042 0, /* create_options */
7043 dosattrs, /* file_attributes */
7044 INTERNAL_OPEN_ONLY, /* oplock_request */
7045 0, /* allocation_size */
7046 0, /* private_flags */
7047 NULL, /* sd */
7048 NULL, /* ea_list */
7049 &fsp2, /* result */
7050 NULL); /* psbuf */
7051
7052 if (!NT_STATUS_IS_OK(status)) {
7053 close_file(NULL, fsp1, ERROR_CLOSE);
7054 goto out;
7055 }
7056
7057 if (ofun & OPENX_FILE_EXISTS_OPEN) {
7058 ret = SMB_VFS_LSEEK(fsp2, 0, SEEK_END);
7059 if (ret == -1) {
7060 DEBUG(0, ("error - vfs lseek returned error %s\n",
7061 strerror(errno)));
7062 status = map_nt_error_from_unix(errno);
7063 close_file(NULL, fsp1, ERROR_CLOSE);
7064 close_file(NULL, fsp2, ERROR_CLOSE);
7065 goto out;
7066 }
7067 }
7068
7069 /* Do the actual copy. */
7070 if (smb_fname_src->st.st_ex_size) {
7071 ret = vfs_transfer_file(fsp1, fsp2, smb_fname_src->st.st_ex_size);
7072 } else {
7073 ret = 0;
7074 }
7075
7076 close_file(NULL, fsp1, NORMAL_CLOSE);
7077
7078 /* Ensure the modtime is set correctly on the destination file. */
7079 set_close_write_time(fsp2, smb_fname_src->st.st_ex_mtime);
7080
7081 /*
7082 * As we are opening fsp1 read-only we only expect
7083 * an error on close on fsp2 if we are out of space.
7084 * Thus we don't look at the error return from the
7085 * close of fsp1.
7086 */
7087 status = close_file(NULL, fsp2, NORMAL_CLOSE);
7088
7089 if (!NT_STATUS_IS_OK(status)) {
7090 goto out;
7091 }
7092
7093 if (ret != (off_t)smb_fname_src->st.st_ex_size) {
7094 status = NT_STATUS_DISK_FULL;
7095 goto out;
7096 }
7097
7098 status = NT_STATUS_OK;
7099
7100 out:
7101 TALLOC_FREE(smb_fname_dst_tmp);
7102 return status;
7103 }
7104
7105 /****************************************************************************
7106 Reply to a file copy.
7107 ****************************************************************************/
7108
7109 void reply_copy(struct smb_request *req)
7110 {
7111 connection_struct *conn = req->conn;
7112 struct smb_filename *smb_fname_src = NULL;
7113 struct smb_filename *smb_fname_dst = NULL;
7114 char *fname_src = NULL;
7115 char *fname_dst = NULL;
7116 char *fname_src_mask = NULL;
7117 char *fname_src_dir = NULL;
7118 const char *p;
7119 int count=0;
7120 int error = ERRnoaccess;
7121 int tid2;
7122 int ofun;
7123 int flags;
7124 bool target_is_directory=False;
7125 bool source_has_wild = False;
7126 bool dest_has_wild = False;
7127 NTSTATUS status;
7128 TALLOC_CTX *ctx = talloc_tos();
7129
7130 START_PROFILE(SMBcopy);
7131
7132 if (req->wct < 3) {
7133 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
7134 goto out;
7135 }
7136
7137 tid2 = SVAL(req->vwv+0, 0);
7138 ofun = SVAL(req->vwv+1, 0);
7139 flags = SVAL(req->vwv+2, 0);
7140
7141 p = (const char *)req->buf;
7142 p += srvstr_get_path_req_wcard(ctx, req, &fname_src, p, STR_TERMINATE,
7143 &status, &source_has_wild);
7144 if (!NT_STATUS_IS_OK(status)) {
7145 reply_nterror(req, status);
7146 goto out;
7147 }
7148 p += srvstr_get_path_req_wcard(ctx, req, &fname_dst, p, STR_TERMINATE,
7149 &status, &dest_has_wild);
7150 if (!NT_STATUS_IS_OK(status)) {
7151 reply_nterror(req, status);
7152 goto out;
7153 }
7154
7155 DEBUG(3,("reply_copy : %s -> %s\n", fname_src, fname_dst));
7156
7157 if (tid2 != conn->cnum) {
7158 /* can't currently handle inter share copies XXXX */
7159 DEBUG(3,("Rejecting inter-share copy\n"));
7160 reply_nterror(req, NT_STATUS_BAD_DEVICE_TYPE);
7161 goto out;
7162 }
7163
7164 status = filename_convert(ctx, conn,
7165 req->flags2 & FLAGS2_DFS_PATHNAMES,
7166 fname_src,
7167 UCF_COND_ALLOW_WCARD_LCOMP,
7168 &source_has_wild,
7169 &smb_fname_src);
7170 if (!NT_STATUS_IS_OK(status)) {
7171 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
7172 reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
7173 ERRSRV, ERRbadpath);
7174 goto out;
7175 }
7176 reply_nterror(req, status);
7177 goto out;
7178 }
7179
7180 status = filename_convert(ctx, conn,
7181 req->flags2 & FLAGS2_DFS_PATHNAMES,
7182 fname_dst,
7183 UCF_COND_ALLOW_WCARD_LCOMP,
7184 &dest_has_wild,
7185 &smb_fname_dst);
7186 if (!NT_STATUS_IS_OK(status)) {
7187 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
7188 reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
7189 ERRSRV, ERRbadpath);
7190 goto out;
7191 }
7192 reply_nterror(req, status);
7193 goto out;
7194 }
7195
7196 target_is_directory = VALID_STAT_OF_DIR(smb_fname_dst->st);
7197
7198 if ((flags&1) && target_is_directory) {
7199 reply_nterror(req, NT_STATUS_NO_SUCH_FILE);
7200 goto out;
7201 }
7202
7203 if ((flags&2) && !target_is_directory) {
7204 reply_nterror(req, NT_STATUS_OBJECT_PATH_NOT_FOUND);
7205 goto out;
7206 }
7207
7208 if ((flags&(1<<5)) && VALID_STAT_OF_DIR(smb_fname_src->st)) {
7209 /* wants a tree copy! XXXX */
7210 DEBUG(3,("Rejecting tree copy\n"));
7211 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
7212 goto out;
7213 }
7214
7215 /* Split up the directory from the filename/mask. */
7216 status = split_fname_dir_mask(ctx, smb_fname_src->base_name,
7217 &fname_src_dir, &fname_src_mask);
7218 if (!NT_STATUS_IS_OK(status)) {
7219 reply_nterror(req, NT_STATUS_NO_MEMORY);
7220 goto out;
7221 }
7222
7223 /*
7224 * We should only check the mangled cache
7225 * here if unix_convert failed. This means
7226 * that the path in 'mask' doesn't exist
7227 * on the file system and so we need to look
7228 * for a possible mangle. This patch from
7229 * Tine Smukavec <valentin.smukavec@hermes.si>.
7230 */
7231 if (!VALID_STAT(smb_fname_src->st) &&
7232 mangle_is_mangled(fname_src_mask, conn->params)) {
7233 char *new_mask = NULL;
7234 mangle_lookup_name_from_8_3(ctx, fname_src_mask,
7235 &new_mask, conn->params);
7236
7237 /* Use demangled name if one was successfully found. */
7238 if (new_mask) {
7239 TALLOC_FREE(fname_src_mask);
7240 fname_src_mask = new_mask;
7241 }
7242 }
7243
7244 if (!source_has_wild) {
7245
7246 /*
7247 * Only one file needs to be copied. Append the mask back onto
7248 * the directory.
7249 */
7250 TALLOC_FREE(smb_fname_src->base_name);
7251 if (ISDOT(fname_src_dir)) {
7252 /* Ensure we use canonical names on open. */
7253 smb_fname_src->base_name = talloc_asprintf(smb_fname_src,
7254 "%s",
7255 fname_src_mask);
7256 } else {
7257 smb_fname_src->base_name = talloc_asprintf(smb_fname_src,
7258 "%s/%s",
7259 fname_src_dir,
7260 fname_src_mask);
7261 }
7262 if (!smb_fname_src->base_name) {
7263 reply_nterror(req, NT_STATUS_NO_MEMORY);
7264 goto out;
7265 }
7266
7267 if (dest_has_wild) {
7268 char *fname_dst_mod = NULL;
7269 if (!resolve_wildcards(smb_fname_dst,
7270 smb_fname_src->base_name,
7271 smb_fname_dst->base_name,
7272 &fname_dst_mod)) {
7273 reply_nterror(req, NT_STATUS_NO_MEMORY);
7274 goto out;
7275 }
7276 TALLOC_FREE(smb_fname_dst->base_name);
7277 smb_fname_dst->base_name = fname_dst_mod;
7278 }
7279
7280 status = check_name(conn, smb_fname_src->base_name);
7281 if (!NT_STATUS_IS_OK(status)) {
7282 reply_nterror(req, status);
7283 goto out;
7284 }
7285
7286 status = check_name(conn, smb_fname_dst->base_name);
7287 if (!NT_STATUS_IS_OK(status)) {
7288 reply_nterror(req, status);
7289 goto out;
7290 }
7291
7292 status = copy_file(ctx, conn, smb_fname_src, smb_fname_dst,
7293 ofun, count, target_is_directory);
7294
7295 if(!NT_STATUS_IS_OK(status)) {
7296 reply_nterror(req, status);
7297 goto out;
7298 } else {
7299 count++;
7300 }
7301 } else {
7302 struct smb_Dir *dir_hnd = NULL;
7303 const char *dname = NULL;
7304 char *talloced = NULL;
7305 long offset = 0;
7306
7307 /*
7308 * There is a wildcard that requires us to actually read the
7309 * src dir and copy each file matching the mask to the dst.
7310 * Right now streams won't be copied, but this could
7311 * presumably be added with a nested loop for reach dir entry.
7312 */
7313 SMB_ASSERT(!smb_fname_src->stream_name);
7314 SMB_ASSERT(!smb_fname_dst->stream_name);
7315
7316 smb_fname_src->stream_name = NULL;
7317 smb_fname_dst->stream_name = NULL;
7318
7319 if (strequal(fname_src_mask,"????????.???")) {
7320 TALLOC_FREE(fname_src_mask);
7321 fname_src_mask = talloc_strdup(ctx, "*");
7322 if (!fname_src_mask) {
7323 reply_nterror(req, NT_STATUS_NO_MEMORY);
7324 goto out;
7325 }
7326 }
7327
7328 status = check_name(conn, fname_src_dir);
7329 if (!NT_STATUS_IS_OK(status)) {
7330 reply_nterror(req, status);
7331 goto out;
7332 }
7333
7334 dir_hnd = OpenDir(ctx, conn, fname_src_dir, fname_src_mask, 0);
7335 if (dir_hnd == NULL) {
7336 status = map_nt_error_from_unix(errno);
7337 reply_nterror(req, status);
7338 goto out;
7339 }
7340
7341 error = ERRbadfile;
7342
7343 /* Iterate over the src dir copying each entry to the dst. */
7344 while ((dname = ReadDirName(dir_hnd, &offset,
7345 &smb_fname_src->st, &talloced))) {
7346 char *destname = NULL;
7347
7348 if (ISDOT(dname) || ISDOTDOT(dname)) {
7349 TALLOC_FREE(talloced);
7350 continue;
7351 }
7352
7353 if (!is_visible_file(conn, fname_src_dir, dname,
7354 &smb_fname_src->st, false)) {
7355 TALLOC_FREE(talloced);
7356 continue;
7357 }
7358
7359 if(!mask_match(dname, fname_src_mask,
7360 conn->case_sensitive)) {
7361 TALLOC_FREE(talloced);
7362 continue;
7363 }
7364
7365 error = ERRnoaccess;
7366
7367 /* Get the src smb_fname struct setup. */
7368 TALLOC_FREE(smb_fname_src->base_name);
7369 if (ISDOT(fname_src_dir)) {
7370 /* Ensure we use canonical names on open. */
7371 smb_fname_src->base_name =
7372 talloc_asprintf(smb_fname_src, "%s",
7373 dname);
7374 } else {
7375 smb_fname_src->base_name =
7376 talloc_asprintf(smb_fname_src, "%s/%s",
7377 fname_src_dir, dname);
7378 }
7379
7380 if (!smb_fname_src->base_name) {
7381 TALLOC_FREE(dir_hnd);
7382 TALLOC_FREE(talloced);
7383 reply_nterror(req, NT_STATUS_NO_MEMORY);
7384 goto out;
7385 }
7386
7387 if (!resolve_wildcards(ctx, smb_fname_src->base_name,
7388 smb_fname_dst->base_name,
7389 &destname)) {
7390 TALLOC_FREE(talloced);
7391 continue;
7392 }
7393 if (!destname) {
7394 TALLOC_FREE(dir_hnd);
7395 TALLOC_FREE(talloced);
7396 reply_nterror(req, NT_STATUS_NO_MEMORY);
7397 goto out;
7398 }
7399
7400 TALLOC_FREE(smb_fname_dst->base_name);
7401 smb_fname_dst->base_name = destname;
7402
7403 status = check_name(conn, smb_fname_src->base_name);
7404 if (!NT_STATUS_IS_OK(status)) {
7405 TALLOC_FREE(dir_hnd);
7406 TALLOC_FREE(talloced);
7407 reply_nterror(req, status);
7408 goto out;
7409 }
7410
7411 status = check_name(conn, smb_fname_dst->base_name);
7412 if (!NT_STATUS_IS_OK(status)) {
7413 TALLOC_FREE(dir_hnd);
7414 TALLOC_FREE(talloced);
7415 reply_nterror(req, status);
7416 goto out;
7417 }
7418
7419 DEBUG(3,("reply_copy : doing copy on %s -> %s\n",
7420 smb_fname_src->base_name,
7421 smb_fname_dst->base_name));
7422
7423 status = copy_file(ctx, conn, smb_fname_src,
7424 smb_fname_dst, ofun, count,
7425 target_is_directory);
7426 if (NT_STATUS_IS_OK(status)) {
7427 count++;
7428 }
7429
7430 TALLOC_FREE(talloced);
7431 }
7432 TALLOC_FREE(dir_hnd);
7433 }
7434
7435 if (count == 0) {
7436 reply_nterror(req, dos_to_ntstatus(ERRDOS, error));
7437 goto out;
7438 }
7439
7440 reply_outbuf(req, 1, 0);
7441 SSVAL(req->outbuf,smb_vwv0,count);
7442 out:
7443 TALLOC_FREE(smb_fname_src);
7444 TALLOC_FREE(smb_fname_dst);
7445 TALLOC_FREE(fname_src);
7446 TALLOC_FREE(fname_dst);
7447 TALLOC_FREE(fname_src_mask);
7448 TALLOC_FREE(fname_src_dir);
7449
7450 END_PROFILE(SMBcopy);
7451 return;
7452 }
7453
7454 #undef DBGC_CLASS
7455 #define DBGC_CLASS DBGC_LOCKING
7456
7457 /****************************************************************************
7458 Get a lock pid, dealing with large count requests.
7459 ****************************************************************************/
7460
7461 uint64_t get_lock_pid(const uint8_t *data, int data_offset,
7462 bool large_file_format)
7463 {
7464 if(!large_file_format)
7465 return (uint64_t)SVAL(data,SMB_LPID_OFFSET(data_offset));
7466 else
7467 return (uint64_t)SVAL(data,SMB_LARGE_LPID_OFFSET(data_offset));
7468 }
7469
7470 /****************************************************************************
7471 Get a lock count, dealing with large count requests.
7472 ****************************************************************************/
7473
7474 uint64_t get_lock_count(const uint8_t *data, int data_offset,
7475 bool large_file_format)
7476 {
7477 uint64_t count = 0;
7478
7479 if(!large_file_format) {
7480 count = (uint64_t)IVAL(data,SMB_LKLEN_OFFSET(data_offset));
7481 } else {
7482
7483 #if defined(HAVE_LONGLONG)
7484 count = (((uint64_t) IVAL(data,SMB_LARGE_LKLEN_OFFSET_HIGH(data_offset))) << 32) |
7485 ((uint64_t) IVAL(data,SMB_LARGE_LKLEN_OFFSET_LOW(data_offset)));
7486 #else /* HAVE_LONGLONG */
7487
7488 /*
7489 * NT4.x seems to be broken in that it sends large file (64 bit)
7490 * lockingX calls even if the CAP_LARGE_FILES was *not*
7491 * negotiated. For boxes without large unsigned ints truncate the
7492 * lock count by dropping the top 32 bits.
7493 */
7494
7495 if(IVAL(data,SMB_LARGE_LKLEN_OFFSET_HIGH(data_offset)) != 0) {
7496 DEBUG(3,("get_lock_count: truncating lock count (high)0x%x (low)0x%x to just low count.\n",
7497 (unsigned int)IVAL(data,SMB_LARGE_LKLEN_OFFSET_HIGH(data_offset)),
7498 (unsigned int)IVAL(data,SMB_LARGE_LKLEN_OFFSET_LOW(data_offset)) ));
7499 SIVAL(data,SMB_LARGE_LKLEN_OFFSET_HIGH(data_offset),0);
7500 }
7501
7502 count = (uint64_t)IVAL(data,SMB_LARGE_LKLEN_OFFSET_LOW(data_offset));
7503 #endif /* HAVE_LONGLONG */
7504 }
7505
7506 return count;
7507 }
7508
7509 #if !defined(HAVE_LONGLONG)
7510 /****************************************************************************
7511 Pathetically try and map a 64 bit lock offset into 31 bits. I hate Windows :-).
7512 ****************************************************************************/
7513
7514 static uint32 map_lock_offset(uint32 high, uint32 low)
7515 {
7516 unsigned int i;
7517 uint32 mask = 0;
7518 uint32 highcopy = high;
7519
7520 /*
7521 * Try and find out how many significant bits there are in high.
7522 */
7523
7524 for(i = 0; highcopy; i++)
7525 highcopy >>= 1;
7526
7527 /*
7528 * We use 31 bits not 32 here as POSIX
7529 * lock offsets may not be negative.
7530 */
7531
7532 mask = (~0) << (31 - i);
7533
7534 if(low & mask)
7535 return 0; /* Fail. */
7536
7537 high <<= (31 - i);
7538
7539 return (high|low);
7540 }
7541 #endif /* !defined(HAVE_LONGLONG) */
7542
7543 /****************************************************************************
7544 Get a lock offset, dealing with large offset requests.
7545 ****************************************************************************/
7546
7547 uint64_t get_lock_offset(const uint8_t *data, int data_offset,
7548 bool large_file_format, bool *err)
7549 {
7550 uint64_t offset = 0;
7551
7552 *err = False;
7553
7554 if(!large_file_format) {
7555 offset = (uint64_t)IVAL(data,SMB_LKOFF_OFFSET(data_offset));
7556 } else {
7557
7558 #if defined(HAVE_LONGLONG)
7559 offset = (((uint64_t) IVAL(data,SMB_LARGE_LKOFF_OFFSET_HIGH(data_offset))) << 32) |
7560 ((uint64_t) IVAL(data,SMB_LARGE_LKOFF_OFFSET_LOW(data_offset)));
7561 #else /* HAVE_LONGLONG */
7562
7563 /*
7564 * NT4.x seems to be broken in that it sends large file (64 bit)
7565 * lockingX calls even if the CAP_LARGE_FILES was *not*
7566 * negotiated. For boxes without large unsigned ints mangle the
7567 * lock offset by mapping the top 32 bits onto the lower 32.
7568 */
7569
7570 if(IVAL(data,SMB_LARGE_LKOFF_OFFSET_HIGH(data_offset)) != 0) {
7571 uint32 low = IVAL(data,SMB_LARGE_LKOFF_OFFSET_LOW(data_offset));
7572 uint32 high = IVAL(data,SMB_LARGE_LKOFF_OFFSET_HIGH(data_offset));
7573 uint32 new_low = 0;
7574
7575 if((new_low = map_lock_offset(high, low)) == 0) {
7576 *err = True;
7577 return (uint64_t)-1;
7578 }
7579
7580 DEBUG(3,("get_lock_offset: truncating lock offset (high)0x%x (low)0x%x to offset 0x%x.\n",
7581 (unsigned int)high, (unsigned int)low, (unsigned int)new_low ));
7582 SIVAL(data,SMB_LARGE_LKOFF_OFFSET_HIGH(data_offset),0);
7583 SIVAL(data,SMB_LARGE_LKOFF_OFFSET_LOW(data_offset),new_low);
7584 }
7585
7586 offset = (uint64_t)IVAL(data,SMB_LARGE_LKOFF_OFFSET_LOW(data_offset));
7587 #endif /* HAVE_LONGLONG */
7588 }
7589
7590 return offset;
7591 }
7592
7593 NTSTATUS smbd_do_locking(struct smb_request *req,
7594 files_struct *fsp,
7595 uint8_t type,
7596 int32_t timeout,
7597 uint16_t num_ulocks,
7598 struct smbd_lock_element *ulocks,
7599 uint16_t num_locks,
7600 struct smbd_lock_element *locks,
7601 bool *async)
7602 {
7603 connection_struct *conn = req->conn;
7604 int i;
7605 NTSTATUS status = NT_STATUS_OK;
7606
7607 *async = false;
7608
7609 /* Data now points at the beginning of the list
7610 of smb_unlkrng structs */
7611 for(i = 0; i < (int)num_ulocks; i++) {
7612 struct smbd_lock_element *e = &ulocks[i];
7613
7614 DEBUG(10,("smbd_do_locking: unlock start=%.0f, len=%.0f for "
7615 "pid %u, file %s\n",
7616 (double)e->offset,
7617 (double)e->count,
7618 (unsigned int)e->smblctx,
7619 fsp_str_dbg(fsp)));
7620
7621 if (e->brltype != UNLOCK_LOCK) {
7622 /* this can only happen with SMB2 */
7623 return NT_STATUS_INVALID_PARAMETER;
7624 }
7625
7626 status = do_unlock(req->sconn->msg_ctx,
7627 fsp,
7628 e->smblctx,
7629 e->count,
7630 e->offset,
7631 WINDOWS_LOCK);
7632
7633 DEBUG(10, ("smbd_do_locking: unlock returned %s\n",
7634 nt_errstr(status)));
7635
7636 if (!NT_STATUS_IS_OK(status)) {
7637 return status;
7638 }
7639 }
7640
7641 /* Setup the timeout in seconds. */
7642
7643 if (!lp_blocking_locks(SNUM(conn))) {
7644 timeout = 0;
7645 }
7646
7647 /* Data now points at the beginning of the list
7648 of smb_lkrng structs */
7649
7650 for(i = 0; i < (int)num_locks; i++) {
7651 struct smbd_lock_element *e = &locks[i];
7652
7653 DEBUG(10,("smbd_do_locking: lock start=%.0f, len=%.0f for smblctx "
7654 "%llu, file %s timeout = %d\n",
7655 (double)e->offset,
7656 (double)e->count,
7657 (unsigned long long)e->smblctx,
7658 fsp_str_dbg(fsp),
7659 (int)timeout));
7660
7661 if (type & LOCKING_ANDX_CANCEL_LOCK) {
7662 struct blocking_lock_record *blr = NULL;
7663
7664 if (num_locks > 1) {
7665 /*
7666 * MS-CIFS (2.2.4.32.1) states that a cancel is honored if and only
7667 * if the lock vector contains one entry. When given mutliple cancel
7668 * requests in a single PDU we expect the server to return an
7669 * error. Windows servers seem to accept the request but only
7670 * cancel the first lock.
7671 * JRA - Do what Windows does (tm) :-).
7672 */
7673
7674 #if 0
7675 /* MS-CIFS (2.2.4.32.1) behavior. */
7676 return NT_STATUS_DOS(ERRDOS,
7677 ERRcancelviolation);
7678 #else
7679 /* Windows behavior. */
7680 if (i != 0) {
7681 DEBUG(10,("smbd_do_locking: ignoring subsequent "
7682 "cancel request\n"));
7683 continue;
7684 }
7685 #endif
7686 }
7687
7688 if (lp_blocking_locks(SNUM(conn))) {
7689
7690 /* Schedule a message to ourselves to
7691 remove the blocking lock record and
7692 return the right error. */
7693
7694 blr = blocking_lock_cancel_smb1(fsp,
7695 e->smblctx,
7696 e->offset,
7697 e->count,
7698 WINDOWS_LOCK,
7699 type,
7700 NT_STATUS_FILE_LOCK_CONFLICT);
7701 if (blr == NULL) {
7702 return NT_STATUS_DOS(
7703 ERRDOS,
7704 ERRcancelviolation);
7705 }
7706 }
7707 /* Remove a matching pending lock. */
7708 status = do_lock_cancel(fsp,
7709 e->smblctx,
7710 e->count,
7711 e->offset,
7712 WINDOWS_LOCK,
7713 blr);
7714 } else {
7715 bool blocking_lock = timeout ? true : false;
7716 bool defer_lock = false;
7717 struct byte_range_lock *br_lck;
7718 uint64_t block_smblctx;
7719
7720 br_lck = do_lock(req->sconn->msg_ctx,
7721 fsp,
7722 e->smblctx,
7723 e->count,
7724 e->offset,
7725 e->brltype,
7726 WINDOWS_LOCK,
7727 blocking_lock,
7728 &status,
7729 &block_smblctx,
7730 NULL);
7731
7732 if (br_lck && blocking_lock && ERROR_WAS_LOCK_DENIED(status)) {
7733 /* Windows internal resolution for blocking locks seems
7734 to be about 200ms... Don't wait for less than that. JRA. */
7735 if (timeout != -1 && timeout < lp_lock_spin_time()) {
7736 timeout = lp_lock_spin_time();
7737 }
7738 defer_lock = true;
7739 }
7740
7741 /* If a lock sent with timeout of zero would fail, and
7742 * this lock has been requested multiple times,
7743 * according to brl_lock_failed() we convert this
7744 * request to a blocking lock with a timeout of between
7745 * 150 - 300 milliseconds.
7746 *
7747 * If lp_lock_spin_time() has been set to 0, we skip
7748 * this blocking retry and fail immediately.
7749 *
7750 * Replacement for do_lock_spin(). JRA. */
7751
7752 if (!req->sconn->using_smb2 &&
7753 br_lck && lp_blocking_locks(SNUM(conn)) &&
7754 lp_lock_spin_time() && !blocking_lock &&
7755 NT_STATUS_EQUAL((status),
7756 NT_STATUS_FILE_LOCK_CONFLICT))
7757 {
7758 defer_lock = true;
7759 timeout = lp_lock_spin_time();
7760 }
7761
7762 if (br_lck && defer_lock) {
7763 /*
7764 * A blocking lock was requested. Package up
7765 * this smb into a queued request and push it
7766 * onto the blocking lock queue.
7767 */
7768 if(push_blocking_lock_request(br_lck,
7769 req,
7770 fsp,
7771 timeout,
7772 i,
7773 e->smblctx,
7774 e->brltype,
7775 WINDOWS_LOCK,
7776 e->offset,
7777 e->count,
7778 block_smblctx)) {
7779 TALLOC_FREE(br_lck);
7780 *async = true;
7781 return NT_STATUS_OK;
7782 }
7783 }
7784
7785 TALLOC_FREE(br_lck);
7786 }
7787
7788 if (!NT_STATUS_IS_OK(status)) {
7789 break;
7790 }
7791 }
7792
7793 /* If any of the above locks failed, then we must unlock
7794 all of the previous locks (X/Open spec). */
7795
7796 if (num_locks != 0 && !NT_STATUS_IS_OK(status)) {
7797
7798 if (type & LOCKING_ANDX_CANCEL_LOCK) {
7799 i = -1; /* we want to skip the for loop */
7800 }
7801
7802 /*
7803 * Ensure we don't do a remove on the lock that just failed,
7804 * as under POSIX rules, if we have a lock already there, we
7805 * will delete it (and we shouldn't) .....
7806 */
7807 for(i--; i >= 0; i--) {
7808 struct smbd_lock_element *e = &locks[i];
7809
7810 do_unlock(req->sconn->msg_ctx,
7811 fsp,
7812 e->smblctx,
7813 e->count,
7814 e->offset,
7815 WINDOWS_LOCK);
7816 }
7817 return status;
7818 }
7819
7820 DEBUG(3, ("smbd_do_locking: %s type=%d num_locks=%d num_ulocks=%d\n",
7821 fsp_fnum_dbg(fsp), (unsigned int)type, num_locks, num_ulocks));
7822
7823 return NT_STATUS_OK;
7824 }
7825
7826 /****************************************************************************
7827 Reply to a lockingX request.
7828 ****************************************************************************/
7829
7830 void reply_lockingX(struct smb_request *req)
7831 {
7832 connection_struct *conn = req->conn;
7833 files_struct *fsp;
7834 unsigned char locktype;
7835 unsigned char oplocklevel;
7836 uint16 num_ulocks;
7837 uint16 num_locks;
7838 int32 lock_timeout;
7839 int i;
7840 const uint8_t *data;
7841 bool large_file_format;
7842 bool err;
7843 NTSTATUS status = NT_STATUS_UNSUCCESSFUL;
7844 struct smbd_lock_element *ulocks;
7845 struct smbd_lock_element *locks;
7846 bool async = false;
7847
7848 START_PROFILE(SMBlockingX);
7849
7850 if (req->wct < 8) {
7851 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
7852 END_PROFILE(SMBlockingX);
7853 return;
7854 }
7855
7856 fsp = file_fsp(req, SVAL(req->vwv+2, 0));
7857 locktype = CVAL(req->vwv+3, 0);
7858 oplocklevel = CVAL(req->vwv+3, 1);
7859 num_ulocks = SVAL(req->vwv+6, 0);
7860 num_locks = SVAL(req->vwv+7, 0);
7861 lock_timeout = IVAL(req->vwv+4, 0);
7862 large_file_format = (locktype & LOCKING_ANDX_LARGE_FILES)?True:False;
7863
7864 if (!check_fsp(conn, req, fsp)) {
7865 END_PROFILE(SMBlockingX);
7866 return;
7867 }
7868
7869 data = req->buf;
7870
7871 if (locktype & LOCKING_ANDX_CHANGE_LOCKTYPE) {
7872 /* we don't support these - and CANCEL_LOCK makes w2k
7873 and XP reboot so I don't really want to be
7874 compatible! (tridge) */
7875 reply_force_doserror(req, ERRDOS, ERRnoatomiclocks);
7876 END_PROFILE(SMBlockingX);
7877 return;
7878 }
7879
7880 /* Check if this is an oplock break on a file
7881 we have granted an oplock on.
7882 */
7883 if ((locktype & LOCKING_ANDX_OPLOCK_RELEASE)) {
7884 /* Client can insist on breaking to none. */
7885 bool break_to_none = (oplocklevel == 0);
7886 bool result;
7887
7888 DEBUG(5,("reply_lockingX: oplock break reply (%u) from client "
7889 "for %s\n", (unsigned int)oplocklevel,
7890 fsp_fnum_dbg(fsp)));
7891
7892 /*
7893 * Make sure we have granted an exclusive or batch oplock on
7894 * this file.
7895 */
7896
7897 if (fsp->oplock_type == 0) {
7898
7899 /* The Samba4 nbench simulator doesn't understand
7900 the difference between break to level2 and break
7901 to none from level2 - it sends oplock break
7902 replies in both cases. Don't keep logging an error
7903 message here - just ignore it. JRA. */
7904
7905 DEBUG(5,("reply_lockingX: Error : oplock break from "
7906 "client for %s (oplock=%d) and no "
7907 "oplock granted on this file (%s).\n",
7908 fsp_fnum_dbg(fsp), fsp->oplock_type,
7909 fsp_str_dbg(fsp)));
7910
7911 /* if this is a pure oplock break request then don't
7912 * send a reply */
7913 if (num_locks == 0 && num_ulocks == 0) {
7914 END_PROFILE(SMBlockingX);
7915 return;
7916 } else {
7917 END_PROFILE(SMBlockingX);
7918 reply_nterror(req, NT_STATUS_FILE_LOCK_CONFLICT);
7919 return;
7920 }
7921 }
7922
7923 if ((fsp->sent_oplock_break == BREAK_TO_NONE_SENT) ||
7924 (break_to_none)) {
7925 result = remove_oplock(fsp);
7926 } else {
7927 result = downgrade_oplock(fsp);
7928 }
7929
7930 if (!result) {
7931 DEBUG(0, ("reply_lockingX: error in removing "
7932 "oplock on file %s\n", fsp_str_dbg(fsp)));
7933 /* Hmmm. Is this panic justified? */
7934 smb_panic("internal tdb error");
7935 }
7936
7937 reply_to_oplock_break_requests(fsp);
7938
7939 /* if this is a pure oplock break request then don't send a
7940 * reply */
7941 if (num_locks == 0 && num_ulocks == 0) {
7942 /* Sanity check - ensure a pure oplock break is not a
7943 chained request. */
7944 if(CVAL(req->vwv+0, 0) != 0xff)
7945 DEBUG(0,("reply_lockingX: Error : pure oplock "
7946 "break is a chained %d request !\n",
7947 (unsigned int)CVAL(req->vwv+0, 0)));
7948 END_PROFILE(SMBlockingX);
7949 return;
7950 }
7951 }
7952
7953 if (req->buflen <
7954 (num_ulocks + num_locks) * (large_file_format ? 20 : 10)) {
7955 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
7956 END_PROFILE(SMBlockingX);
7957 return;
7958 }
7959
7960 ulocks = talloc_array(req, struct smbd_lock_element, num_ulocks);
7961 if (ulocks == NULL) {
7962 reply_nterror(req, NT_STATUS_NO_MEMORY);
7963 END_PROFILE(SMBlockingX);
7964 return;
7965 }
7966
7967 locks = talloc_array(req, struct smbd_lock_element, num_locks);
7968 if (locks == NULL) {
7969 reply_nterror(req, NT_STATUS_NO_MEMORY);
7970 END_PROFILE(SMBlockingX);
7971 return;
7972 }
7973
7974 /* Data now points at the beginning of the list
7975 of smb_unlkrng structs */
7976 for(i = 0; i < (int)num_ulocks; i++) {
7977 ulocks[i].smblctx = get_lock_pid(data, i, large_file_format);
7978 ulocks[i].count = get_lock_count(data, i, large_file_format);
7979 ulocks[i].offset = get_lock_offset(data, i, large_file_format, &err);
7980 ulocks[i].brltype = UNLOCK_LOCK;
7981
7982 /*
7983 * There is no error code marked "stupid client bug".... :-).
7984 */
7985 if(err) {
7986 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
7987 END_PROFILE(SMBlockingX);
7988 return;
7989 }
7990 }
7991
7992 /* Now do any requested locks */
7993 data += ((large_file_format ? 20 : 10)*num_ulocks);
7994
7995 /* Data now points at the beginning of the list
7996 of smb_lkrng structs */
7997
7998 for(i = 0; i < (int)num_locks; i++) {
7999 locks[i].smblctx = get_lock_pid(data, i, large_file_format);
8000 locks[i].count = get_lock_count(data, i, large_file_format);
8001 locks[i].offset = get_lock_offset(data, i, large_file_format, &err);
8002
8003 if (locktype & LOCKING_ANDX_SHARED_LOCK) {
8004 if (locktype & LOCKING_ANDX_CANCEL_LOCK) {
8005 locks[i].brltype = PENDING_READ_LOCK;
8006 } else {
8007 locks[i].brltype = READ_LOCK;
8008 }
8009 } else {
8010 if (locktype & LOCKING_ANDX_CANCEL_LOCK) {
8011 locks[i].brltype = PENDING_WRITE_LOCK;
8012 } else {
8013 locks[i].brltype = WRITE_LOCK;
8014 }
8015 }
8016
8017 /*
8018 * There is no error code marked "stupid client bug".... :-).
8019 */
8020 if(err) {
8021 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
8022 END_PROFILE(SMBlockingX);
8023 return;
8024 }
8025 }
8026
8027 status = smbd_do_locking(req, fsp,
8028 locktype, lock_timeout,
8029 num_ulocks, ulocks,
8030 num_locks, locks,
8031 &async);
8032 if (!NT_STATUS_IS_OK(status)) {
8033 END_PROFILE(SMBlockingX);
8034 reply_nterror(req, status);
8035 return;
8036 }
8037 if (async) {
8038 END_PROFILE(SMBlockingX);
8039 return;
8040 }
8041
8042 reply_outbuf(req, 2, 0);
8043 SSVAL(req->outbuf, smb_vwv0, 0xff); /* andx chain ends */
8044 SSVAL(req->outbuf, smb_vwv1, 0); /* no andx offset */
8045
8046 DEBUG(3, ("lockingX %s type=%d num_locks=%d num_ulocks=%d\n",
8047 fsp_fnum_dbg(fsp), (unsigned int)locktype, num_locks, num_ulocks));
8048
8049 END_PROFILE(SMBlockingX);
8050 }
8051
8052 #undef DBGC_CLASS
8053 #define DBGC_CLASS DBGC_ALL
8054
8055 /****************************************************************************
8056 Reply to a SMBreadbmpx (read block multiplex) request.
8057 Always reply with an error, if someone has a platform really needs this,
8058 please contact vl@samba.org
8059 ****************************************************************************/
8060
8061 void reply_readbmpx(struct smb_request *req)
8062 {
8063 START_PROFILE(SMBreadBmpx);
8064 reply_force_doserror(req, ERRSRV, ERRuseSTD);
8065 END_PROFILE(SMBreadBmpx);
8066 return;
8067 }
8068
8069 /****************************************************************************
8070 Reply to a SMBreadbs (read block multiplex secondary) request.
8071 Always reply with an error, if someone has a platform really needs this,
8072 please contact vl@samba.org
8073 ****************************************************************************/
8074
8075 void reply_readbs(struct smb_request *req)
8076 {
8077 START_PROFILE(SMBreadBs);
8078 reply_force_doserror(req, ERRSRV, ERRuseSTD);
8079 END_PROFILE(SMBreadBs);
8080 return;
8081 }
8082
8083 /****************************************************************************
8084 Reply to a SMBsetattrE.
8085 ****************************************************************************/
8086
8087 void reply_setattrE(struct smb_request *req)
8088 {
8089 connection_struct *conn = req->conn;
8090 struct smb_file_time ft;
8091 files_struct *fsp;
8092 NTSTATUS status;
8093
8094 START_PROFILE(SMBsetattrE);
8095 ZERO_STRUCT(ft);
8096
8097 if (req->wct < 7) {
8098 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
8099 goto out;
8100 }
8101
8102 fsp = file_fsp(req, SVAL(req->vwv+0, 0));
8103
8104 if(!fsp || (fsp->conn != conn)) {
8105 reply_nterror(req, NT_STATUS_INVALID_HANDLE);
8106 goto out;
8107 }
8108
8109 /*
8110 * Convert the DOS times into unix times.
8111 */
8112
8113 ft.atime = convert_time_t_to_timespec(
8114 srv_make_unix_date2(req->vwv+3));
8115 ft.mtime = convert_time_t_to_timespec(
8116 srv_make_unix_date2(req->vwv+5));
8117 ft.create_time = convert_time_t_to_timespec(
8118 srv_make_unix_date2(req->vwv+1));
8119
8120 reply_outbuf(req, 0, 0);
8121
8122 /*
8123 * Patch from Ray Frush <frush@engr.colostate.edu>
8124 * Sometimes times are sent as zero - ignore them.
8125 */
8126
8127 /* Ensure we have a valid stat struct for the source. */
8128 status = vfs_stat_fsp(fsp);
8129 if (!NT_STATUS_IS_OK(status)) {
8130 reply_nterror(req, status);
8131 goto out;
8132 }
8133
8134 if (!(fsp->access_mask & FILE_WRITE_ATTRIBUTES)) {
8135 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
8136 goto out;
8137 }
8138
8139 status = smb_set_file_time(conn, fsp, fsp->fsp_name, &ft, true);
8140 if (!NT_STATUS_IS_OK(status)) {
8141 reply_nterror(req, status);
8142 goto out;
8143 }
8144
8145 DEBUG( 3, ( "reply_setattrE %s actime=%u modtime=%u "
8146 " createtime=%u\n",
8147 fsp_fnum_dbg(fsp),
8148 (unsigned int)ft.atime.tv_sec,
8149 (unsigned int)ft.mtime.tv_sec,
8150 (unsigned int)ft.create_time.tv_sec
8151 ));
8152 out:
8153 END_PROFILE(SMBsetattrE);
8154 return;
8155 }
8156
8157
8158 /* Back from the dead for OS/2..... JRA. */
8159
8160 /****************************************************************************
8161 Reply to a SMBwritebmpx (write block multiplex primary) request.
8162 Always reply with an error, if someone has a platform really needs this,
8163 please contact vl@samba.org
8164 ****************************************************************************/
8165
8166 void reply_writebmpx(struct smb_request *req)
8167 {
8168 START_PROFILE(SMBwriteBmpx);
8169 reply_force_doserror(req, ERRSRV, ERRuseSTD);
8170 END_PROFILE(SMBwriteBmpx);
8171 return;
8172 }
8173
8174 /****************************************************************************
8175 Reply to a SMBwritebs (write block multiplex secondary) request.
8176 Always reply with an error, if someone has a platform really needs this,
8177 please contact vl@samba.org
8178 ****************************************************************************/
8179
8180 void reply_writebs(struct smb_request *req)
8181 {
8182 START_PROFILE(SMBwriteBs);
8183 reply_force_doserror(req, ERRSRV, ERRuseSTD);
8184 END_PROFILE(SMBwriteBs);
8185 return;
8186 }
8187
8188 /****************************************************************************
8189 Reply to a SMBgetattrE.
8190 ****************************************************************************/
8191
8192 void reply_getattrE(struct smb_request *req)
8193 {
8194 connection_struct *conn = req->conn;
8195 int mode;
8196 files_struct *fsp;
8197 struct timespec create_ts;
8198
8199 START_PROFILE(SMBgetattrE);
8200
8201 if (req->wct < 1) {
8202 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
8203 END_PROFILE(SMBgetattrE);
8204 return;
8205 }
8206
8207 fsp = file_fsp(req, SVAL(req->vwv+0, 0));
8208
8209 if(!fsp || (fsp->conn != conn)) {
8210 reply_nterror(req, NT_STATUS_INVALID_HANDLE);
8211 END_PROFILE(SMBgetattrE);
8212 return;
8213 }
8214
8215 /* Do an fstat on this file */
8216 if(fsp_stat(fsp)) {
8217 reply_nterror(req, map_nt_error_from_unix(errno));
8218 END_PROFILE(SMBgetattrE);
8219 return;
8220 }
8221
8222 mode = dos_mode(conn, fsp->fsp_name);
8223
8224 /*
8225 * Convert the times into dos times. Set create
8226 * date to be last modify date as UNIX doesn't save
8227 * this.
8228 */
8229
8230 reply_outbuf(req, 11, 0);
8231
8232 create_ts = get_create_timespec(conn, fsp, fsp->fsp_name);
8233 srv_put_dos_date2((char *)req->outbuf, smb_vwv0, create_ts.tv_sec);
8234 srv_put_dos_date2((char *)req->outbuf, smb_vwv2,
8235 convert_timespec_to_time_t(fsp->fsp_name->st.st_ex_atime));
8236 /* Should we check pending modtime here ? JRA */
8237 srv_put_dos_date2((char *)req->outbuf, smb_vwv4,
8238 convert_timespec_to_time_t(fsp->fsp_name->st.st_ex_mtime));
8239
8240 if (mode & FILE_ATTRIBUTE_DIRECTORY) {
8241 SIVAL(req->outbuf, smb_vwv6, 0);
8242 SIVAL(req->outbuf, smb_vwv8, 0);
8243 } else {
8244 uint32 allocation_size = SMB_VFS_GET_ALLOC_SIZE(conn,fsp, &fsp->fsp_name->st);
8245 SIVAL(req->outbuf, smb_vwv6, (uint32)fsp->fsp_name->st.st_ex_size);
8246 SIVAL(req->outbuf, smb_vwv8, allocation_size);
8247 }
8248 SSVAL(req->outbuf,smb_vwv10, mode);
8249
8250 DEBUG( 3, ( "reply_getattrE %s\n", fsp_fnum_dbg(fsp)));
8251
8252 END_PROFILE(SMBgetattrE);
8253 return;
8254 }
reg import