Fix spelling mistakes
[bbaumbach/samba-autobuild/.git] / source3 / smbd / nttrans.c
1 /*
2    Unix SMB/CIFS implementation.
3    SMB NT transaction handling
4    Copyright (C) Jeremy Allison                 1994-2007
5    Copyright (C) Stefan (metze) Metzmacher      2003
6
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 3 of the License, or
10    (at your option) any later version.
11
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16
17    You should have received a copy of the GNU General Public License
18    along with this program.  If not, see <http://www.gnu.org/licenses/>.
19 */
20
21 #include "includes.h"
22 #include "system/filesys.h"
23 #include "smbd/smbd.h"
24 #include "smbd/globals.h"
25 #include "fake_file.h"
26 #include "../libcli/security/security.h"
27 #include "../librpc/gen_ndr/ndr_security.h"
28 #include "passdb/lookup_sid.h"
29 #include "auth.h"
30 #include "smbprofile.h"
31 #include "libsmb/libsmb.h"
32 #include "lib/util_ea.h"
33 #include "librpc/gen_ndr/ndr_quota.h"
34 #include "librpc/gen_ndr/ndr_security.h"
35
36 extern const struct generic_mapping file_generic_mapping;
37
38 static char *nttrans_realloc(char **ptr, size_t size)
39 {
40         if (ptr==NULL) {
41                 smb_panic("nttrans_realloc() called with NULL ptr");
42         }
43
44         *ptr = (char *)SMB_REALLOC(*ptr, size);
45         if(*ptr == NULL) {
46                 return NULL;
47         }
48         memset(*ptr,'\0',size);
49         return *ptr;
50 }
51
52 /****************************************************************************
53  Send the required number of replies back.
54  We assume all fields other than the data fields are
55  set correctly for the type of call.
56  HACK ! Always assumes smb_setup field is zero.
57 ****************************************************************************/
58
59 static void send_nt_replies(connection_struct *conn,
60                             struct smb_request *req, NTSTATUS nt_error,
61                             char *params, int paramsize,
62                             char *pdata, int datasize)
63 {
64         int data_to_send = datasize;
65         int params_to_send = paramsize;
66         int useable_space;
67         char *pp = params;
68         char *pd = pdata;
69         int params_sent_thistime, data_sent_thistime, total_sent_thistime;
70         int alignment_offset = 1;
71         int data_alignment_offset = 0;
72         struct smbXsrv_connection *xconn = req->xconn;
73         int max_send = xconn->smb1.sessions.max_send;
74
75         /*
76          * If there genuinely are no parameters or data to send just send
77          * the empty packet.
78          */
79
80         if(params_to_send == 0 && data_to_send == 0) {
81                 reply_outbuf(req, 18, 0);
82                 if (NT_STATUS_V(nt_error)) {
83                         error_packet_set((char *)req->outbuf,
84                                          0, 0, nt_error,
85                                          __LINE__,__FILE__);
86                 }
87                 show_msg((char *)req->outbuf);
88                 if (!srv_send_smb(xconn,
89                                 (char *)req->outbuf,
90                                 true, req->seqnum+1,
91                                 IS_CONN_ENCRYPTED(conn),
92                                 &req->pcd)) {
93                         exit_server_cleanly("send_nt_replies: srv_send_smb failed.");
94                 }
95                 TALLOC_FREE(req->outbuf);
96                 return;
97         }
98
99         /*
100          * When sending params and data ensure that both are nicely aligned.
101          * Only do this alignment when there is also data to send - else
102          * can cause NT redirector problems.
103          */
104
105         if (((params_to_send % 4) != 0) && (data_to_send != 0)) {
106                 data_alignment_offset = 4 - (params_to_send % 4);
107         }
108
109         /*
110          * Space is bufsize minus Netbios over TCP header minus SMB header.
111          * The alignment_offset is to align the param bytes on a four byte
112          * boundary (2 bytes for data len, one byte pad).
113          * NT needs this to work correctly.
114          */
115
116         useable_space = max_send - (smb_size
117                                     + 2 * 18 /* wct */
118                                     + alignment_offset
119                                     + data_alignment_offset);
120
121         if (useable_space < 0) {
122                 char *msg = talloc_asprintf(
123                         talloc_tos(),
124                         "send_nt_replies failed sanity useable_space = %d!!!",
125                         useable_space);
126                 DEBUG(0, ("%s\n", msg));
127                 exit_server_cleanly(msg);
128         }
129
130         while (params_to_send || data_to_send) {
131
132                 /*
133                  * Calculate whether we will totally or partially fill this packet.
134                  */
135
136                 total_sent_thistime = params_to_send + data_to_send;
137
138                 /*
139                  * We can never send more than useable_space.
140                  */
141
142                 total_sent_thistime = MIN(total_sent_thistime, useable_space);
143
144                 reply_outbuf(req, 18,
145                              total_sent_thistime + alignment_offset
146                              + data_alignment_offset);
147
148                 /*
149                  * Set total params and data to be sent.
150                  */
151
152                 SIVAL(req->outbuf,smb_ntr_TotalParameterCount,paramsize);
153                 SIVAL(req->outbuf,smb_ntr_TotalDataCount,datasize);
154
155                 /*
156                  * Calculate how many parameters and data we can fit into
157                  * this packet. Parameters get precedence.
158                  */
159
160                 params_sent_thistime = MIN(params_to_send,useable_space);
161                 data_sent_thistime = useable_space - params_sent_thistime;
162                 data_sent_thistime = MIN(data_sent_thistime,data_to_send);
163
164                 SIVAL(req->outbuf, smb_ntr_ParameterCount,
165                       params_sent_thistime);
166
167                 if(params_sent_thistime == 0) {
168                         SIVAL(req->outbuf,smb_ntr_ParameterOffset,0);
169                         SIVAL(req->outbuf,smb_ntr_ParameterDisplacement,0);
170                 } else {
171                         /*
172                          * smb_ntr_ParameterOffset is the offset from the start of the SMB header to the
173                          * parameter bytes, however the first 4 bytes of outbuf are
174                          * the Netbios over TCP header. Thus use smb_base() to subtract
175                          * them from the calculation.
176                          */
177
178                         SIVAL(req->outbuf,smb_ntr_ParameterOffset,
179                               ((smb_buf(req->outbuf)+alignment_offset)
180                                - smb_base(req->outbuf)));
181                         /*
182                          * Absolute displacement of param bytes sent in this packet.
183                          */
184
185                         SIVAL(req->outbuf, smb_ntr_ParameterDisplacement,
186                               pp - params);
187                 }
188
189                 /*
190                  * Deal with the data portion.
191                  */
192
193                 SIVAL(req->outbuf, smb_ntr_DataCount, data_sent_thistime);
194
195                 if(data_sent_thistime == 0) {
196                         SIVAL(req->outbuf,smb_ntr_DataOffset,0);
197                         SIVAL(req->outbuf,smb_ntr_DataDisplacement, 0);
198                 } else {
199                         /*
200                          * The offset of the data bytes is the offset of the
201                          * parameter bytes plus the number of parameters being sent this time.
202                          */
203
204                         SIVAL(req->outbuf, smb_ntr_DataOffset,
205                               ((smb_buf(req->outbuf)+alignment_offset) -
206                                smb_base(req->outbuf))
207                               + params_sent_thistime + data_alignment_offset);
208                         SIVAL(req->outbuf,smb_ntr_DataDisplacement, pd - pdata);
209                 }
210
211                 /*
212                  * Copy the param bytes into the packet.
213                  */
214
215                 if(params_sent_thistime) {
216                         if (alignment_offset != 0) {
217                                 memset(smb_buf(req->outbuf), 0,
218                                        alignment_offset);
219                         }
220                         memcpy((smb_buf(req->outbuf)+alignment_offset), pp,
221                                params_sent_thistime);
222                 }
223
224                 /*
225                  * Copy in the data bytes
226                  */
227
228                 if(data_sent_thistime) {
229                         if (data_alignment_offset != 0) {
230                                 memset((smb_buf(req->outbuf)+alignment_offset+
231                                         params_sent_thistime), 0,
232                                        data_alignment_offset);
233                         }
234                         memcpy(smb_buf(req->outbuf)+alignment_offset
235                                +params_sent_thistime+data_alignment_offset,
236                                pd,data_sent_thistime);
237                 }
238
239                 DEBUG(9,("nt_rep: params_sent_thistime = %d, data_sent_thistime = %d, useable_space = %d\n",
240                         params_sent_thistime, data_sent_thistime, useable_space));
241                 DEBUG(9,("nt_rep: params_to_send = %d, data_to_send = %d, paramsize = %d, datasize = %d\n",
242                         params_to_send, data_to_send, paramsize, datasize));
243
244                 if (NT_STATUS_V(nt_error)) {
245                         error_packet_set((char *)req->outbuf,
246                                          0, 0, nt_error,
247                                          __LINE__,__FILE__);
248                 }
249
250                 /* Send the packet */
251                 show_msg((char *)req->outbuf);
252                 if (!srv_send_smb(xconn,
253                                 (char *)req->outbuf,
254                                 true, req->seqnum+1,
255                                 IS_CONN_ENCRYPTED(conn),
256                                 &req->pcd)) {
257                         exit_server_cleanly("send_nt_replies: srv_send_smb failed.");
258                 }
259
260                 TALLOC_FREE(req->outbuf);
261
262                 pp += params_sent_thistime;
263                 pd += data_sent_thistime;
264
265                 params_to_send -= params_sent_thistime;
266                 data_to_send -= data_sent_thistime;
267
268                 /*
269                  * Sanity check
270                  */
271
272                 if(params_to_send < 0 || data_to_send < 0) {
273                         DEBUG(0,("send_nt_replies failed sanity check pts = %d, dts = %d\n!!!",
274                                 params_to_send, data_to_send));
275                         exit_server_cleanly("send_nt_replies: internal error");
276                 }
277         }
278 }
279
280 /****************************************************************************
281  Reply to an NT create and X call on a pipe
282 ****************************************************************************/
283
284 static void nt_open_pipe(char *fname, connection_struct *conn,
285                          struct smb_request *req, uint16_t *ppnum)
286 {
287         files_struct *fsp;
288         NTSTATUS status;
289
290         DEBUG(4,("nt_open_pipe: Opening pipe %s.\n", fname));
291
292         /* Strip \\ off the name if present. */
293         while (fname[0] == '\\') {
294                 fname++;
295         }
296
297         status = open_np_file(req, fname, &fsp);
298         if (!NT_STATUS_IS_OK(status)) {
299                 if (NT_STATUS_EQUAL(status, NT_STATUS_OBJECT_NAME_NOT_FOUND)) {
300                         reply_botherror(req, NT_STATUS_OBJECT_NAME_NOT_FOUND,
301                                         ERRDOS, ERRbadpipe);
302                         return;
303                 }
304                 reply_nterror(req, status);
305                 return;
306         }
307
308         *ppnum = fsp->fnum;
309         return;
310 }
311
312 /****************************************************************************
313  Reply to an NT create and X call for pipes.
314 ****************************************************************************/
315
316 static void do_ntcreate_pipe_open(connection_struct *conn,
317                                   struct smb_request *req)
318 {
319         char *fname = NULL;
320         uint16_t pnum = FNUM_FIELD_INVALID;
321         char *p = NULL;
322         uint32_t flags = IVAL(req->vwv+3, 1);
323         TALLOC_CTX *ctx = talloc_tos();
324
325         srvstr_pull_req_talloc(ctx, req, &fname, req->buf, STR_TERMINATE);
326
327         if (!fname) {
328                 reply_botherror(req, NT_STATUS_OBJECT_NAME_NOT_FOUND,
329                                 ERRDOS, ERRbadpipe);
330                 return;
331         }
332         nt_open_pipe(fname, conn, req, &pnum);
333
334         if (req->outbuf) {
335                 /* error reply */
336                 return;
337         }
338
339         /*
340          * Deal with pipe return.
341          */
342
343         if (flags & EXTENDED_RESPONSE_REQUIRED) {
344                 /* This is very strange. We
345                  * return 50 words, but only set
346                  * the wcnt to 42 ? It's definitely
347                  * what happens on the wire....
348                  */
349                 reply_outbuf(req, 50, 0);
350                 SCVAL(req->outbuf,smb_wct,42);
351         } else {
352                 reply_outbuf(req, 34, 0);
353         }
354
355         SSVAL(req->outbuf, smb_vwv0, 0xff); /* andx chain ends */
356         SSVAL(req->outbuf, smb_vwv1, 0);    /* no andx offset */
357
358         p = (char *)req->outbuf + smb_vwv2;
359         p++;
360         SSVAL(p,0,pnum);
361         p += 2;
362         SIVAL(p,0,FILE_WAS_OPENED);
363         p += 4;
364         p += 32;
365         SIVAL(p,0,FILE_ATTRIBUTE_NORMAL); /* File Attributes. */
366         p += 20;
367         /* File type. */
368         SSVAL(p,0,FILE_TYPE_MESSAGE_MODE_PIPE);
369         /* Device state. */
370         SSVAL(p,2, 0x5FF); /* ? */
371         p += 4;
372
373         if (flags & EXTENDED_RESPONSE_REQUIRED) {
374                 p += 25;
375                 SIVAL(p,0,FILE_GENERIC_ALL);
376                 /*
377                  * For pipes W2K3 seems to return
378                  * 0x12019B next.
379                  * This is ((FILE_GENERIC_READ|FILE_GENERIC_WRITE) & ~FILE_APPEND_DATA)
380                  */
381                 SIVAL(p,4,(FILE_GENERIC_READ|FILE_GENERIC_WRITE)&~FILE_APPEND_DATA);
382         }
383
384         DEBUG(5,("do_ntcreate_pipe_open: open pipe = %s\n", fname));
385 }
386
387 struct case_semantics_state {
388         connection_struct *conn;
389         bool case_sensitive;
390         bool case_preserve;
391         bool short_case_preserve;
392 };
393
394 /****************************************************************************
395  Restore case semantics.
396 ****************************************************************************/
397
398 static int restore_case_semantics(struct case_semantics_state *state)
399 {
400         state->conn->case_sensitive = state->case_sensitive;
401         state->conn->case_preserve = state->case_preserve;
402         state->conn->short_case_preserve = state->short_case_preserve;
403         return 0;
404 }
405
406 /****************************************************************************
407  Save case semantics.
408 ****************************************************************************/
409
410 static struct case_semantics_state *set_posix_case_semantics(TALLOC_CTX *mem_ctx,
411                                                 connection_struct *conn)
412 {
413         struct case_semantics_state *result;
414
415         if (!(result = talloc(mem_ctx, struct case_semantics_state))) {
416                 return NULL;
417         }
418
419         result->conn = conn;
420         result->case_sensitive = conn->case_sensitive;
421         result->case_preserve = conn->case_preserve;
422         result->short_case_preserve = conn->short_case_preserve;
423
424         /* Set to POSIX. */
425         conn->case_sensitive = True;
426         conn->case_preserve = True;
427         conn->short_case_preserve = True;
428
429         talloc_set_destructor(result, restore_case_semantics);
430
431         return result;
432 }
433
434 /****************************************************************************
435  Reply to an NT create and X call.
436 ****************************************************************************/
437
438 void reply_ntcreate_and_X(struct smb_request *req)
439 {
440         connection_struct *conn = req->conn;
441         struct smb_filename *smb_fname = NULL;
442         char *fname = NULL;
443         uint32_t flags;
444         uint32_t access_mask;
445         uint32_t file_attributes;
446         uint32_t share_access;
447         uint32_t create_disposition;
448         uint32_t create_options;
449         uint16_t root_dir_fid;
450         uint64_t allocation_size;
451         /* Breakout the oplock request bits so we can set the
452            reply bits separately. */
453         uint32_t fattr=0;
454         off_t file_len = 0;
455         int info = 0;
456         files_struct *fsp = NULL;
457         char *p = NULL;
458         struct timespec create_timespec;
459         struct timespec c_timespec;
460         struct timespec a_timespec;
461         struct timespec m_timespec;
462         NTSTATUS status;
463         int oplock_request;
464         uint8_t oplock_granted = NO_OPLOCK_RETURN;
465         struct case_semantics_state *case_state = NULL;
466         uint32_t ucf_flags;
467         TALLOC_CTX *ctx = talloc_tos();
468
469         START_PROFILE(SMBntcreateX);
470
471         if (req->wct < 24) {
472                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
473                 goto out;
474         }
475
476         flags = IVAL(req->vwv+3, 1);
477         access_mask = IVAL(req->vwv+7, 1);
478         file_attributes = IVAL(req->vwv+13, 1);
479         share_access = IVAL(req->vwv+15, 1);
480         create_disposition = IVAL(req->vwv+17, 1);
481         create_options = IVAL(req->vwv+19, 1);
482         root_dir_fid = (uint16_t)IVAL(req->vwv+5, 1);
483
484         allocation_size = BVAL(req->vwv+9, 1);
485
486         srvstr_get_path_req(ctx, req, &fname, (const char *)req->buf,
487                             STR_TERMINATE, &status);
488
489         if (!NT_STATUS_IS_OK(status)) {
490                 reply_nterror(req, status);
491                 goto out;
492         }
493
494         DEBUG(10,("reply_ntcreate_and_X: flags = 0x%x, access_mask = 0x%x "
495                   "file_attributes = 0x%x, share_access = 0x%x, "
496                   "create_disposition = 0x%x create_options = 0x%x "
497                   "root_dir_fid = 0x%x, fname = %s\n",
498                         (unsigned int)flags,
499                         (unsigned int)access_mask,
500                         (unsigned int)file_attributes,
501                         (unsigned int)share_access,
502                         (unsigned int)create_disposition,
503                         (unsigned int)create_options,
504                         (unsigned int)root_dir_fid,
505                         fname));
506
507         /*
508          * we need to remove ignored bits when they come directly from the client
509          * because we reuse some of them for internal stuff
510          */
511         create_options &= ~NTCREATEX_OPTIONS_MUST_IGNORE_MASK;
512
513         /*
514          * If it's an IPC, use the pipe handler.
515          */
516
517         if (IS_IPC(conn)) {
518                 if (lp_nt_pipe_support()) {
519                         do_ntcreate_pipe_open(conn, req);
520                         goto out;
521                 }
522                 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
523                 goto out;
524         }
525
526         oplock_request = (flags & REQUEST_OPLOCK) ? EXCLUSIVE_OPLOCK : 0;
527         if (oplock_request) {
528                 oplock_request |= (flags & REQUEST_BATCH_OPLOCK)
529                         ? BATCH_OPLOCK : 0;
530         }
531
532         if (file_attributes & FILE_FLAG_POSIX_SEMANTICS) {
533                 case_state = set_posix_case_semantics(ctx, conn);
534                 if (!case_state) {
535                         reply_nterror(req, NT_STATUS_NO_MEMORY);
536                         goto out;
537                 }
538         }
539
540         ucf_flags = filename_create_ucf_flags(req, create_disposition);
541         status = filename_convert(ctx,
542                                 conn,
543                                 fname,
544                                 ucf_flags,
545                                 NULL,
546                                 NULL,
547                                 &smb_fname);
548
549         TALLOC_FREE(case_state);
550
551         if (!NT_STATUS_IS_OK(status)) {
552                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
553                         reply_botherror(req,
554                                 NT_STATUS_PATH_NOT_COVERED,
555                                 ERRSRV, ERRbadpath);
556                         goto out;
557                 }
558                 reply_nterror(req, status);
559                 goto out;
560         }
561
562         /*
563          * Bug #6898 - clients using Windows opens should
564          * never be able to set this attribute into the
565          * VFS.
566          */
567         file_attributes &= ~FILE_FLAG_POSIX_SEMANTICS;
568
569         status = SMB_VFS_CREATE_FILE(
570                 conn,                                   /* conn */
571                 req,                                    /* req */
572                 root_dir_fid,                           /* root_dir_fid */
573                 smb_fname,                              /* fname */
574                 access_mask,                            /* access_mask */
575                 share_access,                           /* share_access */
576                 create_disposition,                     /* create_disposition*/
577                 create_options,                         /* create_options */
578                 file_attributes,                        /* file_attributes */
579                 oplock_request,                         /* oplock_request */
580                 NULL,                                   /* lease */
581                 allocation_size,                        /* allocation_size */
582                 0,                                      /* private_flags */
583                 NULL,                                   /* sd */
584                 NULL,                                   /* ea_list */
585                 &fsp,                                   /* result */
586                 &info,                                  /* pinfo */
587                 NULL, NULL);                            /* create context */
588
589         if (!NT_STATUS_IS_OK(status)) {
590                 if (open_was_deferred(req->xconn, req->mid)) {
591                         /* We have re-scheduled this call, no error. */
592                         goto out;
593                 }
594                 reply_openerror(req, status);
595                 goto out;
596         }
597
598         /* Ensure we're pointing at the correct stat struct. */
599         TALLOC_FREE(smb_fname);
600         smb_fname = fsp->fsp_name;
601
602         /*
603          * If the caller set the extended oplock request bit
604          * and we granted one (by whatever means) - set the
605          * correct bit for extended oplock reply.
606          */
607
608         if (oplock_request &&
609             (lp_fake_oplocks(SNUM(conn))
610              || EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type))) {
611
612                 /*
613                  * Exclusive oplock granted
614                  */
615
616                 if (flags & REQUEST_BATCH_OPLOCK) {
617                         oplock_granted = BATCH_OPLOCK_RETURN;
618                 } else {
619                         oplock_granted = EXCLUSIVE_OPLOCK_RETURN;
620                 }
621         } else if (fsp->oplock_type == LEVEL_II_OPLOCK) {
622                 oplock_granted = LEVEL_II_OPLOCK_RETURN;
623         } else {
624                 oplock_granted = NO_OPLOCK_RETURN;
625         }
626
627         file_len = smb_fname->st.st_ex_size;
628
629         if (flags & EXTENDED_RESPONSE_REQUIRED) {
630                 /* This is very strange. We
631                  * return 50 words, but only set
632                  * the wcnt to 42 ? It's definitely
633                  * what happens on the wire....
634                  */
635                 reply_outbuf(req, 50, 0);
636                 SCVAL(req->outbuf,smb_wct,42);
637         } else {
638                 reply_outbuf(req, 34, 0);
639         }
640
641         SSVAL(req->outbuf, smb_vwv0, 0xff); /* andx chain ends */
642         SSVAL(req->outbuf, smb_vwv1, 0);    /* no andx offset */
643
644         p = (char *)req->outbuf + smb_vwv2;
645
646         SCVAL(p, 0, oplock_granted);
647
648         p++;
649         SSVAL(p,0,fsp->fnum);
650         p += 2;
651         if ((create_disposition == FILE_SUPERSEDE)
652             && (info == FILE_WAS_OVERWRITTEN)) {
653                 SIVAL(p,0,FILE_WAS_SUPERSEDED);
654         } else {
655                 SIVAL(p,0,info);
656         }
657         p += 4;
658
659         fattr = dos_mode(conn, smb_fname);
660         if (fattr == 0) {
661                 fattr = FILE_ATTRIBUTE_NORMAL;
662         }
663
664         /* Create time. */
665         create_timespec = get_create_timespec(conn, fsp, smb_fname);
666         a_timespec = smb_fname->st.st_ex_atime;
667         m_timespec = smb_fname->st.st_ex_mtime;
668         c_timespec = get_change_timespec(conn, fsp, smb_fname);
669
670         if (lp_dos_filetime_resolution(SNUM(conn))) {
671                 dos_filetime_timespec(&create_timespec);
672                 dos_filetime_timespec(&a_timespec);
673                 dos_filetime_timespec(&m_timespec);
674                 dos_filetime_timespec(&c_timespec);
675         }
676
677         put_long_date_timespec(conn->ts_res, p, create_timespec); /* create time. */
678         p += 8;
679         put_long_date_timespec(conn->ts_res, p, a_timespec); /* access time */
680         p += 8;
681         put_long_date_timespec(conn->ts_res, p, m_timespec); /* write time */
682         p += 8;
683         put_long_date_timespec(conn->ts_res, p, c_timespec); /* change time */
684         p += 8;
685         SIVAL(p,0,fattr); /* File Attributes. */
686         p += 4;
687         SOFF_T(p, 0, SMB_VFS_GET_ALLOC_SIZE(conn,fsp,&smb_fname->st));
688         p += 8;
689         SOFF_T(p,0,file_len);
690         p += 8;
691         if (flags & EXTENDED_RESPONSE_REQUIRED) {
692                 uint16_t file_status = (NO_EAS|NO_SUBSTREAMS|NO_REPARSETAG);
693                 unsigned int num_streams = 0;
694                 struct stream_struct *streams = NULL;
695
696                 if (lp_ea_support(SNUM(conn))) {
697                         size_t num_names = 0;
698                         /* Do we have any EA's ? */
699                         status = get_ea_names_from_file(
700                             ctx, conn, fsp, smb_fname, NULL, &num_names);
701                         if (NT_STATUS_IS_OK(status) && num_names) {
702                                 file_status &= ~NO_EAS;
703                         }
704                 }
705
706                 status = vfs_streaminfo(conn, NULL, smb_fname, ctx,
707                         &num_streams, &streams);
708                 /* There is always one stream, ::$DATA. */
709                 if (NT_STATUS_IS_OK(status) && num_streams > 1) {
710                         file_status &= ~NO_SUBSTREAMS;
711                 }
712                 TALLOC_FREE(streams);
713                 SSVAL(p,2,file_status);
714         }
715         p += 4;
716         SCVAL(p,0,fsp->is_directory ? 1 : 0);
717
718         if (flags & EXTENDED_RESPONSE_REQUIRED) {
719                 uint32_t perms = 0;
720                 p += 25;
721                 if (fsp->is_directory ||
722                     fsp->can_write ||
723                     can_write_to_file(conn, smb_fname)) {
724                         perms = FILE_GENERIC_ALL;
725                 } else {
726                         perms = FILE_GENERIC_READ|FILE_EXECUTE;
727                 }
728                 SIVAL(p,0,perms);
729         }
730
731         DEBUG(5,("reply_ntcreate_and_X: %s, open name = %s\n",
732                 fsp_fnum_dbg(fsp), smb_fname_str_dbg(smb_fname)));
733
734  out:
735         END_PROFILE(SMBntcreateX);
736         return;
737 }
738
739 /****************************************************************************
740  Reply to a NT_TRANSACT_CREATE call to open a pipe.
741 ****************************************************************************/
742
743 static void do_nt_transact_create_pipe(connection_struct *conn,
744                                        struct smb_request *req,
745                                        uint16_t **ppsetup, uint32_t setup_count,
746                                        char **ppparams, uint32_t parameter_count,
747                                        char **ppdata, uint32_t data_count)
748 {
749         char *fname = NULL;
750         char *params = *ppparams;
751         uint16_t pnum = FNUM_FIELD_INVALID;
752         char *p = NULL;
753         NTSTATUS status;
754         size_t param_len;
755         uint32_t flags;
756         TALLOC_CTX *ctx = talloc_tos();
757
758         /*
759          * Ensure minimum number of parameters sent.
760          */
761
762         if(parameter_count < 54) {
763                 DEBUG(0,("do_nt_transact_create_pipe - insufficient parameters (%u)\n", (unsigned int)parameter_count));
764                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
765                 return;
766         }
767
768         flags = IVAL(params,0);
769
770         if (req->posix_pathnames) {
771                 srvstr_get_path_posix(ctx,
772                         params,
773                         req->flags2,
774                         &fname,
775                         params+53,
776                         parameter_count-53,
777                         STR_TERMINATE,
778                         &status);
779         } else {
780                 srvstr_get_path(ctx,
781                         params,
782                         req->flags2,
783                         &fname,
784                         params+53,
785                         parameter_count-53,
786                         STR_TERMINATE,
787                         &status);
788         }
789         if (!NT_STATUS_IS_OK(status)) {
790                 reply_nterror(req, status);
791                 return;
792         }
793
794         nt_open_pipe(fname, conn, req, &pnum);
795
796         if (req->outbuf) {
797                 /* Error return */
798                 return;
799         }
800
801         /* Realloc the size of parameters and data we will return */
802         if (flags & EXTENDED_RESPONSE_REQUIRED) {
803                 /* Extended response is 32 more byyes. */
804                 param_len = 101;
805         } else {
806                 param_len = 69;
807         }
808         params = nttrans_realloc(ppparams, param_len);
809         if(params == NULL) {
810                 reply_nterror(req, NT_STATUS_NO_MEMORY);
811                 return;
812         }
813
814         p = params;
815         SCVAL(p,0,NO_OPLOCK_RETURN);
816
817         p += 2;
818         SSVAL(p,0,pnum);
819         p += 2;
820         SIVAL(p,0,FILE_WAS_OPENED);
821         p += 8;
822
823         p += 32;
824         SIVAL(p,0,FILE_ATTRIBUTE_NORMAL); /* File Attributes. */
825         p += 20;
826         /* File type. */
827         SSVAL(p,0,FILE_TYPE_MESSAGE_MODE_PIPE);
828         /* Device state. */
829         SSVAL(p,2, 0x5FF); /* ? */
830         p += 4;
831
832         if (flags & EXTENDED_RESPONSE_REQUIRED) {
833                 p += 25;
834                 SIVAL(p,0,FILE_GENERIC_ALL);
835                 /*
836                  * For pipes W2K3 seems to return
837                  * 0x12019B next.
838                  * This is ((FILE_GENERIC_READ|FILE_GENERIC_WRITE) & ~FILE_APPEND_DATA)
839                  */
840                 SIVAL(p,4,(FILE_GENERIC_READ|FILE_GENERIC_WRITE)&~FILE_APPEND_DATA);
841         }
842
843         DEBUG(5,("do_nt_transact_create_pipe: open name = %s\n", fname));
844
845         /* Send the required number of replies */
846         send_nt_replies(conn, req, NT_STATUS_OK, params, param_len, *ppdata, 0);
847
848         return;
849 }
850
851 /*********************************************************************
852  Windows seems to do canonicalization of inheritance bits. Do the
853  same.
854 *********************************************************************/
855
856 static void canonicalize_inheritance_bits(struct security_descriptor *psd)
857 {
858         bool set_auto_inherited = false;
859
860         /*
861          * We need to filter out the
862          * SEC_DESC_DACL_AUTO_INHERITED|SEC_DESC_DACL_AUTO_INHERIT_REQ
863          * bits. If both are set we store SEC_DESC_DACL_AUTO_INHERITED
864          * as this alters whether SEC_ACE_FLAG_INHERITED_ACE is set
865          * when an ACE is inherited. Otherwise we zero these bits out.
866          * See:
867          *
868          * http://social.msdn.microsoft.com/Forums/eu/os_fileservices/thread/11f77b68-731e-407d-b1b3-064750716531
869          *
870          * for details.
871          */
872
873         if ((psd->type & (SEC_DESC_DACL_AUTO_INHERITED|SEC_DESC_DACL_AUTO_INHERIT_REQ))
874                         == (SEC_DESC_DACL_AUTO_INHERITED|SEC_DESC_DACL_AUTO_INHERIT_REQ)) {
875                 set_auto_inherited = true;
876         }
877
878         psd->type &= ~(SEC_DESC_DACL_AUTO_INHERITED|SEC_DESC_DACL_AUTO_INHERIT_REQ);
879         if (set_auto_inherited) {
880                 psd->type |= SEC_DESC_DACL_AUTO_INHERITED;
881         }
882 }
883
884 /****************************************************************************
885  Internal fn to set security descriptors.
886 ****************************************************************************/
887
888 NTSTATUS set_sd(files_struct *fsp, struct security_descriptor *psd,
889                        uint32_t security_info_sent)
890 {
891         NTSTATUS status;
892
893         if (!CAN_WRITE(fsp->conn)) {
894                 return NT_STATUS_ACCESS_DENIED;
895         }
896
897         if (!lp_nt_acl_support(SNUM(fsp->conn))) {
898                 return NT_STATUS_OK;
899         }
900
901         if (S_ISLNK(fsp->fsp_name->st.st_ex_mode)) {
902                 DEBUG(10, ("ACL set on symlink %s denied.\n",
903                         fsp_str_dbg(fsp)));
904                 return NT_STATUS_ACCESS_DENIED;
905         }
906
907         if (psd->owner_sid == NULL) {
908                 security_info_sent &= ~SECINFO_OWNER;
909         }
910         if (psd->group_sid == NULL) {
911                 security_info_sent &= ~SECINFO_GROUP;
912         }
913
914         /* Ensure we have at least one thing set. */
915         if ((security_info_sent & (SECINFO_OWNER|SECINFO_GROUP|SECINFO_DACL|SECINFO_SACL)) == 0) {
916                 /* Just like W2K3 */
917                 return NT_STATUS_OK;
918         }
919
920         /* Ensure we have the rights to do this. */
921         if (security_info_sent & SECINFO_OWNER) {
922                 if (!(fsp->access_mask & SEC_STD_WRITE_OWNER)) {
923                         return NT_STATUS_ACCESS_DENIED;
924                 }
925         }
926
927         if (security_info_sent & SECINFO_GROUP) {
928                 if (!(fsp->access_mask & SEC_STD_WRITE_OWNER)) {
929                         return NT_STATUS_ACCESS_DENIED;
930                 }
931         }
932
933         if (security_info_sent & SECINFO_DACL) {
934                 if (!(fsp->access_mask & SEC_STD_WRITE_DAC)) {
935                         return NT_STATUS_ACCESS_DENIED;
936                 }
937                 /* Convert all the generic bits. */
938                 if (psd->dacl) {
939                         security_acl_map_generic(psd->dacl, &file_generic_mapping);
940                 }
941         }
942
943         if (security_info_sent & SECINFO_SACL) {
944                 if (!(fsp->access_mask & SEC_FLAG_SYSTEM_SECURITY)) {
945                         return NT_STATUS_ACCESS_DENIED;
946                 }
947                 /* Convert all the generic bits. */
948                 if (psd->sacl) {
949                         security_acl_map_generic(psd->sacl, &file_generic_mapping);
950                 }
951         }
952
953         canonicalize_inheritance_bits(psd);
954
955         if (DEBUGLEVEL >= 10) {
956                 DEBUG(10,("set_sd for file %s\n", fsp_str_dbg(fsp)));
957                 NDR_PRINT_DEBUG(security_descriptor, psd);
958         }
959
960         status = SMB_VFS_FSET_NT_ACL(fsp, security_info_sent, psd);
961
962         TALLOC_FREE(psd);
963
964         return status;
965 }
966
967 /****************************************************************************
968  Internal fn to set security descriptors from a data blob.
969 ****************************************************************************/
970
971 NTSTATUS set_sd_blob(files_struct *fsp, uint8_t *data, uint32_t sd_len,
972                        uint32_t security_info_sent)
973 {
974         struct security_descriptor *psd = NULL;
975         NTSTATUS status;
976
977         if (sd_len == 0) {
978                 return NT_STATUS_INVALID_PARAMETER;
979         }
980
981         status = unmarshall_sec_desc(talloc_tos(), data, sd_len, &psd);
982
983         if (!NT_STATUS_IS_OK(status)) {
984                 return status;
985         }
986
987         return set_sd(fsp, psd, security_info_sent);
988 }
989
990 /****************************************************************************
991  Reply to a NT_TRANSACT_CREATE call (needs to process SD's).
992 ****************************************************************************/
993
994 static void call_nt_transact_create(connection_struct *conn,
995                                     struct smb_request *req,
996                                     uint16_t **ppsetup, uint32_t setup_count,
997                                     char **ppparams, uint32_t parameter_count,
998                                     char **ppdata, uint32_t data_count,
999                                     uint32_t max_data_count)
1000 {
1001         struct smb_filename *smb_fname = NULL;
1002         char *fname = NULL;
1003         char *params = *ppparams;
1004         char *data = *ppdata;
1005         /* Breakout the oplock request bits so we can set the reply bits separately. */
1006         uint32_t fattr=0;
1007         off_t file_len = 0;
1008         int info = 0;
1009         files_struct *fsp = NULL;
1010         char *p = NULL;
1011         uint32_t flags;
1012         uint32_t access_mask;
1013         uint32_t file_attributes;
1014         uint32_t share_access;
1015         uint32_t create_disposition;
1016         uint32_t create_options;
1017         uint32_t sd_len;
1018         struct security_descriptor *sd = NULL;
1019         uint32_t ea_len;
1020         uint16_t root_dir_fid;
1021         struct timespec create_timespec;
1022         struct timespec c_timespec;
1023         struct timespec a_timespec;
1024         struct timespec m_timespec;
1025         struct ea_list *ea_list = NULL;
1026         NTSTATUS status;
1027         size_t param_len;
1028         uint64_t allocation_size;
1029         int oplock_request;
1030         uint8_t oplock_granted;
1031         struct case_semantics_state *case_state = NULL;
1032         uint32_t ucf_flags;
1033         TALLOC_CTX *ctx = talloc_tos();
1034
1035         DEBUG(5,("call_nt_transact_create\n"));
1036
1037         /*
1038          * If it's an IPC, use the pipe handler.
1039          */
1040
1041         if (IS_IPC(conn)) {
1042                 if (lp_nt_pipe_support()) {
1043                         do_nt_transact_create_pipe(
1044                                 conn, req,
1045                                 ppsetup, setup_count,
1046                                 ppparams, parameter_count,
1047                                 ppdata, data_count);
1048                         goto out;
1049                 }
1050                 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
1051                 goto out;
1052         }
1053
1054         /*
1055          * Ensure minimum number of parameters sent.
1056          */
1057
1058         if(parameter_count < 54) {
1059                 DEBUG(0,("call_nt_transact_create - insufficient parameters (%u)\n", (unsigned int)parameter_count));
1060                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1061                 goto out;
1062         }
1063
1064         flags = IVAL(params,0);
1065         access_mask = IVAL(params,8);
1066         file_attributes = IVAL(params,20);
1067         share_access = IVAL(params,24);
1068         create_disposition = IVAL(params,28);
1069         create_options = IVAL(params,32);
1070         sd_len = IVAL(params,36);
1071         ea_len = IVAL(params,40);
1072         root_dir_fid = (uint16_t)IVAL(params,4);
1073         allocation_size = BVAL(params,12);
1074
1075         /*
1076          * we need to remove ignored bits when they come directly from the client
1077          * because we reuse some of them for internal stuff
1078          */
1079         create_options &= ~NTCREATEX_OPTIONS_MUST_IGNORE_MASK;
1080
1081         if (req->posix_pathnames) {
1082                 srvstr_get_path_posix(ctx,
1083                         params,
1084                         req->flags2,
1085                         &fname,
1086                         params+53,
1087                         parameter_count-53,
1088                         STR_TERMINATE,
1089                         &status);
1090         } else {
1091                 srvstr_get_path(ctx,
1092                         params,
1093                         req->flags2,
1094                         &fname,
1095                         params+53,
1096                         parameter_count-53,
1097                         STR_TERMINATE,
1098                         &status);
1099         }
1100         if (!NT_STATUS_IS_OK(status)) {
1101                 reply_nterror(req, status);
1102                 goto out;
1103         }
1104
1105         if (file_attributes & FILE_FLAG_POSIX_SEMANTICS) {
1106                 case_state = set_posix_case_semantics(ctx, conn);
1107                 if (!case_state) {
1108                         reply_nterror(req, NT_STATUS_NO_MEMORY);
1109                         goto out;
1110                 }
1111         }
1112
1113         ucf_flags = filename_create_ucf_flags(req, create_disposition);
1114         status = filename_convert(ctx,
1115                                 conn,
1116                                 fname,
1117                                 ucf_flags,
1118                                 NULL,
1119                                 NULL,
1120                                 &smb_fname);
1121
1122         TALLOC_FREE(case_state);
1123
1124         if (!NT_STATUS_IS_OK(status)) {
1125                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
1126                         reply_botherror(req,
1127                                 NT_STATUS_PATH_NOT_COVERED,
1128                                 ERRSRV, ERRbadpath);
1129                         goto out;
1130                 }
1131                 reply_nterror(req, status);
1132                 goto out;
1133         }
1134
1135         /* Ensure the data_len is correct for the sd and ea values given. */
1136         if ((ea_len + sd_len > data_count)
1137             || (ea_len > data_count) || (sd_len > data_count)
1138             || (ea_len + sd_len < ea_len) || (ea_len + sd_len < sd_len)) {
1139                 DEBUG(10, ("call_nt_transact_create - ea_len = %u, sd_len = "
1140                            "%u, data_count = %u\n", (unsigned int)ea_len,
1141                            (unsigned int)sd_len, (unsigned int)data_count));
1142                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1143                 goto out;
1144         }
1145
1146         if (sd_len) {
1147                 DEBUG(10, ("call_nt_transact_create - sd_len = %d\n",
1148                            sd_len));
1149
1150                 status = unmarshall_sec_desc(ctx, (uint8_t *)data, sd_len,
1151                                              &sd);
1152                 if (!NT_STATUS_IS_OK(status)) {
1153                         DEBUG(10, ("call_nt_transact_create: "
1154                                    "unmarshall_sec_desc failed: %s\n",
1155                                    nt_errstr(status)));
1156                         reply_nterror(req, status);
1157                         goto out;
1158                 }
1159         }
1160
1161         if (ea_len) {
1162                 if (!lp_ea_support(SNUM(conn))) {
1163                         DEBUG(10, ("call_nt_transact_create - ea_len = %u but "
1164                                    "EA's not supported.\n",
1165                                    (unsigned int)ea_len));
1166                         reply_nterror(req, NT_STATUS_EAS_NOT_SUPPORTED);
1167                         goto out;
1168                 }
1169
1170                 if (ea_len < 10) {
1171                         DEBUG(10,("call_nt_transact_create - ea_len = %u - "
1172                                   "too small (should be more than 10)\n",
1173                                   (unsigned int)ea_len ));
1174                         reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1175                         goto out;
1176                 }
1177
1178                 /* We have already checked that ea_len <= data_count here. */
1179                 ea_list = read_nttrans_ea_list(talloc_tos(), data + sd_len,
1180                                                ea_len);
1181                 if (ea_list == NULL) {
1182                         reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1183                         goto out;
1184                 }
1185
1186                 if (!req->posix_pathnames &&
1187                                 ea_list_has_invalid_name(ea_list)) {
1188                         /* Realloc the size of parameters and data we will return */
1189                         if (flags & EXTENDED_RESPONSE_REQUIRED) {
1190                                 /* Extended response is 32 more byyes. */
1191                                 param_len = 101;
1192                         } else {
1193                                 param_len = 69;
1194                         }
1195                         params = nttrans_realloc(ppparams, param_len);
1196                         if(params == NULL) {
1197                                 reply_nterror(req, NT_STATUS_NO_MEMORY);
1198                                 goto out;
1199                         }
1200
1201                         memset(params, '\0', param_len);
1202                         send_nt_replies(conn, req, STATUS_INVALID_EA_NAME,
1203                                 params, param_len, NULL, 0);
1204                         goto out;
1205                 }
1206         }
1207
1208         oplock_request = (flags & REQUEST_OPLOCK) ? EXCLUSIVE_OPLOCK : 0;
1209         if (oplock_request) {
1210                 oplock_request |= (flags & REQUEST_BATCH_OPLOCK)
1211                         ? BATCH_OPLOCK : 0;
1212         }
1213
1214         /*
1215          * Bug #6898 - clients using Windows opens should
1216          * never be able to set this attribute into the
1217          * VFS.
1218          */
1219         file_attributes &= ~FILE_FLAG_POSIX_SEMANTICS;
1220
1221         status = SMB_VFS_CREATE_FILE(
1222                 conn,                                   /* conn */
1223                 req,                                    /* req */
1224                 root_dir_fid,                           /* root_dir_fid */
1225                 smb_fname,                              /* fname */
1226                 access_mask,                            /* access_mask */
1227                 share_access,                           /* share_access */
1228                 create_disposition,                     /* create_disposition*/
1229                 create_options,                         /* create_options */
1230                 file_attributes,                        /* file_attributes */
1231                 oplock_request,                         /* oplock_request */
1232                 NULL,                                   /* lease */
1233                 allocation_size,                        /* allocation_size */
1234                 0,                                      /* private_flags */
1235                 sd,                                     /* sd */
1236                 ea_list,                                /* ea_list */
1237                 &fsp,                                   /* result */
1238                 &info,                                  /* pinfo */
1239                 NULL, NULL);                            /* create context */
1240
1241         if(!NT_STATUS_IS_OK(status)) {
1242                 if (open_was_deferred(req->xconn, req->mid)) {
1243                         /* We have re-scheduled this call, no error. */
1244                         return;
1245                 }
1246                 reply_openerror(req, status);
1247                 goto out;
1248         }
1249
1250         /* Ensure we're pointing at the correct stat struct. */
1251         TALLOC_FREE(smb_fname);
1252         smb_fname = fsp->fsp_name;
1253
1254         /*
1255          * If the caller set the extended oplock request bit
1256          * and we granted one (by whatever means) - set the
1257          * correct bit for extended oplock reply.
1258          */
1259
1260         if (oplock_request &&
1261             (lp_fake_oplocks(SNUM(conn))
1262              || EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type))) {
1263
1264                 /*
1265                  * Exclusive oplock granted
1266                  */
1267
1268                 if (flags & REQUEST_BATCH_OPLOCK) {
1269                         oplock_granted = BATCH_OPLOCK_RETURN;
1270                 } else {
1271                         oplock_granted = EXCLUSIVE_OPLOCK_RETURN;
1272                 }
1273         } else if (fsp->oplock_type == LEVEL_II_OPLOCK) {
1274                 oplock_granted = LEVEL_II_OPLOCK_RETURN;
1275         } else {
1276                 oplock_granted = NO_OPLOCK_RETURN;
1277         }
1278
1279         file_len = smb_fname->st.st_ex_size;
1280
1281         /* Realloc the size of parameters and data we will return */
1282         if (flags & EXTENDED_RESPONSE_REQUIRED) {
1283                 /* Extended response is 32 more byyes. */
1284                 param_len = 101;
1285         } else {
1286                 param_len = 69;
1287         }
1288         params = nttrans_realloc(ppparams, param_len);
1289         if(params == NULL) {
1290                 reply_nterror(req, NT_STATUS_NO_MEMORY);
1291                 goto out;
1292         }
1293
1294         p = params;
1295         SCVAL(p, 0, oplock_granted);
1296
1297         p += 2;
1298         SSVAL(p,0,fsp->fnum);
1299         p += 2;
1300         if ((create_disposition == FILE_SUPERSEDE)
1301             && (info == FILE_WAS_OVERWRITTEN)) {
1302                 SIVAL(p,0,FILE_WAS_SUPERSEDED);
1303         } else {
1304                 SIVAL(p,0,info);
1305         }
1306         p += 8;
1307
1308         fattr = dos_mode(conn, smb_fname);
1309         if (fattr == 0) {
1310                 fattr = FILE_ATTRIBUTE_NORMAL;
1311         }
1312
1313         /* Create time. */
1314         create_timespec = get_create_timespec(conn, fsp, smb_fname);
1315         a_timespec = smb_fname->st.st_ex_atime;
1316         m_timespec = smb_fname->st.st_ex_mtime;
1317         c_timespec = get_change_timespec(conn, fsp, smb_fname);
1318
1319         if (lp_dos_filetime_resolution(SNUM(conn))) {
1320                 dos_filetime_timespec(&create_timespec);
1321                 dos_filetime_timespec(&a_timespec);
1322                 dos_filetime_timespec(&m_timespec);
1323                 dos_filetime_timespec(&c_timespec);
1324         }
1325
1326         put_long_date_timespec(conn->ts_res, p, create_timespec); /* create time. */
1327         p += 8;
1328         put_long_date_timespec(conn->ts_res, p, a_timespec); /* access time */
1329         p += 8;
1330         put_long_date_timespec(conn->ts_res, p, m_timespec); /* write time */
1331         p += 8;
1332         put_long_date_timespec(conn->ts_res, p, c_timespec); /* change time */
1333         p += 8;
1334         SIVAL(p,0,fattr); /* File Attributes. */
1335         p += 4;
1336         SOFF_T(p, 0, SMB_VFS_GET_ALLOC_SIZE(conn, fsp, &smb_fname->st));
1337         p += 8;
1338         SOFF_T(p,0,file_len);
1339         p += 8;
1340         if (flags & EXTENDED_RESPONSE_REQUIRED) {
1341                 uint16_t file_status = (NO_EAS|NO_SUBSTREAMS|NO_REPARSETAG);
1342                 unsigned int num_streams = 0;
1343                 struct stream_struct *streams = NULL;
1344
1345                 if (lp_ea_support(SNUM(conn))) {
1346                         size_t num_names = 0;
1347                         /* Do we have any EA's ? */
1348                         status = get_ea_names_from_file(
1349                             ctx, conn, fsp, smb_fname, NULL, &num_names);
1350                         if (NT_STATUS_IS_OK(status) && num_names) {
1351                                 file_status &= ~NO_EAS;
1352                         }
1353                 }
1354
1355                 status = vfs_streaminfo(conn, NULL, smb_fname, ctx,
1356                         &num_streams, &streams);
1357                 /* There is always one stream, ::$DATA. */
1358                 if (NT_STATUS_IS_OK(status) && num_streams > 1) {
1359                         file_status &= ~NO_SUBSTREAMS;
1360                 }
1361                 TALLOC_FREE(streams);
1362                 SSVAL(p,2,file_status);
1363         }
1364         p += 4;
1365         SCVAL(p,0,fsp->is_directory ? 1 : 0);
1366
1367         if (flags & EXTENDED_RESPONSE_REQUIRED) {
1368                 uint32_t perms = 0;
1369                 p += 25;
1370                 if (fsp->is_directory ||
1371                     fsp->can_write ||
1372                     can_write_to_file(conn, smb_fname)) {
1373                         perms = FILE_GENERIC_ALL;
1374                 } else {
1375                         perms = FILE_GENERIC_READ|FILE_EXECUTE;
1376                 }
1377                 SIVAL(p,0,perms);
1378         }
1379
1380         DEBUG(5,("call_nt_transact_create: open name = %s\n",
1381                  smb_fname_str_dbg(smb_fname)));
1382
1383         /* Send the required number of replies */
1384         send_nt_replies(conn, req, NT_STATUS_OK, params, param_len, *ppdata, 0);
1385  out:
1386         return;
1387 }
1388
1389 /****************************************************************************
1390  Reply to a NT CANCEL request.
1391  conn POINTER CAN BE NULL HERE !
1392 ****************************************************************************/
1393
1394 void reply_ntcancel(struct smb_request *req)
1395 {
1396         struct smbXsrv_connection *xconn = req->xconn;
1397         struct smbd_server_connection *sconn = req->sconn;
1398
1399         /*
1400          * Go through and cancel any pending change notifies.
1401          */
1402
1403         START_PROFILE(SMBntcancel);
1404         srv_cancel_sign_response(xconn);
1405         remove_pending_change_notify_requests_by_mid(sconn, req->mid);
1406         remove_pending_lock_requests_by_mid_smb1(sconn, req->mid);
1407
1408         DEBUG(3,("reply_ntcancel: cancel called on mid = %llu.\n",
1409                 (unsigned long long)req->mid));
1410
1411         END_PROFILE(SMBntcancel);
1412         return;
1413 }
1414
1415 /****************************************************************************
1416  Copy a file.
1417 ****************************************************************************/
1418
1419 static NTSTATUS copy_internals(TALLOC_CTX *ctx,
1420                                 connection_struct *conn,
1421                                 struct smb_request *req,
1422                                 struct smb_filename *smb_fname_src,
1423                                 struct smb_filename *smb_fname_dst,
1424                                 uint32_t attrs)
1425 {
1426         files_struct *fsp1,*fsp2;
1427         uint32_t fattr;
1428         int info;
1429         off_t ret=-1;
1430         NTSTATUS status = NT_STATUS_OK;
1431         char *parent;
1432
1433         if (!CAN_WRITE(conn)) {
1434                 status = NT_STATUS_MEDIA_WRITE_PROTECTED;
1435                 goto out;
1436         }
1437
1438         /* Source must already exist. */
1439         if (!VALID_STAT(smb_fname_src->st)) {
1440                 status = NT_STATUS_OBJECT_NAME_NOT_FOUND;
1441                 goto out;
1442         }
1443
1444         /* Ensure attributes match. */
1445         fattr = dos_mode(conn, smb_fname_src);
1446         if ((fattr & ~attrs) & (FILE_ATTRIBUTE_HIDDEN | FILE_ATTRIBUTE_SYSTEM)) {
1447                 status = NT_STATUS_NO_SUCH_FILE;
1448                 goto out;
1449         }
1450
1451         /* Disallow if dst file already exists. */
1452         if (VALID_STAT(smb_fname_dst->st)) {
1453                 status = NT_STATUS_OBJECT_NAME_COLLISION;
1454                 goto out;
1455         }
1456
1457         /* No links from a directory. */
1458         if (S_ISDIR(smb_fname_src->st.st_ex_mode)) {
1459                 status = NT_STATUS_FILE_IS_A_DIRECTORY;
1460                 goto out;
1461         }
1462
1463         DEBUG(10,("copy_internals: doing file copy %s to %s\n",
1464                   smb_fname_str_dbg(smb_fname_src),
1465                   smb_fname_str_dbg(smb_fname_dst)));
1466
1467         status = SMB_VFS_CREATE_FILE(
1468                 conn,                                   /* conn */
1469                 req,                                    /* req */
1470                 0,                                      /* root_dir_fid */
1471                 smb_fname_src,                          /* fname */
1472                 FILE_READ_DATA|FILE_READ_ATTRIBUTES|
1473                         FILE_READ_EA,                   /* access_mask */
1474                 (FILE_SHARE_READ | FILE_SHARE_WRITE |   /* share_access */
1475                     FILE_SHARE_DELETE),
1476                 FILE_OPEN,                              /* create_disposition*/
1477                 0,                                      /* create_options */
1478                 FILE_ATTRIBUTE_NORMAL,                  /* file_attributes */
1479                 NO_OPLOCK,                              /* oplock_request */
1480                 NULL,                                   /* lease */
1481                 0,                                      /* allocation_size */
1482                 0,                                      /* private_flags */
1483                 NULL,                                   /* sd */
1484                 NULL,                                   /* ea_list */
1485                 &fsp1,                                  /* result */
1486                 &info,                                  /* pinfo */
1487                 NULL, NULL);                            /* create context */
1488
1489         if (!NT_STATUS_IS_OK(status)) {
1490                 goto out;
1491         }
1492
1493         status = SMB_VFS_CREATE_FILE(
1494                 conn,                                   /* conn */
1495                 req,                                    /* req */
1496                 0,                                      /* root_dir_fid */
1497                 smb_fname_dst,                          /* fname */
1498                 FILE_WRITE_DATA|FILE_WRITE_ATTRIBUTES|
1499                         FILE_WRITE_EA,                  /* access_mask */
1500                 (FILE_SHARE_READ | FILE_SHARE_WRITE |   /* share_access */
1501                     FILE_SHARE_DELETE),
1502                 FILE_CREATE,                            /* create_disposition*/
1503                 0,                                      /* create_options */
1504                 fattr,                                  /* file_attributes */
1505                 NO_OPLOCK,                              /* oplock_request */
1506                 NULL,                                   /* lease */
1507                 0,                                      /* allocation_size */
1508                 0,                                      /* private_flags */
1509                 NULL,                                   /* sd */
1510                 NULL,                                   /* ea_list */
1511                 &fsp2,                                  /* result */
1512                 &info,                                  /* pinfo */
1513                 NULL, NULL);                            /* create context */
1514
1515         if (!NT_STATUS_IS_OK(status)) {
1516                 close_file(NULL, fsp1, ERROR_CLOSE);
1517                 goto out;
1518         }
1519
1520         if (smb_fname_src->st.st_ex_size) {
1521                 ret = vfs_transfer_file(fsp1, fsp2, smb_fname_src->st.st_ex_size);
1522         }
1523
1524         /*
1525          * As we are opening fsp1 read-only we only expect
1526          * an error on close on fsp2 if we are out of space.
1527          * Thus we don't look at the error return from the
1528          * close of fsp1.
1529          */
1530         close_file(NULL, fsp1, NORMAL_CLOSE);
1531
1532         /* Ensure the modtime is set correctly on the destination file. */
1533         set_close_write_time(fsp2, smb_fname_src->st.st_ex_mtime);
1534
1535         status = close_file(NULL, fsp2, NORMAL_CLOSE);
1536
1537         /* Grrr. We have to do this as open_file_ntcreate adds FILE_ATTRIBUTE_ARCHIVE when it
1538            creates the file. This isn't the correct thing to do in the copy
1539            case. JRA */
1540         if (!parent_dirname(talloc_tos(), smb_fname_dst->base_name, &parent,
1541                             NULL)) {
1542                 status = NT_STATUS_NO_MEMORY;
1543                 goto out;
1544         }
1545         file_set_dosmode(conn, smb_fname_dst, fattr, parent, false);
1546         TALLOC_FREE(parent);
1547
1548         if (ret < (off_t)smb_fname_src->st.st_ex_size) {
1549                 status = NT_STATUS_DISK_FULL;
1550                 goto out;
1551         }
1552  out:
1553         if (!NT_STATUS_IS_OK(status)) {
1554                 DEBUG(3,("copy_internals: Error %s copy file %s to %s\n",
1555                         nt_errstr(status), smb_fname_str_dbg(smb_fname_src),
1556                         smb_fname_str_dbg(smb_fname_dst)));
1557         }
1558
1559         return status;
1560 }
1561
1562 /****************************************************************************
1563  Reply to a NT rename request.
1564 ****************************************************************************/
1565
1566 void reply_ntrename(struct smb_request *req)
1567 {
1568         connection_struct *conn = req->conn;
1569         struct smb_filename *smb_fname_old = NULL;
1570         struct smb_filename *smb_fname_new = NULL;
1571         char *oldname = NULL;
1572         char *newname = NULL;
1573         const char *p;
1574         NTSTATUS status;
1575         bool src_has_wcard = False;
1576         bool dest_has_wcard = False;
1577         uint32_t attrs;
1578         uint32_t ucf_flags_src = ucf_flags_from_smb_request(req);
1579         uint32_t ucf_flags_dst = ucf_flags_from_smb_request(req);
1580         uint16_t rename_type;
1581         TALLOC_CTX *ctx = talloc_tos();
1582         bool stream_rename = false;
1583
1584         START_PROFILE(SMBntrename);
1585
1586         if (req->wct < 4) {
1587                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1588                 goto out;
1589         }
1590
1591         attrs = SVAL(req->vwv+0, 0);
1592         rename_type = SVAL(req->vwv+1, 0);
1593
1594         p = (const char *)req->buf + 1;
1595         p += srvstr_get_path_req_wcard(ctx, req, &oldname, p, STR_TERMINATE,
1596                                        &status, &src_has_wcard);
1597         if (!NT_STATUS_IS_OK(status)) {
1598                 reply_nterror(req, status);
1599                 goto out;
1600         }
1601
1602         if (!req->posix_pathnames && ms_has_wild(oldname)) {
1603                 reply_nterror(req, NT_STATUS_OBJECT_PATH_SYNTAX_BAD);
1604                 goto out;
1605         }
1606
1607         p++;
1608         p += srvstr_get_path_req_wcard(ctx, req, &newname, p, STR_TERMINATE,
1609                                        &status, &dest_has_wcard);
1610         if (!NT_STATUS_IS_OK(status)) {
1611                 reply_nterror(req, status);
1612                 goto out;
1613         }
1614
1615         if (!req->posix_pathnames) {
1616                 /* The newname must begin with a ':' if the
1617                    oldname contains a ':'. */
1618                 if (strchr_m(oldname, ':')) {
1619                         if (newname[0] != ':') {
1620                                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1621                                 goto out;
1622                         }
1623                         stream_rename = true;
1624                 }
1625         }
1626
1627         /*
1628          * If this is a rename operation, allow wildcards and save the
1629          * destination's last component.
1630          */
1631         if (rename_type == RENAME_FLAG_RENAME) {
1632                 ucf_flags_src |= UCF_COND_ALLOW_WCARD_LCOMP;
1633                 ucf_flags_dst |= UCF_COND_ALLOW_WCARD_LCOMP | UCF_SAVE_LCOMP;
1634         }
1635
1636         /* rename_internals() calls unix_convert(), so don't call it here. */
1637         status = filename_convert(ctx, conn,
1638                                   oldname,
1639                                   ucf_flags_src,
1640                                   NULL,
1641                                   NULL,
1642                                   &smb_fname_old);
1643         if (!NT_STATUS_IS_OK(status)) {
1644                 if (NT_STATUS_EQUAL(status,
1645                                     NT_STATUS_PATH_NOT_COVERED)) {
1646                         reply_botherror(req,
1647                                         NT_STATUS_PATH_NOT_COVERED,
1648                                         ERRSRV, ERRbadpath);
1649                         goto out;
1650                 }
1651                 reply_nterror(req, status);
1652                 goto out;
1653         }
1654
1655         status = filename_convert(ctx, conn,
1656                                   newname,
1657                                   ucf_flags_dst,
1658                                   NULL,
1659                                   &dest_has_wcard,
1660                                   &smb_fname_new);
1661         if (!NT_STATUS_IS_OK(status)) {
1662                 if (NT_STATUS_EQUAL(status,
1663                                     NT_STATUS_PATH_NOT_COVERED)) {
1664                         reply_botherror(req,
1665                                         NT_STATUS_PATH_NOT_COVERED,
1666                                         ERRSRV, ERRbadpath);
1667                         goto out;
1668                 }
1669                 reply_nterror(req, status);
1670                 goto out;
1671         }
1672
1673         if (stream_rename) {
1674                 /* smb_fname_new must be the same as smb_fname_old. */
1675                 TALLOC_FREE(smb_fname_new->base_name);
1676                 smb_fname_new->base_name = talloc_strdup(smb_fname_new,
1677                                                 smb_fname_old->base_name);
1678                 if (!smb_fname_new->base_name) {
1679                         reply_nterror(req, NT_STATUS_NO_MEMORY);
1680                         goto out;
1681                 }
1682         }
1683
1684         DEBUG(3,("reply_ntrename: %s -> %s\n",
1685                  smb_fname_str_dbg(smb_fname_old),
1686                  smb_fname_str_dbg(smb_fname_new)));
1687
1688         switch(rename_type) {
1689                 case RENAME_FLAG_RENAME:
1690                         status = rename_internals(ctx, conn, req,
1691                                                   smb_fname_old, smb_fname_new,
1692                                                   attrs, False, src_has_wcard,
1693                                                   dest_has_wcard,
1694                                                   DELETE_ACCESS);
1695                         break;
1696                 case RENAME_FLAG_HARD_LINK:
1697                         if (src_has_wcard || dest_has_wcard) {
1698                                 /* No wildcards. */
1699                                 status = NT_STATUS_OBJECT_PATH_SYNTAX_BAD;
1700                         } else {
1701                                 status = hardlink_internals(ctx, conn,
1702                                                             req,
1703                                                             false,
1704                                                             smb_fname_old,
1705                                                             smb_fname_new);
1706                         }
1707                         break;
1708                 case RENAME_FLAG_COPY:
1709                         if (src_has_wcard || dest_has_wcard) {
1710                                 /* No wildcards. */
1711                                 status = NT_STATUS_OBJECT_PATH_SYNTAX_BAD;
1712                         } else {
1713                                 status = copy_internals(ctx, conn, req,
1714                                                         smb_fname_old,
1715                                                         smb_fname_new,
1716                                                         attrs);
1717                         }
1718                         break;
1719                 case RENAME_FLAG_MOVE_CLUSTER_INFORMATION:
1720                         status = NT_STATUS_INVALID_PARAMETER;
1721                         break;
1722                 default:
1723                         status = NT_STATUS_ACCESS_DENIED; /* Default error. */
1724                         break;
1725         }
1726
1727         if (!NT_STATUS_IS_OK(status)) {
1728                 if (open_was_deferred(req->xconn, req->mid)) {
1729                         /* We have re-scheduled this call. */
1730                         goto out;
1731                 }
1732
1733                 reply_nterror(req, status);
1734                 goto out;
1735         }
1736
1737         reply_outbuf(req, 0, 0);
1738  out:
1739         END_PROFILE(SMBntrename);
1740         return;
1741 }
1742
1743 /****************************************************************************
1744  Reply to a notify change - queue the request and
1745  don't allow a directory to be opened.
1746 ****************************************************************************/
1747
1748 static void smbd_smb1_notify_reply(struct smb_request *req,
1749                                    NTSTATUS error_code,
1750                                    uint8_t *buf, size_t len)
1751 {
1752         send_nt_replies(req->conn, req, error_code, (char *)buf, len, NULL, 0);
1753 }
1754
1755 static void call_nt_transact_notify_change(connection_struct *conn,
1756                                            struct smb_request *req,
1757                                            uint16_t **ppsetup,
1758                                            uint32_t setup_count,
1759                                            char **ppparams,
1760                                            uint32_t parameter_count,
1761                                            char **ppdata, uint32_t data_count,
1762                                            uint32_t max_data_count,
1763                                            uint32_t max_param_count)
1764 {
1765         uint16_t *setup = *ppsetup;
1766         files_struct *fsp;
1767         uint32_t filter;
1768         NTSTATUS status;
1769         bool recursive;
1770
1771         if(setup_count < 6) {
1772                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1773                 return;
1774         }
1775
1776         fsp = file_fsp(req, SVAL(setup,4));
1777         filter = IVAL(setup, 0);
1778         recursive = (SVAL(setup, 6) != 0) ? True : False;
1779
1780         DEBUG(3,("call_nt_transact_notify_change\n"));
1781
1782         if(!fsp) {
1783                 reply_nterror(req, NT_STATUS_INVALID_HANDLE);
1784                 return;
1785         }
1786
1787         {
1788                 char *filter_string;
1789
1790                 if (!(filter_string = notify_filter_string(NULL, filter))) {
1791                         reply_nterror(req,NT_STATUS_NO_MEMORY);
1792                         return;
1793                 }
1794
1795                 DEBUG(3,("call_nt_transact_notify_change: notify change "
1796                          "called on %s, filter = %s, recursive = %d\n",
1797                          fsp_str_dbg(fsp), filter_string, recursive));
1798
1799                 TALLOC_FREE(filter_string);
1800         }
1801
1802         if((!fsp->is_directory) || (conn != fsp->conn)) {
1803                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1804                 return;
1805         }
1806
1807         if (fsp->notify == NULL) {
1808
1809                 status = change_notify_create(fsp, filter, recursive);
1810
1811                 if (!NT_STATUS_IS_OK(status)) {
1812                         DEBUG(10, ("change_notify_create returned %s\n",
1813                                    nt_errstr(status)));
1814                         reply_nterror(req, status);
1815                         return;
1816                 }
1817         }
1818
1819         if (change_notify_fsp_has_changes(fsp)) {
1820
1821                 /*
1822                  * We've got changes pending, respond immediately
1823                  */
1824
1825                 /*
1826                  * TODO: write a torture test to check the filtering behaviour
1827                  * here.
1828                  */
1829
1830                 change_notify_reply(req,
1831                                     NT_STATUS_OK,
1832                                     max_param_count,
1833                                     fsp->notify,
1834                                     smbd_smb1_notify_reply);
1835
1836                 /*
1837                  * change_notify_reply() above has independently sent its
1838                  * results
1839                  */
1840                 return;
1841         }
1842
1843         /*
1844          * No changes pending, queue the request
1845          */
1846
1847         status = change_notify_add_request(req,
1848                         max_param_count,
1849                         filter,
1850                         recursive, fsp,
1851                         smbd_smb1_notify_reply);
1852         if (!NT_STATUS_IS_OK(status)) {
1853                 reply_nterror(req, status);
1854         }
1855         return;
1856 }
1857
1858 /****************************************************************************
1859  Reply to an NT transact rename command.
1860 ****************************************************************************/
1861
1862 static void call_nt_transact_rename(connection_struct *conn,
1863                                     struct smb_request *req,
1864                                     uint16_t **ppsetup, uint32_t setup_count,
1865                                     char **ppparams, uint32_t parameter_count,
1866                                     char **ppdata, uint32_t data_count,
1867                                     uint32_t max_data_count)
1868 {
1869         char *params = *ppparams;
1870         char *new_name = NULL;
1871         files_struct *fsp = NULL;
1872         bool dest_has_wcard = False;
1873         NTSTATUS status;
1874         TALLOC_CTX *ctx = talloc_tos();
1875
1876         if(parameter_count < 5) {
1877                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1878                 return;
1879         }
1880
1881         fsp = file_fsp(req, SVAL(params, 0));
1882         if (!check_fsp(conn, req, fsp)) {
1883                 return;
1884         }
1885         if (req->posix_pathnames) {
1886                 srvstr_get_path_wcard_posix(ctx,
1887                                 params,
1888                                 req->flags2,
1889                                 &new_name,
1890                                 params+4,
1891                                 parameter_count - 4,
1892                                 STR_TERMINATE,
1893                                 &status,
1894                                 &dest_has_wcard);
1895         } else {
1896                 srvstr_get_path_wcard(ctx,
1897                                 params,
1898                                 req->flags2,
1899                                 &new_name,
1900                                 params+4,
1901                                 parameter_count - 4,
1902                                 STR_TERMINATE,
1903                                 &status,
1904                                 &dest_has_wcard);
1905         }
1906
1907         if (!NT_STATUS_IS_OK(status)) {
1908                 reply_nterror(req, status);
1909                 return;
1910         }
1911
1912         /*
1913          * W2K3 ignores this request as the RAW-RENAME test
1914          * demonstrates, so we do.
1915          */
1916         send_nt_replies(conn, req, NT_STATUS_OK, NULL, 0, NULL, 0);
1917
1918         DEBUG(3,("nt transact rename from = %s, to = %s ignored!\n",
1919                  fsp_str_dbg(fsp), new_name));
1920
1921         return;
1922 }
1923
1924 /******************************************************************************
1925  Fake up a completely empty SD.
1926 *******************************************************************************/
1927
1928 static NTSTATUS get_null_nt_acl(TALLOC_CTX *mem_ctx, struct security_descriptor **ppsd)
1929 {
1930         size_t sd_size;
1931
1932         *ppsd = make_standard_sec_desc( mem_ctx, &global_sid_World, &global_sid_World, NULL, &sd_size);
1933         if(!*ppsd) {
1934                 DEBUG(0,("get_null_nt_acl: Unable to malloc space for security descriptor.\n"));
1935                 return NT_STATUS_NO_MEMORY;
1936         }
1937
1938         return NT_STATUS_OK;
1939 }
1940
1941 /****************************************************************************
1942  Reply to query a security descriptor.
1943  Callable from SMB1 and SMB2.
1944  If it returns NT_STATUS_BUFFER_TOO_SMALL, pdata_size is initialized with
1945  the required size.
1946 ****************************************************************************/
1947
1948 NTSTATUS smbd_do_query_security_desc(connection_struct *conn,
1949                                         TALLOC_CTX *mem_ctx,
1950                                         files_struct *fsp,
1951                                         uint32_t security_info_wanted,
1952                                         uint32_t max_data_count,
1953                                         uint8_t **ppmarshalled_sd,
1954                                         size_t *psd_size)
1955 {
1956         NTSTATUS status;
1957         struct security_descriptor *psd = NULL;
1958         TALLOC_CTX *frame = talloc_stackframe();
1959
1960         /*
1961          * Get the permissions to return.
1962          */
1963
1964         if ((security_info_wanted & SECINFO_SACL) &&
1965                         !(fsp->access_mask & SEC_FLAG_SYSTEM_SECURITY)) {
1966                 DEBUG(10, ("Access to SACL denied.\n"));
1967                 TALLOC_FREE(frame);
1968                 return NT_STATUS_ACCESS_DENIED;
1969         }
1970
1971         if ((security_info_wanted & (SECINFO_DACL|SECINFO_OWNER|SECINFO_GROUP)) &&
1972                         !(fsp->access_mask & SEC_STD_READ_CONTROL)) {
1973                 DEBUG(10, ("Access to DACL, OWNER, or GROUP denied.\n"));
1974                 TALLOC_FREE(frame);
1975                 return NT_STATUS_ACCESS_DENIED;
1976         }
1977
1978         if (S_ISLNK(fsp->fsp_name->st.st_ex_mode)) {
1979                 DEBUG(10, ("ACL get on symlink %s denied.\n",
1980                         fsp_str_dbg(fsp)));
1981                 TALLOC_FREE(frame);
1982                 return NT_STATUS_ACCESS_DENIED;
1983         }
1984
1985         if (security_info_wanted & (SECINFO_DACL|SECINFO_OWNER|
1986                         SECINFO_GROUP|SECINFO_SACL)) {
1987                 /* Don't return SECINFO_LABEL if anything else was
1988                    requested. See bug #8458. */
1989                 security_info_wanted &= ~SECINFO_LABEL;
1990         }
1991
1992         if (!lp_nt_acl_support(SNUM(conn))) {
1993                 status = get_null_nt_acl(frame, &psd);
1994         } else if (security_info_wanted & SECINFO_LABEL) {
1995                 /* Like W2K3 return a null object. */
1996                 status = get_null_nt_acl(frame, &psd);
1997         } else {
1998                 status = SMB_VFS_FGET_NT_ACL(
1999                         fsp, security_info_wanted, frame, &psd);
2000         }
2001         if (!NT_STATUS_IS_OK(status)) {
2002                 TALLOC_FREE(frame);
2003                 return status;
2004         }
2005
2006         if (!(security_info_wanted & SECINFO_OWNER)) {
2007                 psd->owner_sid = NULL;
2008         }
2009         if (!(security_info_wanted & SECINFO_GROUP)) {
2010                 psd->group_sid = NULL;
2011         }
2012         if (!(security_info_wanted & SECINFO_DACL)) {
2013                 psd->type &= ~SEC_DESC_DACL_PRESENT;
2014                 psd->dacl = NULL;
2015         }
2016         if (!(security_info_wanted & SECINFO_SACL)) {
2017                 psd->type &= ~SEC_DESC_SACL_PRESENT;
2018                 psd->sacl = NULL;
2019         }
2020
2021         /* If the SACL/DACL is NULL, but was requested, we mark that it is
2022          * present in the reply to match Windows behavior */
2023         if (psd->sacl == NULL &&
2024             security_info_wanted & SECINFO_SACL)
2025                 psd->type |= SEC_DESC_SACL_PRESENT;
2026         if (psd->dacl == NULL &&
2027             security_info_wanted & SECINFO_DACL)
2028                 psd->type |= SEC_DESC_DACL_PRESENT;
2029
2030         if (security_info_wanted & SECINFO_LABEL) {
2031                 /* Like W2K3 return a null object. */
2032                 psd->owner_sid = NULL;
2033                 psd->group_sid = NULL;
2034                 psd->dacl = NULL;
2035                 psd->sacl = NULL;
2036                 psd->type &= ~(SEC_DESC_DACL_PRESENT|SEC_DESC_SACL_PRESENT);
2037         }
2038
2039         *psd_size = ndr_size_security_descriptor(psd, 0);
2040
2041         DEBUG(3,("smbd_do_query_security_desc: sd_size = %lu.\n",
2042                 (unsigned long)*psd_size));
2043
2044         if (DEBUGLEVEL >= 10) {
2045                 DEBUG(10,("smbd_do_query_security_desc for file %s\n",
2046                           fsp_str_dbg(fsp)));
2047                 NDR_PRINT_DEBUG(security_descriptor, psd);
2048         }
2049
2050         if (max_data_count < *psd_size) {
2051                 TALLOC_FREE(frame);
2052                 return NT_STATUS_BUFFER_TOO_SMALL;
2053         }
2054
2055         status = marshall_sec_desc(mem_ctx, psd,
2056                                    ppmarshalled_sd, psd_size);
2057
2058         if (!NT_STATUS_IS_OK(status)) {
2059                 TALLOC_FREE(frame);
2060                 return status;
2061         }
2062
2063         TALLOC_FREE(frame);
2064         return NT_STATUS_OK;
2065 }
2066
2067 /****************************************************************************
2068  SMB1 reply to query a security descriptor.
2069 ****************************************************************************/
2070
2071 static void call_nt_transact_query_security_desc(connection_struct *conn,
2072                                                  struct smb_request *req,
2073                                                  uint16_t **ppsetup,
2074                                                  uint32_t setup_count,
2075                                                  char **ppparams,
2076                                                  uint32_t parameter_count,
2077                                                  char **ppdata,
2078                                                  uint32_t data_count,
2079                                                  uint32_t max_data_count)
2080 {
2081         char *params = *ppparams;
2082         char *data = *ppdata;
2083         size_t sd_size = 0;
2084         uint32_t security_info_wanted;
2085         files_struct *fsp = NULL;
2086         NTSTATUS status;
2087         uint8_t *marshalled_sd = NULL;
2088
2089         if(parameter_count < 8) {
2090                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
2091                 return;
2092         }
2093
2094         fsp = file_fsp(req, SVAL(params,0));
2095         if(!fsp) {
2096                 reply_nterror(req, NT_STATUS_INVALID_HANDLE);
2097                 return;
2098         }
2099
2100         security_info_wanted = IVAL(params,4);
2101
2102         DEBUG(3,("call_nt_transact_query_security_desc: file = %s, "
2103                  "info_wanted = 0x%x\n", fsp_str_dbg(fsp),
2104                  (unsigned int)security_info_wanted));
2105
2106         params = nttrans_realloc(ppparams, 4);
2107         if(params == NULL) {
2108                 reply_nterror(req, NT_STATUS_NO_MEMORY);
2109                 return;
2110         }
2111
2112         /*
2113          * Get the permissions to return.
2114          */
2115
2116         status = smbd_do_query_security_desc(conn,
2117                                         talloc_tos(),
2118                                         fsp,
2119                                         security_info_wanted &
2120                                         SMB_SUPPORTED_SECINFO_FLAGS,
2121                                         max_data_count,
2122                                         &marshalled_sd,
2123                                         &sd_size);
2124
2125         if (NT_STATUS_EQUAL(status, NT_STATUS_BUFFER_TOO_SMALL)) {
2126                 SIVAL(params,0,(uint32_t)sd_size);
2127                 send_nt_replies(conn, req, NT_STATUS_BUFFER_TOO_SMALL,
2128                         params, 4, NULL, 0);
2129                 return;
2130         }
2131
2132         if (!NT_STATUS_IS_OK(status)) {
2133                 reply_nterror(req, status);
2134                 return;
2135         }
2136
2137         SMB_ASSERT(sd_size > 0);
2138
2139         SIVAL(params,0,(uint32_t)sd_size);
2140
2141         if (max_data_count < sd_size) {
2142                 send_nt_replies(conn, req, NT_STATUS_BUFFER_TOO_SMALL,
2143                                 params, 4, NULL, 0);
2144                 return;
2145         }
2146
2147         /*
2148          * Allocate the data we will return.
2149          */
2150
2151         data = nttrans_realloc(ppdata, sd_size);
2152         if(data == NULL) {
2153                 reply_nterror(req, NT_STATUS_NO_MEMORY);
2154                 return;
2155         }
2156
2157         memcpy(data, marshalled_sd, sd_size);
2158
2159         send_nt_replies(conn, req, NT_STATUS_OK, params, 4, data, (int)sd_size);
2160
2161         return;
2162 }
2163
2164 /****************************************************************************
2165  Reply to set a security descriptor. Map to UNIX perms or POSIX ACLs.
2166 ****************************************************************************/
2167
2168 static void call_nt_transact_set_security_desc(connection_struct *conn,
2169                                                struct smb_request *req,
2170                                                uint16_t **ppsetup,
2171                                                uint32_t setup_count,
2172                                                char **ppparams,
2173                                                uint32_t parameter_count,
2174                                                char **ppdata,
2175                                                uint32_t data_count,
2176                                                uint32_t max_data_count)
2177 {
2178         char *params= *ppparams;
2179         char *data = *ppdata;
2180         files_struct *fsp = NULL;
2181         uint32_t security_info_sent = 0;
2182         NTSTATUS status;
2183
2184         if(parameter_count < 8) {
2185                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
2186                 return;
2187         }
2188
2189         if((fsp = file_fsp(req, SVAL(params,0))) == NULL) {
2190                 reply_nterror(req, NT_STATUS_INVALID_HANDLE);
2191                 return;
2192         }
2193
2194         if (!CAN_WRITE(fsp->conn)) {
2195                 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
2196                 return;
2197         }
2198
2199         if(!lp_nt_acl_support(SNUM(conn))) {
2200                 goto done;
2201         }
2202
2203         security_info_sent = IVAL(params,4);
2204
2205         DEBUG(3,("call_nt_transact_set_security_desc: file = %s, sent 0x%x\n",
2206                  fsp_str_dbg(fsp), (unsigned int)security_info_sent));
2207
2208         if (data_count == 0) {
2209                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
2210                 return;
2211         }
2212
2213         status = set_sd_blob(fsp, (uint8_t *)data, data_count,
2214                              security_info_sent & SMB_SUPPORTED_SECINFO_FLAGS);
2215         if (!NT_STATUS_IS_OK(status)) {
2216                 reply_nterror(req, status);
2217                 return;
2218         }
2219
2220   done:
2221         send_nt_replies(conn, req, NT_STATUS_OK, NULL, 0, NULL, 0);
2222         return;
2223 }
2224
2225 /****************************************************************************
2226  Reply to NT IOCTL
2227 ****************************************************************************/
2228
2229 static void call_nt_transact_ioctl(connection_struct *conn,
2230                                    struct smb_request *req,
2231                                    uint16_t **ppsetup, uint32_t setup_count,
2232                                    char **ppparams, uint32_t parameter_count,
2233                                    char **ppdata, uint32_t data_count,
2234                                    uint32_t max_data_count)
2235 {
2236         NTSTATUS status;
2237         uint32_t function;
2238         uint16_t fidnum;
2239         files_struct *fsp;
2240         uint8_t isFSctl;
2241         uint8_t compfilter;
2242         char *out_data = NULL;
2243         uint32_t out_data_len = 0;
2244         char *pdata = *ppdata;
2245         TALLOC_CTX *ctx = talloc_tos();
2246
2247         if (setup_count != 8) {
2248                 DEBUG(3,("call_nt_transact_ioctl: invalid setup count %d\n", setup_count));
2249                 reply_nterror(req, NT_STATUS_NOT_SUPPORTED);
2250                 return;
2251         }
2252
2253         function = IVAL(*ppsetup, 0);
2254         fidnum = SVAL(*ppsetup, 4);
2255         isFSctl = CVAL(*ppsetup, 6);
2256         compfilter = CVAL(*ppsetup, 7);
2257
2258         DEBUG(10, ("call_nt_transact_ioctl: function[0x%08X] FID[0x%04X] isFSctl[0x%02X] compfilter[0x%02X]\n", 
2259                  function, fidnum, isFSctl, compfilter));
2260
2261         fsp=file_fsp(req, fidnum);
2262
2263         /*
2264          * We don't really implement IOCTLs, especially on files.
2265          */
2266         if (!isFSctl) {
2267                 DEBUG(10, ("isFSctl: 0x%02X indicates IOCTL, not FSCTL!\n",
2268                         isFSctl));
2269                 reply_nterror(req, NT_STATUS_NOT_SUPPORTED);
2270                 return;
2271         }
2272
2273         /* Has to be for an open file! */
2274         if (!check_fsp_open(conn, req, fsp)) {
2275                 return;
2276         }
2277
2278         SMB_PERFCOUNT_SET_IOCTL(&req->pcd, function);
2279
2280         /*
2281          * out_data might be allocated by the VFS module, but talloc should be
2282          * used, and should be cleaned up when the request ends.
2283          */
2284         status = SMB_VFS_FSCTL(fsp, 
2285                                ctx,
2286                                function, 
2287                                req->flags2,
2288                                (uint8_t *)pdata, 
2289                                data_count, 
2290                                (uint8_t **)&out_data,
2291                                max_data_count,
2292                                &out_data_len);
2293         if (!NT_STATUS_IS_OK(status)) {
2294                 reply_nterror(req, status);
2295         } else {
2296                 send_nt_replies(conn, req, NT_STATUS_OK, NULL, 0, out_data, out_data_len);
2297         }
2298 }
2299
2300
2301 #ifdef HAVE_SYS_QUOTAS
2302 static enum ndr_err_code fill_qtlist_from_sids(TALLOC_CTX *mem_ctx,
2303                                                struct files_struct *fsp,
2304                                                SMB_NTQUOTA_HANDLE *qt_handle,
2305                                                struct dom_sid *sids,
2306                                                uint32_t elems)
2307 {
2308         uint32_t i;
2309         TALLOC_CTX *list_ctx = NULL;
2310
2311         list_ctx = talloc_init("quota_sid_list");
2312
2313         if (list_ctx == NULL) {
2314                 DBG_ERR("failed to allocate\n");
2315                 return NDR_ERR_ALLOC;
2316         }
2317
2318         if (qt_handle->quota_list!=NULL) {
2319                 free_ntquota_list(&(qt_handle->quota_list));
2320         }
2321         for (i = 0; i < elems; i++) {
2322                 SMB_NTQUOTA_STRUCT qt;
2323                 SMB_NTQUOTA_LIST *list_item;
2324                 bool ok;
2325
2326                 if (!NT_STATUS_IS_OK(vfs_get_ntquota(fsp,
2327                                                      SMB_USER_QUOTA_TYPE,
2328                                                      &sids[i], &qt))) {
2329                         /* non fatal error, return empty item in result */
2330                         ZERO_STRUCT(qt);
2331                         continue;
2332                 }
2333
2334
2335                 list_item = talloc_zero(list_ctx, SMB_NTQUOTA_LIST);
2336                 if (list_item == NULL) {
2337                         DBG_ERR("failed to allocate\n");
2338                         return NDR_ERR_ALLOC;
2339                 }
2340
2341                 ok = sid_to_uid(&sids[i], &list_item->uid);
2342                 if (!ok) {
2343                         struct dom_sid_buf buf;
2344                         DBG_WARNING("Could not convert SID %s to uid\n",
2345                                     dom_sid_str_buf(&sids[i], &buf));
2346                         /* No idea what to return here... */
2347                         return NDR_ERR_INVALID_POINTER;
2348                 }
2349
2350                 list_item->quotas = talloc_zero(list_item, SMB_NTQUOTA_STRUCT);
2351                 if (list_item->quotas == NULL) {
2352                         DBG_ERR("failed to allocate\n");
2353                         return NDR_ERR_ALLOC;
2354                 }
2355
2356                 *list_item->quotas = qt;
2357                 list_item->mem_ctx = list_ctx;
2358                 DLIST_ADD(qt_handle->quota_list, list_item);
2359         }
2360         qt_handle->tmp_list = qt_handle->quota_list;
2361         return NDR_ERR_SUCCESS;
2362 }
2363
2364 static enum ndr_err_code extract_sids_from_buf(TALLOC_CTX *mem_ctx,
2365                                   uint32_t sidlistlength,
2366                                   DATA_BLOB *sid_buf,
2367                                   struct dom_sid **sids,
2368                                   uint32_t *num)
2369 {
2370         DATA_BLOB blob;
2371         uint32_t i = 0;
2372         enum ndr_err_code err;
2373
2374         struct sid_list_elem {
2375                 struct sid_list_elem *prev, *next;
2376                 struct dom_sid sid;
2377         };
2378
2379         struct sid_list_elem *sid_list = NULL;
2380         struct sid_list_elem *iter = NULL;
2381         TALLOC_CTX *list_ctx = talloc_init("sid_list");
2382         if (!list_ctx) {
2383                 DBG_ERR("OOM\n");
2384                 err = NDR_ERR_ALLOC;
2385                 goto done;
2386         }
2387
2388         *num = 0;
2389         *sids = NULL;
2390
2391         if (sidlistlength) {
2392                 uint32_t offset = 0;
2393                 struct ndr_pull *ndr_pull = NULL;
2394
2395                 if (sidlistlength > sid_buf->length) {
2396                         DBG_ERR("sid_list_length 0x%x exceeds "
2397                                 "available bytes %zx\n",
2398                                 sidlistlength,
2399                                 sid_buf->length);
2400                         err = NDR_ERR_OFFSET;
2401                         goto done;
2402                 }
2403                 while (true) {
2404                         struct file_get_quota_info info;
2405                         struct sid_list_elem *item = NULL;
2406                         uint32_t new_offset = 0;
2407                         blob.data = sid_buf->data + offset;
2408                         blob.length = sidlistlength - offset;
2409                         ndr_pull = ndr_pull_init_blob(&blob, list_ctx);
2410                         if (!ndr_pull) {
2411                                 DBG_ERR("OOM\n");
2412                                 err = NDR_ERR_ALLOC;
2413                                 goto done;
2414                         }
2415                         err = ndr_pull_file_get_quota_info(ndr_pull,
2416                                            NDR_SCALARS | NDR_BUFFERS, &info);
2417                         if (!NDR_ERR_CODE_IS_SUCCESS(err)) {
2418                                 DBG_ERR("Failed to pull file_get_quota_info "
2419                                         "from sidlist buffer\n");
2420                                 goto done;
2421                         }
2422                         item = talloc_zero(list_ctx, struct sid_list_elem);
2423                         if (!item) {
2424                                 DBG_ERR("OOM\n");
2425                                 err = NDR_ERR_ALLOC;
2426                                 goto done;
2427                         }
2428                         item->sid = info.sid;
2429                         DLIST_ADD(sid_list, item);
2430                         i++;
2431                         if (i == UINT32_MAX) {
2432                                 DBG_ERR("Integer overflow\n");
2433                                 err = NDR_ERR_ARRAY_SIZE;
2434                                 goto done;
2435                         }
2436                         new_offset = info.next_entry_offset;
2437
2438                         /* if new_offset == 0 no more sid(s) to read. */
2439                         if (new_offset == 0) {
2440                                 break;
2441                         }
2442
2443                         /* Integer wrap? */
2444                         if ((offset + new_offset) < offset) {
2445                                 DBG_ERR("Integer wrap while adding "
2446                                         "new_offset 0x%x to current "
2447                                         "buffer offset 0x%x\n",
2448                                         new_offset, offset);
2449                                 err = NDR_ERR_OFFSET;
2450                                 goto done;
2451                         }
2452
2453                         offset += new_offset;
2454
2455                         /* check if new offset is outside buffer boundry. */
2456                         if (offset >= sidlistlength) {
2457                                 DBG_ERR("bufsize 0x%x exceeded by "
2458                                         "new offset 0x%x)\n",
2459                                         sidlistlength,
2460                                         offset);
2461                                 err = NDR_ERR_OFFSET;
2462                                 goto done;
2463                         }
2464                 }
2465                 *sids = talloc_zero_array(mem_ctx, struct dom_sid, i);
2466                 if (*sids == NULL) {
2467                         DBG_ERR("OOM\n");
2468                         err = NDR_ERR_ALLOC;
2469                         goto done;
2470                 }
2471
2472                 *num = i;
2473
2474                 for (iter = sid_list, i = 0; iter; iter = iter->next, i++) {
2475                         (*sids)[i] = iter->sid;
2476                         DBG_DEBUG("quota SID[%u] %s\n",
2477                                 (unsigned int)i,
2478                                 sid_string_dbg(&iter->sid));
2479                 }
2480         }
2481         err = NDR_ERR_SUCCESS;
2482 done:
2483         TALLOC_FREE(list_ctx);
2484         return err;
2485 }
2486
2487 NTSTATUS smbd_do_query_getinfo_quota(TALLOC_CTX *mem_ctx,
2488                                      files_struct *fsp,
2489                                      bool restart_scan,
2490                                      bool return_single,
2491                                      uint32_t sid_list_length,
2492                                      DATA_BLOB *sid_buf,
2493                                      uint32_t max_data_count,
2494                                      uint8_t **p_data,
2495                                      uint32_t *p_data_size)
2496 {
2497         NTSTATUS status;
2498         SMB_NTQUOTA_HANDLE *qt_handle = NULL;
2499         SMB_NTQUOTA_LIST *qt_list = NULL;
2500         DATA_BLOB blob = data_blob_null;
2501         enum ndr_err_code err;
2502
2503         qt_handle =
2504                 (SMB_NTQUOTA_HANDLE *)fsp->fake_file_handle->private_data;
2505
2506         if (sid_list_length ) {
2507                 struct dom_sid *sids;
2508                 uint32_t elems = 0;
2509                 /*
2510                  * error check pulled offsets and lengths for wrap and
2511                  * exceeding available bytes.
2512                  */
2513                 if (sid_list_length > sid_buf->length) {
2514                         DBG_ERR("sid_list_length 0x%x exceeds "
2515                                 "available bytes %zx\n",
2516                                 sid_list_length,
2517                                 sid_buf->length);
2518                         return NT_STATUS_INVALID_PARAMETER;
2519                 }
2520
2521                 err = extract_sids_from_buf(mem_ctx, sid_list_length,
2522                                             sid_buf, &sids, &elems);
2523                 if (!NDR_ERR_CODE_IS_SUCCESS(err) || elems == 0) {
2524                         return NT_STATUS_INVALID_PARAMETER;
2525                 }
2526                 err = fill_qtlist_from_sids(mem_ctx,
2527                                             fsp,
2528                                             qt_handle,
2529                                             sids,
2530                                             elems);
2531                 if (!NDR_ERR_CODE_IS_SUCCESS(err)) {
2532                         return NT_STATUS_INVALID_PARAMETER;
2533                 }
2534         } else if (restart_scan) {
2535                 if (vfs_get_user_ntquota_list(fsp,
2536                                               &(qt_handle->quota_list))!=0) {
2537                         return NT_STATUS_INTERNAL_ERROR;
2538                 }
2539         } else {
2540                 if (qt_handle->quota_list!=NULL &&
2541                         qt_handle->tmp_list==NULL) {
2542                         free_ntquota_list(&(qt_handle->quota_list));
2543                 }
2544         }
2545
2546         if (restart_scan !=0 ) {
2547                 qt_list = qt_handle->quota_list;
2548         } else {
2549                 qt_list = qt_handle->tmp_list;
2550         }
2551         status = fill_quota_buffer(mem_ctx, qt_list,
2552                                    return_single != 0,
2553                                    max_data_count,
2554                                    &blob,
2555                                    &qt_handle->tmp_list);
2556         if (!NT_STATUS_IS_OK(status)) {
2557                 return status;
2558         }
2559         if (blob.length > max_data_count) {
2560                 return NT_STATUS_BUFFER_TOO_SMALL;
2561         }
2562
2563         *p_data = blob.data;
2564         *p_data_size = blob.length;
2565         return NT_STATUS_OK;
2566 }
2567
2568 /****************************************************************************
2569  Reply to get user quota
2570 ****************************************************************************/
2571
2572 static void call_nt_transact_get_user_quota(connection_struct *conn,
2573                                             struct smb_request *req,
2574                                             uint16_t **ppsetup,
2575                                             uint32_t setup_count,
2576                                             char **ppparams,
2577                                             uint32_t parameter_count,
2578                                             char **ppdata,
2579                                             uint32_t data_count,
2580                                             uint32_t max_data_count)
2581 {
2582         NTSTATUS nt_status = NT_STATUS_OK;
2583         char *params = *ppparams;
2584         char *pdata = *ppdata;
2585         int data_len = 0;
2586         int param_len = 0;
2587         files_struct *fsp = NULL;
2588         DATA_BLOB blob = data_blob_null;
2589         struct nttrans_query_quota_params info = {0};
2590         enum ndr_err_code err;
2591         TALLOC_CTX *tmp_ctx = NULL;
2592         uint32_t resp_len = 0;
2593         uint8_t *resp_data = 0;
2594
2595         tmp_ctx = talloc_init("ntquota_list");
2596         if (!tmp_ctx) {
2597                 nt_status = NT_STATUS_NO_MEMORY;
2598                 goto error;
2599         }
2600
2601         /* access check */
2602         if (get_current_uid(conn) != sec_initial_uid()) {
2603                 DEBUG(1,("get_user_quota: access_denied service [%s] user "
2604                          "[%s]\n", lp_servicename(talloc_tos(), SNUM(conn)),
2605                          conn->session_info->unix_info->unix_name));
2606                 nt_status = NT_STATUS_ACCESS_DENIED;
2607                 goto error;
2608         }
2609
2610         blob.data = (uint8_t*)params;
2611         blob.length = parameter_count;
2612
2613         err = ndr_pull_struct_blob(&blob, tmp_ctx, &info,
2614                 (ndr_pull_flags_fn_t)ndr_pull_nttrans_query_quota_params);
2615
2616         if (!NDR_ERR_CODE_IS_SUCCESS(err)) {
2617                 DEBUG(0,("TRANSACT_GET_USER_QUOTA: failed to pull "
2618                          "query_quota_params."));
2619                 nt_status = NT_STATUS_INVALID_PARAMETER;
2620                 goto error;
2621         }
2622         DBG_DEBUG("info.return_single_entry = %u, info.restart_scan = %u, "
2623                   "info.sid_list_length = %u, info.start_sid_length = %u, "
2624                   "info.start_sid_offset = %u\n",
2625                   (unsigned int)info.return_single_entry,
2626                   (unsigned int)info.restart_scan,
2627                   (unsigned int)info.sid_list_length,
2628                   (unsigned int)info.start_sid_length,
2629                   (unsigned int)info.start_sid_offset);
2630
2631         /* set blob to point at data for further parsing */
2632         blob.data = (uint8_t*)pdata;
2633         blob.length = data_count;
2634         /*
2635          * Although MS-SMB ref is ambiguous here, a microsoft client will
2636          * only ever send a start sid (as part of a list) with
2637          * sid_list_length & start_sid_offset both set to the actual list
2638          * length. Note: Only a single result is returned in this case
2639          * In the case where either start_sid_offset or start_sid_length
2640          * are set alone or if both set (but have different values) then
2641          * it seems windows will return a number of entries from the start
2642          * of the list of users with quotas set. This behaviour is undocumented
2643          * and windows clients do not send messages of that type. As such we
2644          * currently will reject these requests.
2645          */
2646         if (info.start_sid_length
2647         || (info.sid_list_length != info.start_sid_offset)) {
2648                 DBG_ERR("TRANSACT_GET_USER_QUOTA: unsupported single or "
2649                         "compound sid format\n");
2650                 nt_status = NT_STATUS_INVALID_PARAMETER;
2651                 goto error;
2652         }
2653
2654         /* maybe we can check the quota_fnum */
2655         fsp = file_fsp(req, info.fid);
2656         if (!check_fsp_ntquota_handle(conn, req, fsp)) {
2657                 DEBUG(3,("TRANSACT_GET_USER_QUOTA: no valid QUOTA HANDLE\n"));
2658                 nt_status = NT_STATUS_INVALID_HANDLE;
2659                 goto error;
2660         }
2661         nt_status = smbd_do_query_getinfo_quota(tmp_ctx,
2662                                   fsp,
2663                                   info.restart_scan,
2664                                   info.return_single_entry,
2665                                   info.sid_list_length,
2666                                   &blob,
2667                                   max_data_count,
2668                                   &resp_data,
2669                                   &resp_len);
2670         if (!NT_STATUS_IS_OK(nt_status)) {
2671                 if (!NT_STATUS_EQUAL(nt_status, NT_STATUS_NO_MORE_ENTRIES)) {
2672                         goto error;
2673                 }
2674                 nt_status = NT_STATUS_OK;
2675         }
2676
2677         param_len = 4;
2678         params = nttrans_realloc(ppparams, param_len);
2679         if(params == NULL) {
2680                 nt_status = NT_STATUS_NO_MEMORY;
2681                 goto error;
2682         }
2683
2684         data_len = resp_len;
2685         SIVAL(params, 0, data_len);
2686         pdata = nttrans_realloc(ppdata, data_len);
2687         memcpy(pdata, resp_data, data_len);
2688
2689         TALLOC_FREE(tmp_ctx);
2690         send_nt_replies(conn, req, nt_status, params, param_len,
2691                         pdata, data_len);
2692         return;
2693 error:
2694         TALLOC_FREE(tmp_ctx);
2695         reply_nterror(req, nt_status);
2696 }
2697
2698 /****************************************************************************
2699  Reply to set user quota
2700 ****************************************************************************/
2701
2702 static void call_nt_transact_set_user_quota(connection_struct *conn,
2703                                             struct smb_request *req,
2704                                             uint16_t **ppsetup,
2705                                             uint32_t setup_count,
2706                                             char **ppparams,
2707                                             uint32_t parameter_count,
2708                                             char **ppdata,
2709                                             uint32_t data_count,
2710                                             uint32_t max_data_count)
2711 {
2712         char *params = *ppparams;
2713         char *pdata = *ppdata;
2714         int data_len=0,param_len=0;
2715         SMB_NTQUOTA_STRUCT qt;
2716         struct file_quota_information info = {0};
2717         enum ndr_err_code err;
2718         struct dom_sid sid;
2719         DATA_BLOB inblob;
2720         files_struct *fsp = NULL;
2721         TALLOC_CTX *ctx = NULL;
2722         NTSTATUS status = NT_STATUS_OK;
2723         ZERO_STRUCT(qt);
2724
2725         /* access check */
2726         if (get_current_uid(conn) != sec_initial_uid()) {
2727                 DEBUG(1,("set_user_quota: access_denied service [%s] user "
2728                          "[%s]\n", lp_servicename(talloc_tos(), SNUM(conn)),
2729                          conn->session_info->unix_info->unix_name));
2730                 status = NT_STATUS_ACCESS_DENIED;
2731                 goto error;
2732         }
2733
2734         /*
2735          * Ensure minimum number of parameters sent.
2736          */
2737
2738         if (parameter_count < 2) {
2739                 DEBUG(0,("TRANSACT_SET_USER_QUOTA: requires %d >= 2 bytes parameters\n",parameter_count));
2740                 status = NT_STATUS_INVALID_PARAMETER;
2741                 goto error;
2742         }
2743
2744         /* maybe we can check the quota_fnum */
2745         fsp = file_fsp(req, SVAL(params,0));
2746         if (!check_fsp_ntquota_handle(conn, req, fsp)) {
2747                 DEBUG(3,("TRANSACT_GET_USER_QUOTA: no valid QUOTA HANDLE\n"));
2748                 status = NT_STATUS_INVALID_HANDLE;
2749                 goto error;
2750         }
2751
2752         ctx = talloc_init("set_user_quota");
2753         if (!ctx) {
2754                 status = NT_STATUS_NO_MEMORY;
2755                 goto error;
2756         }
2757         inblob.data = (uint8_t*)pdata;
2758         inblob.length = data_count;
2759
2760         err = ndr_pull_struct_blob(
2761                         &inblob,
2762                         ctx,
2763                         &info,
2764                         (ndr_pull_flags_fn_t)ndr_pull_file_quota_information);
2765
2766         if (!NDR_ERR_CODE_IS_SUCCESS(err)) {
2767                 DEBUG(0,("TRANSACT_SET_USER_QUOTA: failed to pull "
2768                          "file_quota_information\n"));
2769                 status = NT_STATUS_INVALID_PARAMETER;
2770                 goto error;
2771         }
2772         qt.usedspace = info.quota_used;
2773
2774         qt.softlim = info.quota_threshold;
2775
2776         qt.hardlim = info.quota_limit;
2777
2778         sid = info.sid;
2779
2780         if (vfs_set_ntquota(fsp, SMB_USER_QUOTA_TYPE, &sid, &qt)!=0) {
2781                 status = NT_STATUS_INTERNAL_ERROR;
2782                 goto error;
2783         }
2784
2785         send_nt_replies(conn, req, NT_STATUS_OK, params, param_len,
2786                         pdata, data_len);
2787         TALLOC_FREE(ctx);
2788         return;
2789 error:
2790         TALLOC_FREE(ctx);
2791         reply_nterror(req, status);
2792 }
2793 #endif /* HAVE_SYS_QUOTAS */
2794
2795 static void handle_nttrans(connection_struct *conn,
2796                            struct trans_state *state,
2797                            struct smb_request *req)
2798 {
2799         if (get_Protocol() >= PROTOCOL_NT1) {
2800                 req->flags2 |= 0x40; /* IS_LONG_NAME */
2801                 SSVAL(discard_const_p(uint8_t, req->inbuf),smb_flg2,req->flags2);
2802         }
2803
2804
2805         SMB_PERFCOUNT_SET_SUBOP(&req->pcd, state->call);
2806
2807         /* Now we must call the relevant NT_TRANS function */
2808         switch(state->call) {
2809                 case NT_TRANSACT_CREATE:
2810                 {
2811                         START_PROFILE(NT_transact_create);
2812                         call_nt_transact_create(
2813                                 conn, req,
2814                                 &state->setup, state->setup_count,
2815                                 &state->param, state->total_param,
2816                                 &state->data, state->total_data,
2817                                 state->max_data_return);
2818                         END_PROFILE(NT_transact_create);
2819                         break;
2820                 }
2821
2822                 case NT_TRANSACT_IOCTL:
2823                 {
2824                         START_PROFILE(NT_transact_ioctl);
2825                         call_nt_transact_ioctl(
2826                                 conn, req,
2827                                 &state->setup, state->setup_count,
2828                                 &state->param, state->total_param,
2829                                 &state->data, state->total_data,
2830                                 state->max_data_return);
2831                         END_PROFILE(NT_transact_ioctl);
2832                         break;
2833                 }
2834
2835                 case NT_TRANSACT_SET_SECURITY_DESC:
2836                 {
2837                         START_PROFILE(NT_transact_set_security_desc);
2838                         call_nt_transact_set_security_desc(
2839                                 conn, req,
2840                                 &state->setup, state->setup_count,
2841                                 &state->param, state->total_param,
2842                                 &state->data, state->total_data,
2843                                 state->max_data_return);
2844                         END_PROFILE(NT_transact_set_security_desc);
2845                         break;
2846                 }
2847
2848                 case NT_TRANSACT_NOTIFY_CHANGE:
2849                 {
2850                         START_PROFILE(NT_transact_notify_change);
2851                         call_nt_transact_notify_change(
2852                                 conn, req,
2853                                 &state->setup, state->setup_count,
2854                                 &state->param, state->total_param,
2855                                 &state->data, state->total_data,
2856                                 state->max_data_return,
2857                                 state->max_param_return);
2858                         END_PROFILE(NT_transact_notify_change);
2859                         break;
2860                 }
2861
2862                 case NT_TRANSACT_RENAME:
2863                 {
2864                         START_PROFILE(NT_transact_rename);
2865                         call_nt_transact_rename(
2866                                 conn, req,
2867                                 &state->setup, state->setup_count,
2868                                 &state->param, state->total_param,
2869                                 &state->data, state->total_data,
2870                                 state->max_data_return);
2871                         END_PROFILE(NT_transact_rename);
2872                         break;
2873                 }
2874
2875                 case NT_TRANSACT_QUERY_SECURITY_DESC:
2876                 {
2877                         START_PROFILE(NT_transact_query_security_desc);
2878                         call_nt_transact_query_security_desc(
2879                                 conn, req,
2880                                 &state->setup, state->setup_count,
2881                                 &state->param, state->total_param,
2882                                 &state->data, state->total_data,
2883                                 state->max_data_return);
2884                         END_PROFILE(NT_transact_query_security_desc);
2885                         break;
2886                 }
2887
2888 #ifdef HAVE_SYS_QUOTAS
2889                 case NT_TRANSACT_GET_USER_QUOTA:
2890                 {
2891                         START_PROFILE(NT_transact_get_user_quota);
2892                         call_nt_transact_get_user_quota(
2893                                 conn, req,
2894                                 &state->setup, state->setup_count,
2895                                 &state->param, state->total_param,
2896                                 &state->data, state->total_data,
2897                                 state->max_data_return);
2898                         END_PROFILE(NT_transact_get_user_quota);
2899                         break;
2900                 }
2901
2902                 case NT_TRANSACT_SET_USER_QUOTA:
2903                 {
2904                         START_PROFILE(NT_transact_set_user_quota);
2905                         call_nt_transact_set_user_quota(
2906                                 conn, req,
2907                                 &state->setup, state->setup_count,
2908                                 &state->param, state->total_param,
2909                                 &state->data, state->total_data,
2910                                 state->max_data_return);
2911                         END_PROFILE(NT_transact_set_user_quota);
2912                         break;
2913                 }
2914 #endif /* HAVE_SYS_QUOTAS */
2915
2916                 default:
2917                         /* Error in request */
2918                         DEBUG(0,("handle_nttrans: Unknown request %d in "
2919                                  "nttrans call\n", state->call));
2920                         reply_nterror(req, NT_STATUS_INVALID_LEVEL);
2921                         return;
2922         }
2923         return;
2924 }
2925
2926 /****************************************************************************
2927  Reply to a SMBNTtrans.
2928 ****************************************************************************/
2929
2930 void reply_nttrans(struct smb_request *req)
2931 {
2932         connection_struct *conn = req->conn;
2933         uint32_t pscnt;
2934         uint32_t psoff;
2935         uint32_t dscnt;
2936         uint32_t dsoff;
2937         uint16_t function_code;
2938         NTSTATUS result;
2939         struct trans_state *state;
2940
2941         START_PROFILE(SMBnttrans);
2942
2943         if (req->wct < 19) {
2944                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
2945                 END_PROFILE(SMBnttrans);
2946                 return;
2947         }
2948
2949         pscnt = IVAL(req->vwv+9, 1);
2950         psoff = IVAL(req->vwv+11, 1);
2951         dscnt = IVAL(req->vwv+13, 1);
2952         dsoff = IVAL(req->vwv+15, 1);
2953         function_code = SVAL(req->vwv+18, 0);
2954
2955         if (IS_IPC(conn) && (function_code != NT_TRANSACT_CREATE)) {
2956                 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
2957                 END_PROFILE(SMBnttrans);
2958                 return;
2959         }
2960
2961         result = allow_new_trans(conn->pending_trans, req->mid);
2962         if (!NT_STATUS_IS_OK(result)) {
2963                 DEBUG(2, ("Got invalid nttrans request: %s\n", nt_errstr(result)));
2964                 reply_nterror(req, result);
2965                 END_PROFILE(SMBnttrans);
2966                 return;
2967         }
2968
2969         if ((state = talloc(conn, struct trans_state)) == NULL) {
2970                 reply_nterror(req, NT_STATUS_NO_MEMORY);
2971                 END_PROFILE(SMBnttrans);
2972                 return;
2973         }
2974
2975         state->cmd = SMBnttrans;
2976
2977         state->mid = req->mid;
2978         state->vuid = req->vuid;
2979         state->total_data = IVAL(req->vwv+3, 1);
2980         state->data = NULL;
2981         state->total_param = IVAL(req->vwv+1, 1);
2982         state->param = NULL;
2983         state->max_data_return = IVAL(req->vwv+7, 1);
2984         state->max_param_return = IVAL(req->vwv+5, 1);
2985
2986         /* setup count is in *words* */
2987         state->setup_count = 2*CVAL(req->vwv+17, 1);
2988         state->setup = NULL;
2989         state->call = function_code;
2990
2991         DEBUG(10, ("num_setup=%u, "
2992                    "param_total=%u, this_param=%u, max_param=%u, "
2993                    "data_total=%u, this_data=%u, max_data=%u, "
2994                    "param_offset=%u, data_offset=%u\n",
2995                    (unsigned)state->setup_count,
2996                    (unsigned)state->total_param, (unsigned)pscnt,
2997                    (unsigned)state->max_param_return,
2998                    (unsigned)state->total_data, (unsigned)dscnt,
2999                    (unsigned)state->max_data_return,
3000                    (unsigned)psoff, (unsigned)dsoff));
3001
3002         /*
3003          * All nttrans messages we handle have smb_wct == 19 +
3004          * state->setup_count.  Ensure this is so as a sanity check.
3005          */
3006
3007         if(req->wct != 19 + (state->setup_count/2)) {
3008                 DEBUG(2,("Invalid smb_wct %d in nttrans call (should be %d)\n",
3009                          req->wct, 19 + (state->setup_count/2)));
3010                 goto bad_param;
3011         }
3012
3013         /* Don't allow more than 128mb for each value. */
3014         if ((state->total_data > (1024*1024*128)) ||
3015             (state->total_param > (1024*1024*128))) {
3016                 reply_nterror(req, NT_STATUS_NO_MEMORY);
3017                 END_PROFILE(SMBnttrans);
3018                 return;
3019         }
3020
3021         if ((dscnt > state->total_data) || (pscnt > state->total_param))
3022                 goto bad_param;
3023
3024         if (state->total_data)  {
3025
3026                 if (trans_oob(state->total_data, 0, dscnt)
3027                     || trans_oob(smb_len(req->inbuf), dsoff, dscnt)) {
3028                         goto bad_param;
3029                 }
3030
3031                 /* Can't use talloc here, the core routines do realloc on the
3032                  * params and data. */
3033                 if ((state->data = (char *)SMB_MALLOC(state->total_data)) == NULL) {
3034                         DEBUG(0,("reply_nttrans: data malloc fail for %u "
3035                                  "bytes !\n", (unsigned int)state->total_data));
3036                         TALLOC_FREE(state);
3037                         reply_nterror(req, NT_STATUS_NO_MEMORY);
3038                         END_PROFILE(SMBnttrans);
3039                         return;
3040                 }
3041
3042                 memcpy(state->data,smb_base(req->inbuf)+dsoff,dscnt);
3043         }
3044
3045         if (state->total_param) {
3046
3047                 if (trans_oob(state->total_param, 0, pscnt)
3048                     || trans_oob(smb_len(req->inbuf), psoff, pscnt)) {
3049                         goto bad_param;
3050                 }
3051
3052                 /* Can't use talloc here, the core routines do realloc on the
3053                  * params and data. */
3054                 if ((state->param = (char *)SMB_MALLOC(state->total_param)) == NULL) {
3055                         DEBUG(0,("reply_nttrans: param malloc fail for %u "
3056                                  "bytes !\n", (unsigned int)state->total_param));
3057                         SAFE_FREE(state->data);
3058                         TALLOC_FREE(state);
3059                         reply_nterror(req, NT_STATUS_NO_MEMORY);
3060                         END_PROFILE(SMBnttrans);
3061                         return;
3062                 }
3063
3064                 memcpy(state->param,smb_base(req->inbuf)+psoff,pscnt);
3065         }
3066
3067         state->received_data  = dscnt;
3068         state->received_param = pscnt;
3069
3070         if(state->setup_count > 0) {
3071                 DEBUG(10,("reply_nttrans: state->setup_count = %d\n",
3072                           state->setup_count));
3073
3074                 /*
3075                  * No overflow possible here, state->setup_count is an
3076                  * unsigned int, being filled by a single byte from
3077                  * CVAL(req->vwv+13, 0) above. The cast in the comparison
3078                  * below is not necessary, it's here to clarify things. The
3079                  * validity of req->vwv and req->wct has been checked in
3080                  * init_smb_request already.
3081                  */
3082                 if ((state->setup_count/2) + 19 > (unsigned int)req->wct) {
3083                         goto bad_param;
3084                 }
3085
3086                 state->setup = (uint16_t *)TALLOC(state, state->setup_count);
3087                 if (state->setup == NULL) {
3088                         DEBUG(0,("reply_nttrans : Out of memory\n"));
3089                         SAFE_FREE(state->data);
3090                         SAFE_FREE(state->param);
3091                         TALLOC_FREE(state);
3092                         reply_nterror(req, NT_STATUS_NO_MEMORY);
3093                         END_PROFILE(SMBnttrans);
3094                         return;
3095                 }
3096
3097                 memcpy(state->setup, req->vwv+19, state->setup_count);
3098                 dump_data(10, (uint8_t *)state->setup, state->setup_count);
3099         }
3100
3101         if ((state->received_data == state->total_data) &&
3102             (state->received_param == state->total_param)) {
3103                 handle_nttrans(conn, state, req);
3104                 SAFE_FREE(state->param);
3105                 SAFE_FREE(state->data);
3106                 TALLOC_FREE(state);
3107                 END_PROFILE(SMBnttrans);
3108                 return;
3109         }
3110
3111         DLIST_ADD(conn->pending_trans, state);
3112
3113         /* We need to send an interim response then receive the rest
3114            of the parameter/data bytes */
3115         reply_outbuf(req, 0, 0);
3116         show_msg((char *)req->outbuf);
3117         END_PROFILE(SMBnttrans);
3118         return;
3119
3120   bad_param:
3121
3122         DEBUG(0,("reply_nttrans: invalid trans parameters\n"));
3123         SAFE_FREE(state->data);
3124         SAFE_FREE(state->param);
3125         TALLOC_FREE(state);
3126         reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3127         END_PROFILE(SMBnttrans);
3128         return;
3129 }
3130
3131 /****************************************************************************
3132  Reply to a SMBnttranss
3133  ****************************************************************************/
3134
3135 void reply_nttranss(struct smb_request *req)
3136 {
3137         connection_struct *conn = req->conn;
3138         uint32_t pcnt,poff,dcnt,doff,pdisp,ddisp;
3139         struct trans_state *state;
3140
3141         START_PROFILE(SMBnttranss);
3142
3143         show_msg((const char *)req->inbuf);
3144
3145         /* Windows clients expect all replies to
3146            an NT transact secondary (SMBnttranss 0xA1)
3147            to have a command code of NT transact
3148            (SMBnttrans 0xA0). See bug #8989 for details. */
3149         req->cmd = SMBnttrans;
3150
3151         if (req->wct < 18) {
3152                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3153                 END_PROFILE(SMBnttranss);
3154                 return;
3155         }
3156
3157         for (state = conn->pending_trans; state != NULL;
3158              state = state->next) {
3159                 if (state->mid == req->mid) {
3160                         break;
3161                 }
3162         }
3163
3164         if ((state == NULL) || (state->cmd != SMBnttrans)) {
3165                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3166                 END_PROFILE(SMBnttranss);
3167                 return;
3168         }
3169
3170         /* Revise state->total_param and state->total_data in case they have
3171            changed downwards */
3172         if (IVAL(req->vwv+1, 1) < state->total_param) {
3173                 state->total_param = IVAL(req->vwv+1, 1);
3174         }
3175         if (IVAL(req->vwv+3, 1) < state->total_data) {
3176                 state->total_data = IVAL(req->vwv+3, 1);
3177         }
3178
3179         pcnt = IVAL(req->vwv+5, 1);
3180         poff = IVAL(req->vwv+7, 1);
3181         pdisp = IVAL(req->vwv+9, 1);
3182
3183         dcnt = IVAL(req->vwv+11, 1);
3184         doff = IVAL(req->vwv+13, 1);
3185         ddisp = IVAL(req->vwv+15, 1);
3186
3187         state->received_param += pcnt;
3188         state->received_data += dcnt;
3189
3190         if ((state->received_data > state->total_data) ||
3191             (state->received_param > state->total_param))
3192                 goto bad_param;
3193
3194         if (pcnt) {
3195                 if (trans_oob(state->total_param, pdisp, pcnt)
3196                     || trans_oob(smb_len(req->inbuf), poff, pcnt)) {
3197                         goto bad_param;
3198                 }
3199                 memcpy(state->param+pdisp, smb_base(req->inbuf)+poff,pcnt);
3200         }
3201
3202         if (dcnt) {
3203                 if (trans_oob(state->total_data, ddisp, dcnt)
3204                     || trans_oob(smb_len(req->inbuf), doff, dcnt)) {
3205                         goto bad_param;
3206                 }
3207                 memcpy(state->data+ddisp, smb_base(req->inbuf)+doff,dcnt);
3208         }
3209
3210         if ((state->received_param < state->total_param) ||
3211             (state->received_data < state->total_data)) {
3212                 END_PROFILE(SMBnttranss);
3213                 return;
3214         }
3215
3216         handle_nttrans(conn, state, req);
3217
3218         DLIST_REMOVE(conn->pending_trans, state);
3219         SAFE_FREE(state->data);
3220         SAFE_FREE(state->param);
3221         TALLOC_FREE(state);
3222         END_PROFILE(SMBnttranss);
3223         return;
3224
3225   bad_param:
3226
3227         DEBUG(0,("reply_nttranss: invalid trans parameters\n"));
3228         DLIST_REMOVE(conn->pending_trans, state);
3229         SAFE_FREE(state->data);
3230         SAFE_FREE(state->param);
3231         TALLOC_FREE(state);
3232         reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3233         END_PROFILE(SMBnttranss);
3234         return;
3235 }